超市管理系统完整版.docx

1、超市管理系统完整版课程设计说明书课程名称： 大型数据库应用课题名称： 超市管理系统 班 级： 计本 041姓 名： 02 号 左文兵姓 名： 27 号 董子冰姓 名： 31 号 刘子豪指导教师： 满君丰 副教授湖南工业大学计算机与通信学院2007年 12月 20日1绪论. 21.1课题背景 21.2系统开发关键技术介绍 22系统分析 . 42.1用户工作流程 42.2用户业务需求 43系统设计 . 53.1设计思想 53.2系统功能结构图 53.3模块功能设计 64系统数据库设计 . 74.1系统数据库的建立 74.2系统 E-R 图 74.3各个数据表的创建 94.4存储过程设计 114.5

2、数据库的连接 115系统实现 135.1系统实现工具与支持平台 135.2系统界面 135.3系统主要功能实现 161. 前台 162. 后台 175.4系统核心代码 176总结与展望 216.1收获与体会 216.2错误！未定义书签 错误！未定义书签 错误！未定义书签未来的展望 21参考文献 . 致 谢. 课程设计检查表 . 1 绪论1.1课题背景21世纪，超市的竞争也进入到了一个全新的领域，随着超市的发展，其经营管理 也变得愈加复杂，迫切地需要引入新的管理技术。超市形态的高速发展，其经营管理 也变得愈加复杂，日常所需要处理的数据量也逐渐增大，商业运转的中间环节也越来 越多，原始的人工管理已

3、无法应对这复杂的市场。超市需要处理大量的库存信息，还 要时刻更新产品的销售信息，不断添加商品信息。竞争已不再是规模的竞争，而是技 术的竞争、管理的竞争、人才的竞争。 技术的提升和管理的升级是超市业的竞争核心。 零售领域目前呈多元发展趋势，多种业态：超市、仓储店、便利店、特许加盟店、专 卖店、货仓等相互并存。如何在激烈的竞争中扩大销售额、降低经营成本、扩大经营 规模，成为超市营业者努力追求的目标。为了大大提高超市的运作效率；通过全面的 信息采集和处理，辅助提高超市的决策水平；使用本系统，可以迅速提升超市的管理 水平，为降低经营成本， 提高效益，增强超市扩张力， 提供有效的技术保障。针对 超市的特

4、点，为了帮助超市解决现在面临的问题，提高小型超市的竞争力，我们将开 发以下系统：前台 POS 销售系统、后台管理系统，其中这两个子系统又包含其它一些 子功能。1.2系统开发关键技术介绍本系统采用的是微软公司的 Microsoft Visual Basic 6.0 开发工具做为开发系统程 序。在连接数据库上，利用 ADO 对象模型，创建几个简单的对象和数据来源进行连 接，然后从中取得所需要的数据，进行数据访问操作后保存。在连接数据库上， 以往在数据访问应用程序开发中，不管是使用 DAO 或 RDO 对 象来访问数据来源，都会对这些对象模型众多而且复杂的组成结构印象深刻。但利用 ADO 对象模型，

5、就可以只创建几个简单的对象和数据来源进行连接， 然后从中取得所 需要的数据，进行数据访问操作后保存。ADO (ActiveX Data Objects) 对象模型主要由三个对象成员： Connection、Command 与 Record set对象；以及三个集合对象： Errors、 Parameters与 Fields 对象所组成。ADO 对象模型与 DAO、RDO另一个较大的差异，在于某些 ADO 对象可以直接创建而不需依据上下层按顺序产生，比如我们可以直接创建一个 Command对象而不需要先行创建该对象的上层 Connection 对象，ADO会在该 Comman对d 象产生时自动创

6、建 上层 Connection 对象。下面给出 ADO对象间的关系 （ 如下图 1）：图 1.2 ADO 对象关系图2系统分析2.1用户工作流程本系统主要解决超市的基本管理问题，其中又分别包括后台管理和前台管理，后台包括进货管理，销售管理，库存情况的查询，以及基本用户人员的帐号 管理。前台包括商品录入，收银业务。2.2用户业务需求(1)进货管理： 根据销售情况及库存情况，自动制定进货计划(亦可手工 制定修改)，可以避免盲目进货造成商品积压。 按计划单有选择性地进行自动入 库登记。 综合查询打印计划进货与入库记录及金额。(2)销售管理： 商品正常销售、促销与限量、限期及禁止销售控制。 综合 查询

