医药销售管理数据库课程设计

1、华东交通大学理工学院课程设计报告存档资料成绩：华东交通大学理工学院课程设计报告书课程名称题目分院数据库课程设计医药销售管理系统的设计与实现电信分院专业班级学号学生姓名指导教师2011年12月31日华东交通大学理工学院课程设计报告华东通大学理工学院课程设计任务书专业班级姓 名一、课程设计（论文）题目医药销售管理系统的设计与实现二、课程设计（论文）工作：自2011年 12月 20日起至2011 年 12月 31日止。三、课程设计的内容要求：以 SQL Server 2000作为后台数据库，以VB 6.0、 VC6.0 或其它开发工具作为前台开发工具，完成一个小型数据库应用系统的设计开发。学生签名

2、( 手签 ) ：_2011 年12 月31日华东交通大学理工学院课程设计报告摘要医药销售管理系统是专门针对医药企业、药店的综合业务而开发的系统，集进、销、存、决策于一体，同时还集成了基础信息管理、销售管理、进货管理、财务管理、报表打印、查询统计、备份恢复等多种实用的功能。课程设计严格参照软件工程的开发原则，首先对医药销售管理系统的开发背景、现状及存在问题进行了系统分析，并且对用户提出的问题加以分析并给出可行的解决方案。然后对系统总体设计，进行模块划分，确定基本信息、销售、入库、库存、财务统计、系统管理等子模块功能等。在总体设计的基础上，从系统的目标、处理流程、编码设计以及系统安全和可靠性等方面

3、入手进行详细设计。同时对数据库进行概要设计和逻辑设计，对系统E-R 图以及表进行分析与设计。系统采用二层 C/S 结构，前台开发工具选用性能比较稳定可靠的 Microsoft Visual Basic 6.0 ，后台数据库选用目前比较流行 Microsoft SQL Sever 2000 。整个系统从符合操作简便、界面友好、灵活、实用、安全的要求出发，完成药品信息、药品信息管理的全过程。关键词 ：医药销售管理系统，信息化，MicrosoftVisual Basic 6.0，Microsoft SQL Sever 2005- 1 -华东交通大学理工学院课程设计报告目 录引言第一章概要设计1.1

4、系统需求分析1.2 系统结构设计1.3 系统功能模块设计第二章详细设计2.1 系统数据库设计数据库需求分析数据库概念设计数据库逻辑设计数据库物理设计数据库实施2.2 系统主要功能模块设计2.3 主要模块代码第三章系统调试与运行小结参考文献- 2 -华东交通大学理工学院课程设计报告引 言1、设计目的调查从事医药产品的零售、 批发等工作的企业， 根据其具体情况设计医药销售管理系统。主要功能包括：a) 基础信息管理：药品信息、员工信息、客户信息、供应商信息等；b) 进货管理：入库登记、入库登记查询、入库报表等；c) 库房管理：库存查询、库存盘点、退货处理、库存报表等；d) 销售管理：销售登记、销售退

5、货、销售报表及相应的查询等；e) 财务统计：当日统计、当月统计及相应报表等；f) 系统维护：如数据安全管理 （含备份与恢复）、操作员管理、权限设置等；2、要求医药销售管理系统能对信息 （药品信息、员工信息、客户信息等） 进行查询、删除、更新等操作；对药品销售的管理（销售信息录入查询、更新等） ；对药品出入库的管理（出入库信息登记、出入库信息更新等操作） ）。3、设计环境CPU：Intel Pentium4 2GHz内存： 1G操作系统： Microsoft Windows XP开发工具是 Microsoft 公司的 Visual Basic 6.0 企业版后台数据库在 Microsoft SQ

6、L Server 2005- 3 -华东交通大学理工学院课程设计报告第一章概要设计1、系统需求分析1.1 信息需求（基本信息）药品信息：药品编号，药品名称，数量，售价，进价，供应商等供应商信息：供应商号，供应商名称，联系人，所在城市等药品销售信息：销售编码，药品编码，药品名称，售价，单位，数量，总额，销售日期等员工信息：员工号，姓名，用户名，职位，用户密码，用户权限等1.2 功能需求系统要实现的主要功能有：（1）对药品信息的维护和管理，能够万册很能够药品信息的添加、修改和删除，并按一定条件查询药品信息。（2）对供应商信息的管理，能够完成信息的添加、修改和删除，并按一定条件查询信息。（3）对客户

