管理信息系统设计销售系统.docx

1、管理信息系统设计销售系统摘 要本文以图书销售系统的开发为主要目的，设计了一个适合图书城销售的系统。任务以小组形式展开，文中主要涉及了本销售系统的系统分析部分，其中有组织结构图、业务流程图、数据流程图、数据字典的分析与编制。为小组的其他成员提供理论基础与概念模型。从而辅助系统开发的其他步骤，以此为基础。主要分析了图书城中出现的业务流程，并根据业务流程的工作原理来开发此销售系统。从而达到使图书城的销售更加简易，快捷。本文在参考了相关文献后安排以Visual Basic 6.0为基础的开发工具，系统开发的过程由此展开。关键词：销售系统；分析；逻辑模型目 录1前言 11.1 作业背景 11.2 选题说

2、明 11.2.1 基本思路 21.2.2 作业目标 21.3 工作业绩 21.3.1 个人主要工作 21.3.2 主要收获 21.3.3 自我评定 21.3.4 小组成员任务分工情况 32 系统规划 42.1信息系统规划概述 42.2开发工具及实施环境 42.3系统总体规划目标 42.4现行系统初步调查与分析 42.5用户需求分析 52.6系统可行性分析 53 系统分析 63.1 组织结构图 63.2业务流程分析 73.3数据流程分析 83.4数据字典 104 系统设计 134.1 功能模块图 134.2 E-R图 144.3 数据库设计 154.4 输入设计 154.5 输出设计 175 系

3、统实施 195.1程序设计 195.1.1登陆界面 195.1.2 主界面 205.2系统运行与测试 215.2.1系统测试的概念 215.2.2测试过程 215.3操作手册 226 结束语 231前言进入二十一世纪，信息化的进程进一步加快，向着网络化、智能化方向发展，计算机行业飞速向前发展，信息化深入到社会的各行各业。微机化管理的广泛应用，使工作效率显著提高。Internet带给我们的不仅是无穷的信息，更是商业模式和消费观念的变迁，电子商务业已成为时尚。图书销售管理系统是典型的信息管理系统(MIS)，图书销售管理系统旨在提供一个可以操作的，方便查询，易于修改的辅助管理系统。基本上实现了电子商

4、务的功能流程，本系统界面简单直观，易于作和使用，交互性强，完全基于Internet网络。1.1 作业背景本文根据管理信息系统开发实践课程要求而做。课程作业要求如下：用信息系统开发工具（例如VB、VF6.0）开发一个实用的中小型的销售系统。1、根据课程实践时间选择适当规模大小的设计课题。针对管理信息系统课程实践的具体特点，体现项目管理的思想，可由指导教师对学生进行分组（每组4-6人），一组一题，分工合作，共同完成。2、根据合理的进度安排，按照系统开发的流程及方法，踏实地开展课程实践活动。3、课程实践过程中，根据选题的具体需求，在开发各环节中撰写相关的技术文档，最后要求提交详细的课程实践报告。4、

5、开发出可以运行的电子商务系统，通过上机检查。1.2 选题说明此次为信诚销售公司开发一套书店销售管理系统，此书店为中型规模，读者覆盖面占全市20%。设有管理部门、财务部门、销售部、库存管理部门。管理部门有监察审计部，书店内部人力资源管理，综合管理部门。销售部门主要负责销售计划管理和销售统计管理。财务部门主要负责成本核算，利润核算，账目管理。库存管理部门主要包括入库管理，出库管理，库存统计，图书基本信息管理。1.2.1 基本思路通过书店销售管理系统，完成界面登陆的操作，进入各个功能模块，管理模块包括监察审计、客户顾客基本信息管理、人力资源管理、综合管理；销售功能包括销售计划管理、销售统计管理；财务

6、功能包括成本核算、利润核算、账目管理；库存管理功能包括入库管理、出库管理、库存统计、图书基本信息管理。根据用户的实际需要进行对应的操作。1.2.2 作业目标通过对管理信息系统的开发，从而提升对系统开发的了解以及各种数据的分析总结工作的进程。1.3 工作业绩1.3.1 个人主要工作主要包括：组织结构编制、业务流程分析、数据流程分析、数据字典的编制与分析1.3.2 主要收获 本次课程设计中，任务由小组完成，小组分工，从调查，分析，到设计，以及评价这几个部分中，我认识到了开发一个系统的大致流程，了解到了系统的开发必须有一个全面的逻辑思维，而且各个部分的相互联系非常密切。我担任的是本次任务的系统分析，

