校园量多超市管理信息系统课程设计.doc

工程技术学院课程设计题 目： 校园量多超市管理信息系统 专 业： 工业工程 年 级： 2008 级 学 号： 20081308 姓 名： 杨绍东 指导教师： 付宏财 日 期： 2011-7-14 云南农业大学工程技术学院 目 录 一、课程设计任务书 1二、 系统概述 2三、 系统分析 31.1系统目标总体描述21.2系统涉及的业务流程分析及描述与相关业务流程图 31.3系统涉及的数据流程分析及描述和相关组织结构图 41.4系统涉及的数据流程分析及描述和相关数据流程图 5四 、界面设计，窗口运行状况及设计代码 63 界面设计 73.1系统主窗体设计及主界面的运行 73.2主要程序源代码 12五、课程设计结论 16一、课程设计任务书1、课程设计项目针对你较熟悉的一个中小型单位/公司的实际情况，对其管理业务和现有信息管理方案进行调研，对其新的管理信息系统开发提出规划，并进行系统分析（绘制其组织结构图、业务功能图、业务流程图、数据流程图等）、系统设计（？），在设计中请利用VB、VC、C、Excel或Access等程序语言对主要的信息管理子系统进行窗口化设计，并编写子程序代码。2、要求通过本课程设计，综合利用该门课程所学的理论和实验知识与技能，对一个小型企业的信息管理意识、综合措施与计算机系统方案进行实际分析，并作优化与改进（改造）设计，要求分析设计的内容考虑周全、实用，并具有远见性；系统设计方案合理，部分环节的程序编写正确。要求：（1）调研措施得当，并能深入实际，获取的信息较为全面、实用；（2）能查阅整理相关文献资料，能按照课程设计的要求独立进行，能按规定的格式撰写；分析体现的基础理论知识扎实；（3）设计的综合方案合理，技术得当，体现一定的技术水平和远见性；（4）系统实现的技术路线可行，局部的程序编写正确。3、计划安排依据学校课程安排，第三学期内完成。4、考核内容和方式从以下几个方面综合权衡打分：（1）调研工作（深入实际与资料查询）深入的程度；（2）分析与设计体现的理论知识水平；（3）技术路径与方法是否得当；（4）编写的程序的适用程度以及各子程序代码正确与否；（5）运行效果评价。二、 系统概述 1 背景：校园量多超市位于云南农业大学天桥下，经营的业务范围包括百货，日用品，文具用品等多种商品。其营运模式是现代化企业经营管理模式，其管理信息系统是一套针对现代企业管理的需求，结合先进企业管理理念，运用先进的技术手段，精心开发的软件产品。本系统主要用于企业采购、销售、库存、应收、应付、发票、销售的管理。通过本软件可以实现企业采购、销售、库存、付款、收款、发票的集中式信息化管理，提高企业的管理水平与经济效益。 （1）、采购管理：实现采购单的制作、审核、执行情况跟踪、统计等 （2）、销售管理：实现销售单的制作、审核、执行情况跟踪、统计等（3）、库存管理：实现入库，出库，盘点，调拨的管理 。由于本系统设计针对该超市的具体情况，因此用户需求的目的是通过该企业的2需求调查：从中总结出企业对管理信息系统的需求，然后根据这些需求设计出系统的方案。需求收集和分析是数据库设计的第一阶段。需求分析定义了软件产品的各种用户需求如功能、性能等，需求分析是否透彻、完整、正确是软件项目成败的关键。这一阶段收集到的基础数据是下一步设计概念结构的基础。从数据库设计的角度考虑，需求分析阶段的目标是:对现实世界要处理的对象(组织、部门、企业等)进行详细调查，在了解原系统的概况，确定新系统功的过程中，收集支持系统目标的基础数据及其处理，最重要的就是建立用户数据模型。无论是采取哪种开发策略，都需要访问用户、记录需求，并根据这些需求建立数据模型的原型，这样的模型标识了需要在数据库中存储的内容和它们的结构及相互关系。进行数据建模要求既要有一定的行业知识，又要精通建模的方法和技巧。销售管理模块包括货单的录入和维护；对销售情况进行统计；对商品的零售和批发进行管理和付款的计算机操作等。进货管理模块包括进货资料录入和维护;采购订单的录入和维护和付款的计算机的操作等。和传统管理模式相比较，使用本系统，毫无疑问会大大提高超市的运作效率，辅助提高超市的决策水平，管理水平，为降低经营成本， 提高效益，减少差错，节省人力，减少顾客购物时间，增加客流量，提高顾客满意度，增强超市扩张能力， 提供有效的技术保障。三、 系统分析1 组织机构图店长仓库管理部销售部财务部销售员1 销售员2 销售员3 销售员42 业务功能图仓库管理商品采购商品盘点库存管理编制采购计划采购管理入库管理出库管理库存统计 3业务流程图仓库领货单店长销售计划未批准的领货单领货通知已批准的领货单仓库管理员库存单缺货通知采购员销售员4 数据流程图 四 、界面设计，窗口运行状况及设计代码 1.设计思路校园量多超市管理系统主要涉及销售员信息管理、商品信息管理和销售信息管理，因此做如下处理：（1） 每个销售员对应于一个唯一的销售员编号。销售员编号有4位数，前3选取101，后1位从04之间选取；（2） 每件商品对应于唯一的商品编号，商品编号从1开头；程序设计采用VB 6.0和Access数据库进行，二者连接采用Adodc和DataGrid控件2、设计方案 在Access 数据库中设计三张表格，分别为销售员信息表、商品信息表、销售信息表，销售员在商品查询时输入自己的销售员编号和密码后就可以登录商品信息查询系统进行查询信息。3界面设计4 运行界面 输入正确销售员编号及其密码 其运行界面如下图 输入错误销售员编号或密码 其运行窗口如下图 在输入正确销售员编号及密码之后，在其运行窗口中，输入不存在的商品号或商品名称其运行窗口如下图 输入正确商品号或商品名称，并且按正确方式查询 其运行窗口如下图点击返回查询窗口，其界面会返回到销售员密码窗口5 设计代码Form1 “确定”按钮程序代码Dim x As String, y As StringPrivate Sub Command1_Click()x = y = Adodc1.Recordset.MoveFirstDo Until Adodc1.Recordset.EOFDataGrid1.Col = 0If (Trim(Text1.Text) = Trim(DataGrid1.Text) Thenx = Trim(Text1.Text)DataGrid1.Col = 2If (Trim(Text2.Text) = Trim(DataGrid1.Text) Theny = Trim(Text2.Text)End IfEnd IfAdodc1.Recordset.MoveNextLoopIf (x And y ) ThenForm1.HideForm2.ShowElseMsgBox (管理员编号或密码不正确)End IfEnd SubForm2 “按商品编号查询”按钮程序代码Private Sub Command1_Click()Adodc2.Recordset.MoveFirstx = Do Until Adodc2.Recordset.EOFDataGrid1.Col = 0If (Trim(Text1.Text) = Trim(DataGrid1.Text) Thenx = Trim(Text1.Text)DataGrid1.Col = 0Text2.Text = DataGrid1.TextDataGrid1.Col = 1Text3.Text = DataGrid1.TextDataGrid1.Col = 2Text4.Text = DataGrid1.TextDataGrid1.Col = 3Text5.Text = DataGrid1.TextDataGrid1.Col = 4Text6.Text = DataGrid1.TextDataGrid1.Col = 5Text7.Text = DataGrid1.TextExit DoEnd IfAdodc2.Recordset.MoveNextLoopIf (x = ) ThenMsgBox (经查询，无此商品入库)End IfEnd SubForm2 “按商品名称查询”按钮程序代码Private Sub Command2_Click()Adodc2.Recordset.MoveFirstx = Do Until Adodc2.Recordset.EOFDataGrid1.Col = 1If (Trim(Text1.Text) = Trim(DataGrid1.Text) Thenx = Trim(Text1.Text)DataGrid1.Col = 0Text2.Text = DataGrid1.TextDataGrid1.Col = 1Text3.Text = DataGrid1.TextDataGrid1.Col = 2Text4.Text = DataGrid1.TextDataGrid1.Col = 3Text5.Text = DataGrid1.TextDataGrid1.Col = 4Text6.Text = DataGrid1.TextDataGrid1.Col = 5Text7.Text = DataGrid1.TextExit DoEnd IfAdodc2.Recordset.MoveNextLoopIf (x = ) ThenMsgBox (经查询，无此商品入库)End IfEnd SubForm2 “查看销售信息”按钮程序代码Private Sub Command3_Click()Form3.ShowForm2.HideAdodc2.Recordset.MoveFirstDo Until Adodc2.Recordset.EOFDataGrid1.Col = 1If (Trim(Form2.Text1.Text) = Trim(Form3.Text1.Text) Thenx = Trim(Text1.Text)DataGrid2.Col = 0Form3.Text1.Text = Form2.DataGrid2.TextForm2.DataGrid2.Col = 1Form3.Text2.Text = Form2.DataGrid2.TextForm2.DataGrid2.Col = 2Form3.Text3.Text = Form2.DataGrid2.TextForm2.DataGrid2.Col = 3Form3.Text4.Text = Form2.DataGrid2.TextForm2.DataGrid2.Col = 4Form3.Text5.Text = Form2.DataGrid2.TextExit DoEnd IfForm2.Adodc2.Recordset.MoveNextLoopIf (x = ) ThenMsgBox (经查询，无此商品登记)End IfEnd SubForm2 “退出”按钮程序代码Private Sub Command4_Click()Form1.ShowForm2.HideEnd SubForm3 “返回查询窗口”按钮程序代码Private Sub Command1_Click()Form3.HideForm1.ShowEnd Sub五、课程设计结论本次管理信息系统课程设计是对校园量多超市管理信息系统而进行设计的。通过实地调研，收集资料，处理信息，对其经营管理业务和现有销售信息及其库存管理而进行系统分析，系统设计，窗口设计，并且编写了代码。通过本次课程设计，学会了综合利用管理信息系统这门课程之中的理论知识和试验技能。在专业指导老师的指导下，对校园量多超市管理信息系统进行了设计，通过运用课堂上所学的VB和Access等计算机技术知识对所收集的数据和信息进行设计出来的，并且编写出了设计代码，经过运行，编码是正确的。通过了这次课程设计，我不仅大大提高了模型规划、系统设计和软件编程的能力，自身的各方面的素质也得到了提高。同时也