7、和员工信息的管理，能够完成信息的添加、修改和删除，并按一定条件查询信息。（4）仓库管理，能够查询库存药品信息，并对库存进行更新、盘点（5）销售管理，销售登记、销售退货、销售报表及相应的查询等；- 4 -华东交通大学理工学院课程设计报告2、系统结构设计系统结构图如图所示医药管理系统基进库销财系础货房售务统信息管管管统维理理理计护管理药员客供入入入库库退库销销销销当当数操权库据品工户应库库存存货存售售售售日报作限登月安信信信商登报查盘处报登退报查统表员设记统全管息息息信记表询点理表记货表询计计置查管理息询理3、功能模块设计基础信息管理模块：完成对员工，客户，供应商，药品等信息的查询，删除，添加等操

8、作；进货管理模块：完成对入库药品的信息查询等操作；库房管理模块：完成对库房的库存信息，退换货信息的查询，登记入录等操作；销售管理模块：完成销售信息的录入，查询，退货等管理操作；财务统计模块：完成当月统计和当月统计等报表的实现操作；系统维护模块：完成对员工的管理权限的设置等操作；- 5 -华东交通大学理工学院课程设计报告第2章详细设计1、系统数据库设计需求分析数据要求：药品信息、员工信息、客户信息、供应商信息药品出入库情况（数量，价格，总价等）库存量，销售量处理要求：a) 基础信息管理：药品信息、员工信息、客户信息、供应商信息等；b) 进货管理：入库登记、入库登记查询、入库报表等；c) 库房管理