7、其中对各种图表数据的设计，有助于对系统功能的全面了解，以及可以辅助后面程序的设计。是非常关键的一个环节。1.3.3 自我评定 优 良 中 及格 不及格1.3.4 小组成员任务分工情况本组为本次课程设计第2组，组长为： ，小组所有成员分工如下：学 号姓 名所分配的任务备 注2 系统规划2.1信息系统规划概述规划通常指关于一个组织的发展方向，环境条件，长期目标，重大政策与策略等方面的长远计划。信息系统规划是将组织目标，支持组织目标所必须的信息，提供这些必须信息的信息系统，以及这些信息系统的实施等诸要素集成的信息系统方案，是面向组织中信息系统发景的系统开发计划。2.2开发工具及实施环境开发工具: V

8、isual Basic6.0开发方法:结构化系统开发方法开发方式:自行开发2.3系统总体规划目标本次规划的目标需达到以下几点：（1）系统功能强（2）系统适应性强（3）系统具有良好的开放性2.4现行系统初步调查与分析1、在图书销售信息化建设上投资不够，是造成图书销售信息化滞后的原因2、书店的职员认识不够，很多职员思想保守，特别是一些老的职员，对图书销售信息化建设认识不够，认为图书销售信息化建设是盲目投资，极力反对；3、没能充分利用有效的信息资源，投资繁杂。4、21世纪是信息的世纪，信息资源的竞争己成为人们竞争的焦点，信息资源也如同能源一样成为人们的重要资源。因此，我书店应注重信息的收集和管理，尤

9、其是建立信息资源管理标准，从而保证标准化、规范化的组织、管理信息。5、建立良好的数字化环境良好的数字化环境包括书店图书的软环境和硬环境，对于这个问题，书店领导应给与高度重视。2.5用户需求分析随着书店的规模逐渐扩大，书店的职工越来越多，同时，销售的订单也越来越多，用户的信息管理存在不安全、步不完整、不真实的隐患。书店的管理者需要对用户负责，要高效的，安全的，真实的获取用户的信息以及销售的信息。用户信息以及销售信息的真实检测组要求有辅助的自动检测功能,要求销售的一些基本信息的真实。同时，管理员可以查看其他人工化的存储信息，还可以进行管理和维护。不仅节省大量的人力和物力，真实性也得到良好的解决，所

10、以建立一个安全的可靠的图书销售信息管理成为一种必然。2.6系统可行性分析（1）技术上的可行性由于Windows2000操作系统是有人机变互的友好界面，很容易掌握及操作，程序界面相对较容易实现等特点，加之目前基于Windows2000操作系统的软件开发工具也很多，易于学习、开发及应用。（2）经济上的可行性在服务器费用方面,支出在我们承担的范围.当前系统可以节约的支出能够支付当前系统的直接支出,以后的维护费用更是比以前的机制节约很多钱。（3）管理上的可行性领导的重视，使得信息系统，在管理上也是完全可行的。可行性分析结论：本系统可以开发3 系统分析3.1 组织结构图图1.1组织结构图组织结构图分析：

11、1. 由图中可见，顶层模块是店长组成，下分为四个部门，分别是：采购部、财务部、供销部、仓库。2. 采购部主要是负责采购环节，包括合同处理，选择供应商等；3. 财务部是对书店的成本、利润、以及各种数据的统计。划分为成本组、利润组、统计组三个小组，小组对财务部负责，每期财务部将对店长汇报营业状况；4. 供销部是销售部门，由采购部门确定的供应商，供应组负责清点，验 收产品，并将产品移交给销售组进行销售，最后将收支的数据交给统计组核算。5. 仓库是负责存储产品，也就是各种书籍、工具、资料等等。采购部门确定订单后，供应组接收产品后会暂时交由仓库存储，由入库组登记。6. 销售组进行销售的时候，会从仓库提取

12、相应的产品，由仓库中的入库组登记。出入库的数据会转移至仓库部的统计组进行汇总。3.2业务流程分析 图1.2业务流程图业务流程图体现了该系统的运作过程，首先由客户提交订书单，销售人员进行审核，此过程中，销售人员与库管联系，有货则会下发领货通知单交给销售人员，从而开发票单，转移到客户手上。若无货或者存货不足，则会向供货单位发出通知，由采购员开出采购单，提交给供货单位，供货单位以提货通知单通知采购人员提货。同时采购员编制入库单，补充库存。交易结束后，库管会统一记录在入库流水账中，形成库存帐。3.3数据流程分析数据流程图的符号说明如图：外部项 数据存储 数据处理 数据流图书销售系统的数据流程图： 购物