7、各种销售明细记录、各地收银员收银记录以及交结账情况等。 按多种方式 统计生成销售排行榜，灵活察看和打印商品销售日、月、年报表。(3)库存管理： 综合查询库存明细记录。 库存状态自动告警提示。如库存 过剩、少货、缺货等。软件为您预警，避免库存商品积压损失和缺货。 库存自 动盘点计算。(4)人员管理： 员工、会员、供货商、厂商等基本信息登记管理。 员工操 作权限管理。 客户销售权限管理。(5)收银业务：通过扫描条形码或者直接输入商品名称(对于同类多件商品 采用一次录入加数量的方式) 自动计算本次交易的总金额。在顾客付款后，自动 计算找零，同时打印交易清单(包括交易的流水账号、 每类商品的商品名、

8、数量、 该类商品的总金额、交易的时间、负责本次收银的员工号) 。如果顾客是本店会 员并持有本人会员卡，则在交易前先扫描会员卡，并对所购物品全部实行 95 折 优惠，并将所购物品的总金额累计到该会员的总消费金额中。 会员卡的有效期 限为一年，满一年未续卡者，该会员卡将被注销。3系统设计3.1设计思想（1）系统分成前台和后台几个相对独立的模块，但这些模块都进行集中式 管理。（2） 分层的模块化程序设计思想，整个系统采用模块化结构设计。作为应 用程序有较强的可操作性和扩展性。（3） 本系统使用的数据库设计是 Oracle+ODBC+AD控O 制，同时也尽可能地 使用了 VB的各种高级控件。（4）在

9、SQL语言的使用上，也使用了较多的技巧，例如组合查询技术，希 望通过此次设计能够提供自己各个方面的能力。3.2系统功能结构图根据对超市管理系统进行的可行性分析和结构化程序设计的要求， 得到系统 总体结构如图 5-1 所示：图 3-1 超市管理系统功能结构图3.3模块功能设计根据上述系统总体思想的分析， 本系统共包括六大模块， 分别是商品录入管理模块，收银业务管理模块，人员管理模块，销售管理模块，进货管理模块，库 存管理模块。每个模块的功能如下：1.商品录入管理模块：（1）实现商品的快速录入以快速更新数据；（2）实现支持商品的条形码扫描录入；2.收银业务管理模块：（1）实现交易总额计算；（2）实

10、现交易总额的查询；3.人员管理模块功能：（1）实现员工信息的查询；（2）实现员工信息的更新，包括增加、删除、修改功能；（3）实现员工操作权限管理；4.销售管理模块功能：（1）实现销售信息的查询；（2）实现商品销售的控制；5.进货管理模块功能：（1）实现进货信息的查询；（2）实现进货信息的更新，包括增加、删除、修改功能；6.库存管理模块功能：（1）实现商品明细记录的查询；（2）实现商品信息的更新，包括增加、删除、修改功能；（3）实现库存状态自动告警；（4）实现库存信息的更新，包括增加、删除、修改功能。4系统数据库设计4.1系统数据库的建立数据库应该设计成层次清晰的， 高效的，实用数据库，该系统是

11、采用三层架 构设计的， 可通过应用服务器的扩展来实现新功能的添加。 系统对数据记录的操 作也因为其课程设计中定义的数据操作方式和操作内容而注定不会产生脏数据 及数据读写的不一致性，故在数据库设计方面未采用触发器。我们认为在扩展应用服务器至多种功能后， 将应用服务器分为控制部分和客 户应用部分， 此时在控制部分添加触发器来防止数据读写的不一致性， 这已经超 出了本次课程设计所涉及的范围，在此不做过多的陈述。4.2系统 E-R 图1. E-R 模型超市管理系统数据库 E-R 模型：用户商品图 4.8 系统 E-R 模型图4.3各个数据表的创建由数据模型利用 Oracle10g进行数据库的详细设计，

12、 其基本表的设 计如下：表 4.1 商品表( Merchandise )字段名字段类型长度主/ 外键字段值约束对应中文名MerchIDint4PNot null商品编号MerchNameVarchar50Not null商品名称MerchPriceMoney4Not null价格MerchNumInt4Not null库存数量CautionNumInt4Not null库存报警数量PlanNumInt4null计划进货数BarCodeVarchar50Not null条形码SalesProPriceMoney4促销价格SalesProDateSDatetime8促销起日期SalesProDat