9、：库存查询、库存盘点、退货处理、库存报表等；d) 销售管理：销售登记、销售退货、销售报表及相应的 查询等；e) 财务统计：当日统计、当月统计及相应报表等；数据字典1、 数据项编号数据项名称说明部分1编号整形类型，具有唯一性2药名字符型，具有唯一性3进价浮点型4数量整形5售价浮点型6供应商字符型，具有唯一性7联系人字符型8所在城市字符型9日期格式 */*/*10供应商号整形，具有唯一性11员工号整形，具有唯一性12客户号整形，具有唯一性13名称字符型14联系方式15进货单号整形16姓名字符型17权限字符型18备注文本类型19库存数量整型20销售编码整型2、 数据结构编号数据结构名属性1药品基本信

10、息编号、药名、进价、数量、售价、供应商、- 6 -华东交通大学理工学院课程设计报告2供应商基本信息供应商号、名称、联系人、所在城市3客户基本信息客户号、名称、联系人、所在城市4员工基本信息员工号、姓名、权限、用户名、职位、密码5入库登记编号、药名、数量、单价、总价、备注6仓库查询编号、药名、库存数量、单价、备注7退货处理编号、药名、退货数量、单价、备注8销售登记编号、药名、单价、数量、总价、员工号、日期9销售报表编号、药名、单价、数量、总价、员工号、日期10销售退货编号、药名、单价、数量、总价、员工号、日期11日结算编号、发票号、数额、员工号、日期12月结算编号、上月余额、收入、支出、余额、员

11、工号、日期13年终结算编号、收入、支出、净收入、员工号、日期3、 数据流编号数据流名输入输出1药品信息入库药品药品基本信息2供应商信息新增供应商供应商基本信息3客户信息新增客户客户基本信息4员工信息招新员工员工基本信息4、 数据存储数据存储名输入数据流输出数据流药品信息药品基本信息供应商信息供应商基本信息员工信息员工基本信息药品入库新进购药品的信息仓库中药品信息仓库退货退出货物的基本信息仓库中药品信息销售登记售出药品的信息药品基本信息销售退货退回药品信息药品基本信息财务统计收入和支出情况财务状况5、 处理过程处理过程名输入数据流输出数据流招收新员工终端员工基本信息辞掉老员工终端员工基本信息药品

12、入库终端药品基本信息仓库退货终端药品基本信息销售登记终端药品基本信息销售退货终端药品基本信息财务统计收入、支出情况财务状况- 7 -华东交通大学理工学院课程设计报告概念结构设计数据库的概念设计就是画出 E-R 图。分析前面的系统功能要求， 需要一个表来存储和管理客户信息， 使系统能够接受客户查询药品时输入的各项数据， 以实现数据录入、查询或统计客户信息等功能。客户是本系统的第一个实体。为了能实现查询和统计药品情况等功能， 必须有一个表来存储和管理所有药品的信息。药品是本系统的第二个实体。据此可以绘出医药销售管理系统数据库的E-R 图如下：药品 E R图名称售价药品进价编码供应商号客户 E-R

13、图所在地客户号客户名称客户联系人员工 E-R 图员工号权限姓名员工密码职位用户名- 8 -药品名 称进价进货单号日期华东交通大学理工学院课程设计报告供应商 E-R 图供应商号供应商名称供应商销售 E-R 图销售编码药品销售日期清单员工号药品名称整体 ER 图药品编码售价所在地药品进销售货数量所在地联系人数量供应商号药品编码客户号名称客户销售编码销售日期数量联系人人权供 应 商员工限密码所在地名用称联系人户供应商号员工号姓名职位名- 9 -华东交通大学理工学院课程设计报告逻辑结构设计将数据库的概念模型转换为关系模型药品信息（编码，药名，数量、售价，进价，供应商号）员工信息（员工号，姓名，密码，权

14、限，用户名）客户信息（客户号，名称，联系人，客户所在城市）供应商信息（供应商号，名称，联系人, 所在城市）药品销售信息（销售编码，销售日期，药品编码，药品名称，单价，数量，供应商，总额，员工号） 外码：销售员编码、药品编码药品进货信息（进货单号，进货日期，药品编码，药品名称，单价，数量，供应商，）物理设计数据库的物理结构是指数据库在物理设备上的存储结构与存取方法， 依赖于给定的计算机系统。 通过上一阶段的逻辑设计选取了一个最适合应用要求的物理结构的设计。数据库的实现数据库实现是运用DBMS提供的 DDL数据语言定义数据库结构，组织数据入库，编写与调试应用程序。数据表设计通过对关系模式的优化，得

15、到六个基本表：表 3 1 药品信息表字段名字段类型长度主键或外键字段值约束对应中文属性名MedicineCodeChar6Primary KeyNot Null药品编码MedicineNameVarchar32Not Null药品名称PriceMoney8售价ListPriceMoney8进价NumberInt4库存量FirmCodeChar4Not Null供应商编码表 3-2 供应商信息字段名字段类型长度主键或外键字段值约束对应中文属性名FirmCodeChar4Primary KeyNot Null供应商编码FirmNameVarchar16Not Null供应商名称LinkVarcha

16、r12联系人CityVarchar8所在城市表 3-3 药品销管理表字段名字段类型长度主键或外键字段值约束对应中文属性名SaleNoint4Primary KeyNot Null销售编码-10-华东交通大学理工学院课程设计报告MedicinecodeChar6Foreign keyNot Null药品编码MedicineNameVarchar32Not Null药品名称PriceMoney8售价NumberInt4数量AmountMoney8金额SaleDateDatetime8销售日期表 3-4 用户信息字段名字段类型长度主键或外键字段值约束对应中文属性名WorkNoChar2Primary

17、 KeyNot Null员工号NameVarchar12姓名UserRegNameChar3Not Null用户名PasswordMoney3Not Null用户口令PositionMoney10用户职位PowerInt10用户权限该系统数据库设计部分代码Table: FirmInforcreate table FirmInfor(FirmCodechar(4)not null,FirmNamevarchar(16)not null,Linkvarchar(12),LinkTellchar(11),Cityvarchar(8),primary key (FirmCode);Table: Med

18、Inforcreate table MedInfor(MedicineCodechar(4)not null,MedicineNamevarchar(32)not null,MedKindCodechar(1)not null,Pricenumeric(8,2),ListPricenumeric(8,2),StockNumvarchar(4),Unitchar(2),UsefulLifetimestamp,RatifyCodevarchar(10),primary key (MedicineCode);-11-华东交通大学理工学院课程设计报告Table: MedKindInforcreate

19、table MedKindInfor(MedKindCodechar(1)not null,KindExplanationvarchar(16),primary key (MedKindCode);Table: SupplyInforcreate table SupplyInfor(MedicineCodechar(4)not null,FirmCodechar(4)not null,MedicineNamevarchar(32),Numbervarchar(4),Unitchar(2),ListPricenumeric(8,2),Amountnumeric(8,2),primary key

20、(MedicineCode, FirmCode);Index: Relationship_3_FKcreateindex Relationship_3_FK on SupplyInfor (MedicineCode ASC);Index: Relationship_4_FKcreateindex Relationship_4_FK on SupplyInfor (FirmCode ASC);Table: UserInforcreate table UserInfor(UserRegNamechar(6)not null,Passwordchar(8)not null,Positionvarch

21、ar(10)not null,Powerchar(4),primary key (UserRegName);alter table MedInforadd foreign key FK_MEDINFOR_RELATIONS_MEDKINDI (MedKindCode)references MedKindInfor (MedKindCode)on update restricton delete restrict;alter table SupplyInforadd foreign key FK_SUPPLYIN_RELATIONS_MEDINFOR (MedicineCode)-12-华东交通

22、大学理工学院课程设计报告references MedInfor (MedicineCode)on update restricton delete restrict;alter table SupplyInforadd foreign key FK_SUPPLYIN_RELATIONS_FIRMINFO (FirmCode)references FirmInfor (FirmCode)on update restricton delete restrict;2.2 系统主要功能模块设计（可用流程图表示）订 货验 证医药销售客 户管理系统员工发货，退货查 询进货供应商（系统顶层数据流程图）-13

23、-华东交通大学理工学院课程设计报告员工信息员工管理药品信息库客户信息库员工信息库供货单药品入库药品出库药品销售药品退货出库入库清单清 单退入出出销销货库货库售售信记单记清信息录录单息入库信息出库信息库销售信息库退货信息库（系统 0 层数据流程图）主要模块代码登录：Private Sub Command2_Click()Me.HideEnd SubPrivate Sub Option1_Click()End SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = Chr(32) ThenText2.SetFocusEnd I

24、f-14-华东交通大学理工学院课程设计报告End SubPrivate Sub Text2_GoFocus()Adodc1.RecordSource = "select* from power2 where userregname= '"& Text1& "'"Adodc1.Refresh End IfMsgBox "无此用户，请重新输入 !", , " 提示 " Text1.Text = ""Text1.SetFocus End IfEnd SubPrivate

25、 Sub Text2_Change()Adodc1.RecordSource = "select* from power2 where userregname= '"& Text1& "'"Adodc1.RefreshEnd IfEnd Sub基础信息管理：Private Sub Command1_Click()On Error Resume NextCommand2.Enabled = FalseCommand3.Enabled = FalseCommand4.Enabled = TrueCommand5.Enabled

26、 = FalseIf Command1.Caption = "添加 " ThenCommand1.Caption = "确认 "Text4.SetFocusElseCommand1.Caption = " 添加 "Command2.Enabled = TrueCommand3.Enabled = TrueCommand5.Enabled = TrueEnd IfEnd SubPrivate Sub Command2_Click()On Error Resume NextEnd Sub-15-华东交通大学理工学院课程设计报告Privat

27、e Sub Command3_Click()On Error Resume NextCommand1.Enabled = FalseCommand2.Enabled = FalseCommand4.Enabled = TrueCommand5.Enabled = FalseIf Command3.Caption = "修改 " ThenCommand3.Caption = "确认 "Text4.SetFocusElseCommand3.Caption = " 修改 "Command1.Enabled = TrueCommand2.En

28、abled = TrueCommand5.Enabled = TrueEnd IfEnd SubPrivate Sub Command5_Click(Index As Integer)Frame1.Visible = TrueEnd Sub进货管理：Private Sub Command1_Click()On Error Resume NextCommand2.Enabled = FalseCommand3.Enabled = FalseCommand4.Enabled = TrueCommand5.Enabled = FalseIf Command1.Caption = "添加 &

29、quot; ThenCommand1.Caption = "确认 "Text1.SetFocusElseCommand1.Caption = " 添加 "Command2.Enabled = TrueCommand3.Enabled = TrueCommand5.Enabled = TrueEnd IfEnd SubPrivate Sub Command2_Click()End SubPrivate Sub Command3_Click()-16-华东交通大学理工学院课程设计报告On Error Resume NextCommand1.Enabled =

30、 FalseCommand2.Enabled = FalseCommand4.Enabled = TrueCommand5.Enabled = FalseIf Command3.Caption = "修改 " ThenCommand3.Caption = "确认 "Text1.SetFocusElseCommand3.Caption = " 修改 "Command1.Enabled = TrueCommand2.Enabled = TrueCommand5.Enabled = TrueEnd IfEnd SubPrivate Sub

31、Command5_Click(Index As Integer)Frame1.Visible = TrueEnd SubPrivate Sub Label3_Click(Index As Integer)End Sub销售管理：Private Sub Command1_Click()On Error Resume NextCommand2.Enabled = FalseCommand3.Enabled = FalseCommand4.Enabled = TrueCommand5.Enabled = FalseIf Command1.Caption = "新增 " ThenC

32、ommand1.Caption = "确认 "Text4.SetFocusElseCommand1.Caption = " 新增 "Command2.Enabled = TrueCommand3.Enabled = TrueCommand5.Enabled = TrueEnd IfEnd SubPrivate Sub Command2_Click()On Error Resume Next-17-华东交通大学理工学院课程设计报告Private Sub Command3_Click()On Error Resume NextCommand1.Enabled = FalseCommand2.Enabled = FalseCo