13、凭证 购物凭证 图1.3 0级数据流程图图1.4一级数据流程图图1.5二级数据流程图从二级数据流程图可以看出图书城销售的过程：（1） 客户提交购物凭证，系统转入订单处理（2） 订单审核以后提交给销售中心（3） 销售中心查询库存记录（4） 库存中若有货则提交发货通知给仓库进行发货，最后连同凭证送到顾客手里，发货的数据会以统计表的形式提交到书店进行统计。（5） 上一环节的销售处理形成了购物单，传递给财务部并作记录。（6） 财务部记录与书店销售记录的数据一起纳入销售统计处理。（7） 销售处理提交订书单后会由库管进行记录，管理库存量，及时补充存货。（8） 销售处理会向库存记录进行查询，采购员在做入库处

14、理之前会将记录在库存记录上。（9） 最后由库存将记录反应到财务部门，循环至销售统计处理。3.4数据字典详细内容数据字典是对描述数据流程图中的数据项、数据流、数据存储、加工处理逻辑等组成部分的严格定义，下面是本系统的数据字典 表1.1 数据库信息书名描述M_Book_Store（入库单）书店采购一批属图书的明细项目M_Book_Bill（书店发票）顾客购买时书店开出的证明M_Book_BKBill）（客户订书单）客户订购图书的明细M_Book_Purchase（采购单）采购部门人员需要采购的数目及数量M_Book_CurAcc（入库流水账）每次图书入库的相关记录M_Book_All（库存帐）仓库

15、中现有图书的明细M_Administrator（管理人员）管理人员操作口令明细M_user（客户）客户操作口令明细表1.2入库单的数据字典数据流编号数据流名称简述数据流来源数据流去向数据流组成DS101入库单书店采购一批属图书的明细项目采购人员库存管理ISBN+书名+ 作者+ 出版社+出版日期+数量+定价例1：经手人：杨林ISBN：978-7-80140-713-9 书名：数学复习全书 作者：李永乐 出版社：国家行政学院出版社 出版日期：2003/5/15 定价：52 数量30表1.3书店发票的数据字典数据流编号数据流名称简述数据流来源数据流去向数据流组成DS102书店发票顾客购买时书店开出的

16、证明销售人员客户编号+ISBN+ 书名+ 单价+数量+合计金额+折扣金额+实收金额例2：ISBN：978-7-5025-5783-6-4 书名：系统工程导论 单价：27 数量：20 合计金额：540 折扣金额：81 实收金额：459 编号：4 收银员123 日期：2010/5/27表1.4客户订书单数据字典数据流编号数据流名称简述数据流来源数据流去向数据流组成DS103客户订书单客户订购图书的明细客户销售中心订单客户预览+订书单处理例3：王小虎的订单信息目前库存有货，数量不足表1.5采购单数据字典数据流编号数据流名称简述数据流来源数据流去向数据流组成DS104采购单采购部门人员需要采购的数目及

17、数量采购人员供货单位编号+日期+ISBN+书名+作者+日期+出版社+数量王小虎的订书单：ISBN：978-7-5025-5783-6-4 书名：系统工程导论 作者：梁军 日期：2008/2/13 出版社：化学工业出版社 数量：20表1.5入库流水账的数据字典编号名称简述数据存储组成关键字相关联的处理DS105入库流水账每次图书入库的相关记录入库总数量入库明细ISBN销售总数量出售明细存储库管库存帐表1.6库存帐的数据字典编号名称简述数据存储组成关键字相关联的处理DS106库存帐仓库中现有图书的明细书名+数量+ISBN+作者+出版日期+单价+库存销售处理入库处理表1.7管理人员的数据字典编号名称

18、简述输入的数据流输出的数据流DS107管理人员管理人员操作口令明细管理权限管理界面表1.8客户的数据字典编号名称简述输入的数据流输出的数据流DS108客户客户操作口令明细Custom ID初始密码图书管理客户信息4 系统设计 4.1 功能模块图图1.6功能模块图4.2 E-R图图1.7 E-R图关系模型如下：出库单（出库单编号、产品编号、产品数量、日期）查询（查询编号、查询条目）入库单（入库单编号、产品编号、产品名称、日期）订书合同（合同编号、合同名称、合同负责人、合同日期）销售统计表（统计编号、统计产品名称、统计销售额、统计日期）客户（客户编号、客户名称）订书单（订书单编号、订书单名称、订书

19、人、订书数量、订书日期）4.3 数据库设计表1.9 数据库信息书名描述M_Book_Store（入库单）书店采购一批属图书的明细项目M_Book_Bill（书店发票）顾客购买时书店开出的证明M_Book_BKBill）（客户订书单）客户订购图书的明细M_Book_Purchase（采购单）采购部门人员需要采购的数目及数量M_Book_CurAcc（入库流水账）每次图书入库的相关记录M_Book_All（库存帐）仓库中现有图书的明细M_Administrator（管理人员）管理人员操作口令明细M_user（客户）客户操作口令明细4.4 输入设计图1.8 登陆界面登陆界面主要实现代码如下：Priv