13、eEDatetime8促销止日期AllowAbateInt4Not null允许打折AllowSaleInt4Not null允许销售FactoryIDVarchar10FNot null厂商编号ProvideIDVarchar10FNot null供货商编号表 4.2 用户表 (User)字段名字段类型长度主/ 外键字段值约束对应中文名UserIDvarchar10PNot null用户编号UserNameVarchar25Not null用户名称UserPWVarchar50Not null用户密码UserStyleInt4Not null用户类型表 4.3 会员表 (Menber)字段名

14、字段类型长度主/外键字段值约束对应中文名MemberIDVarchar10PNot null会员编号MemberCardVarchar20Not null会员卡号TotalCostMoney4Not null累积消费金额RegDateDatetime8Not null注册日期表 4.4 销售表 (Sale)字段名字段类型长度主/外键字段值约束对应中文名SaleIDVarchar10PNot null销售编号MerChIDVarchar10FNot null商品编号SaleDateDatetime8Not null销售日期SaleNumInt4Not null销售数量SalePriceMoney

15、4Not null销售单额表 4.5 交易表 (Dealing)字段名字段类型长度主/ 外键字段值约束对应中文名DealingIDVarchar10PNot null交易编号DealingPriceMoney4Not null交易金额DealingDateMoney4Not null交易日期MemberIDVarchar10会员卡号UserNameVarchar10FNot null用户名称表 4.6 入库纪录表 (Stock)字段名字段类型长度主/外键字段值约束对应中文名StockIDVarchar10PNot null入库编号MerchIDVarchar10FNot null入库商品编号M

16、erchNumInt4Not null入库数量MerchPriceMoney4Not null单额TotalPriceMoney4Not null总额StockDateDatetime8Datetime入库日期PlanDateDatetime8Datetime计划进货日期StockStateInt4Not null入库状态表 4.7 供货商表 (Provide)字段名字段类型长度主 / 外键字段值约束对应中文名ProvideIDvarchar10PNot null供货商编号ProvideNameVarchar50Not null供货商名称ProvideAddressVarchar250供货商地

17、址ProvidePhoneVarchar25供货商电话表 4.8 厂商表 (Provide)字段名字段类型长度主 / 外键字段值约束对应中文名FactoryIDvarchar10PNot null厂商编号FactoryNameVarchar50Not null厂商名称FactoryAddressVarchar250厂商地址FactoryPhoneVarchar25厂商电话4.4存储过程设计创建用于用户登陆的存储过程 ：create or replace procedure set_User(sUserID in int identity,sUserPW in varchar,sUserName

18、 in varchar,sUserStyle in number) asbeginupdate Userset UserName=sUserName, UserPW=sUserPW, UserStyle=sUserStyle where UserID=sUserID;if SQL%NOTFOUND THENinsert into User(UserID,UserPW,UserName,UserStyle)values (sUserID,sUserPW,UserName,sUserStyle);end if;end set_User;4.5数据库的连接应用程序与 Oracle10g 数据库的连接

19、是通过创建 ADO数据源，然后在程序中 利用代码与数据库建立连接来实现的。具体实现方法是：在模块中声明调用 ADO 连接控件， 这样便能在任何时间连接数据库了。 使用 ADOConnection对象连接到 Oracle10g 。在查询等按钮的单击事件中访问数据库。可以使用应用程序配置文件建立一条到数据库服务器的连接， 返回一个关键 字 ConnectionString ，在实体数据链路层定义一个用于存储过程的一个基类，使用 SqlConnectiondatabase=Supermarket; ConnectionStrDBdata.cs 在这个基类中接受该关键字 ConnectionStrin

20、g 连接数据库 。配置文件连接数据库的代码： 。存储过程基类接受该关键字的代码： System.Configuration.ConfigurationSettings.AppSettings ing .ToString();5系统实现5.1系统实现工具与支持平台(1)用户界面本系统采用 Microsoft Visual Basic 6.0 设计，用户交互界面采用的是基于 Windows 的窗口界面。(2)硬件接口 运行本系统的硬件基本要求如下： CPU： Intel P3及以上； 内存： 512MB 及以上； 硬盘： 40GB 及以上。(3)软件接口 数据库服务器： Oracle10g。ADO