20、ate Sub CheckPwd()Dim strSql As StringDim strPwd As StringSelect Case M_UserType Case 1 strSql = select * from M_Administrator where M_Usr_Name = & Replace(Trim(UsrName.Text), , ) & Case 2 strSql = select * from M_user where M_custom_name = & Replace(Trim(UsrName.Text), , ) & End SelectErr.ClearSet

21、rec = M_Conn.Execute(strSql)If rec.EOF Or Err.Number 0 Then MsgBox 该用户名不存在！, 0 + 16, 图书销售管理系统 Exit Sub End IfstrPwd = rec(M_Usr_Pwd).ValueIf strPwd Pwd.Text Then MsgBox 密码不正确！, 0 + 16, 图书销售管理系统 Pwd.Text = Pwd.SetFocus Exit Sub End IfM_UserName = UsrName.TextUnload MefrmMain.ShowEnd Sub4.5 输出设计其主要实现代

22、码如下：Private Sub Command1_Click() Command2.Visible = True Command3.Visible = True If Adodc1.Recordset.RecordCount 0 Then Adodc1.Recordset.MoveFirst Print Font.Size = 14 Font.name = 华文行楷 CurrentY = 200 Print Tab(38); Year(Date) & 年 & Month(Date) & 月 & 图书订购发票单 CurrentY = 500 Font.Size = 9 Font.name = 宋

23、体 Print Tab(15); 编号:; Adodc1.Recordset.Fields(M_Book_ID); Tab(45); 收银员:; Adodc1.Recordset.Fields(M_Book_ChargeMan); Tab(75); 日期: & Adodc1.Recordset.Fields(M_Book_Date) Print Tab(14); String(75, -) Print Tab(15); ISBN; Tab(35); 书名; Tab(60); 单价; Tab(80); 数量 Print Tab(14); String(75, _) Print Tab(14);

24、String(75, ) Print Tab(15); Adodc1.Recordset.Fields(M_Book_ISBN); Tab(30); Adodc1.Recordset.Fields(M_Book_Name); Tab(60); Adodc1.Recordset.Fields(M_Book_Prise); Tab(80); Adodc1.Recordset.Fields(M_Book_Num) Print Tab(14); String(75, _) Print Tab(14); String(75, ) Print Tab(15); “合计金额:; Adodc1.Records

25、et.Fields(M_Book_TMoney); Tab(40); 折扣金额:; Adodc1.Recordset.Fields(M_Book_HMoney); Tab(70); 实收金额:; Adodc1.Recordset.Fields(M_Book_FMoney)Else MsgBox wrong, vbInformation, i End IfEnd SubPrivate Sub Command2_Click()Command3.Visible = False On Error GoTo err_report Me.PrintFormerr_report: MsgBox Err.De

26、scription, vbInformation, 错误提示 Command3.Visible = TrueEnd SubPrivate Sub Form_Load()Dim str As StringAdodc1.ConnectionString = Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & M_database.mdb;Persist Security Info=False str = select * from M_Book_Bill where M_Book_ID = & frm_gscl.Combo1.Lis

27、t(frm_gscl.Combo1.ListIndex) & Adodc1.CommandType = adCmdTextAdodc1.RecordSource = strAdodc1.Refresh Command2.Visible = FalseCommand3.Visible = FalseEnd Sub5 系统实施5.1程序设计5.1.1登陆界面图4-1 登陆界面图示图4-2 修改密码界面图示5.1.2 主界面图4-3 主界面图示其主要实现代码如下：Private Sub Form_Load()If M_UserType = 2 Then Dim i As IntegerFor i =

28、 1 To 12 Step 2 Toolbar1.Buttons.Item(i).Visible = False NextEnd IfEnd SubPrivate Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)Select Case Button.Index Case 1 frm_rkcl.ShowCase 3 frm_dsd.ShowCase 5 frm_gscl.ShowCase 7 frm_jzcl.ShowCase 9 frm_cxcl.ShowCase 11 frm_tjcl.ShowCase 13 frm_tsgl.ShowCase 15 frm_khxx.ShowCase 17 Dim c c = MsgBox(您确认退出系统？, 33, 提示信息) If c = vbOK Then Unload Me End IfEnd SelectEnd Sub5.2系统运行与测试系统在运行过程中可能会产生各种各样的问题，也可能带来不同程序的严重后果。系统测试是管理信息系统开发周期中一个十分重要而漫长的过程。5.2.1系统测试的概念系统测试的概念定义为：使用人工或自动手段来运行或测定某个系统过程，其目的在于检验它是否满足规定的需求或是弄清预期结果与实际结果之间的差别。系统测试不仅包括确定的输