21、 对象模型5.2系统界面下面为运行后的界面图图 5.1 系统登录界面图 5.2 系统管理界面图 5.3 销售管理员界面图 5.4 进货管理界面图 5.5 会员管理界面图 5.6 厂商 /供货商管理界面5.3系统 主要功能实现1. 前台前台仅包括销售商品时必须且仅需的功能， 尽可能地做到简化操作程序， 利 于收银员快捷、 准确地进行收款。 功能包括前台交易开单、 收款、退货、会员卡、 折扣和优惠等； 下载后台资料和将清款后的业务数据上传后台； 完成前台交易中 的扫描条码或输入商品编码、收款、打印收据、弹出银箱等一系列操作。支持多种收款方式：顾客交款、营业员收款。 支持会员制折扣卡销售，可以采用严

22、格会员制或自由会员制。 记录顾客信息、累计顾客消费金额等功能。支持多种付款方式：现金、支票、记帐、赠券等。支持多种促销方式：折扣、折让、 VIP 优惠卡、赠送。收款员非常规操作记录， 有助于减少财务损失， 方便汇总打印各种营业报表。 该系统包含两个对象，包括收银员和客户。系统用例：收银员：结算收款客户：结帐2. 后台充分利用数据库的大容量、 高效率等特点，为用户提供强大的功能支持，对 超市进货业务、 库房业务进行管理，并处理分公司销售数据和后台批发业务，利 用商业流通超市的商品管理和往来客户管理， 为经营管理者提供分析与决策必需 的数据和信息。该后台包含 3 个对象，包括：超市经理，销售管理员

23、，进货管理员。系统用例： 超市经理：操作软件录入商品，供货商，厂商；操作软件制定进货计划； 查询打印计划进货与入库记录；操作软件控制商品销售与否；查询打印销售 情况； 操作软件生成销售排行榜；查询库存明细记录； 根据软件发出的库存告警 进行入货；操作软件进行盘点计算。销售管理员： 销售管理，因为要向系统提供货架管理信息，所以也参与货源 管理进货管理员：具体采购进货，采购单查询。5.4 系统核心代码此处指选取主要代码进行说明，数据库连接、用户登陆、主窗体数据库连接：在基类 DBdat 中打开数据库链接对象，public class DBdat private static SqlConnecti

24、on MyConnection;private static readonly string RETURNVALUE = RETURNVALUE; private static readonly String StringConnection =System.Configuration.ConfigurationSettings.AppSettingsConnectionString.ToSt ring()public static void Open() / 打开链接对象 if (MyConnection = null)MyConnection = new SqlConnection(Str

25、ingConnection); if (MyConnection.State = ConnectionState.Closed)MyConnection.Open();/ 打开数据库连接 / 关闭链接对象登陆Private Sub allen_Click()End SubPrivate Sub cboUser_GotFocus() cboUser.SelAllEnd SubPrivate Sub cmdExit_Click()Unload MeEnd SubPrivate Sub cmdOK_Click() / 如果还没有服务器信息If strSQLServer = Then MsgBox 您

26、必须先设置 cmdServer_Click Exit SubEnd IfIf cboUser.Text = Then / MsgBox 请填写用户名。 cboUser.SetFocus cboUser.SetFocus Exit SubEnd IfIf txtPW.Text = Then / MsgBox 请填写密码。 txtPW.SetFocus Exit SubEnd IfOn Error GoTo aaaa /检查是否连接服务器SQL 服务器信息。 , vbInformation填写用户名, vbInformation填写密码, vbInformation检查是否存在用户sqlConne

27、ct cnMain, strSQLServer, strSQLUser, strSQLPW, strSQLDB Dim rs As New ADODB.Recordset, strMD5 As StringstrMD5 = GetMD5(txtPW.Text)rs.Open Select * From User Where UserStyle1, cnMain, 1, 1If rs.EOF ThenMsgBox 找不到任何用户！ , vbCritical cnMain.CloseElseDo Until rs.EOFIf StrComp(rs(UserName), cboUser.Text,

28、1) = 0 And StrComp(rs(UserPW), GetMD5(txtPW.Text), 1) = 0 Then curUserName = rs(UserName) curUserStyle = CLng(rs(UserStyle) cboUser.AddItem curUserName, 0SaveUserListfrmMain.Icon = Me.IconUnload Me / 卸载主窗体frmMain.Show / 显示主窗体Exit SubEnd Ifrs.MoveNextLoopEnd IfMsgBox 用户名或密码错误，登陆失败！ , vbCritical cnMain.CloseExit Subaaaa:MsgBox Err.Description, vbCriticalIf