药房管理系统的设计.doc
《药房管理系统的设计.doc》由会员分享,可在线阅读,更多相关《药房管理系统的设计.doc(28页珍藏版)》请在沃文网上搜索。
1、课程设计任务书及成绩评定课程设计的任务和具体要求课程设计要求设计一个小型药库管理系统,应能反应出学生综合利用所学知识完成一定的设计任务的能力,反映出学生理论联系实践的动手能力。具体要求如下:(1)明确所要开发系统的设计任务;(2)做好需求分析,合理选择设计方案;(3)合理设计数据库中各个表的结构及其关系;(4)能够设计出美观大方的程序界面;(5)养成良好的代码书写习惯;(6)在编写程序过程中应注意相关文档的编写;(7)综合应用Delphi各种组件实现程序功能;(8)认真撰写课程设计总结报告。指导教师签字: _ 日期: 指导教师评语成绩:_ 指导教师签字: 日期: 课程设计所需软件、硬件等n 硬
2、件环境:Iterl(R) Core(TM)2 Duo CPU,主频2.31GHz;内存3G; 硬盘320G以上;1024768显示分辨率n 软件环境: Delphi 7.0 SQL Server 2005课程设计进度计划起至日期工作内容备注2012.11.28-2012.12.52012.12.6-2012.12.162012.12.17-2012.12.28明确设计思路,设计整体框架和数据库建立整体框架,初步填写各项目代码优化窗体代码,添加皮肤和打印组件 完成整体设计并美化完成完成完成参考文献、资料索引序号文献、资料名称编著者出版单位1 李目海.delhpi应用程序设计M北京:枣庄学院计算机
3、科学系,20122 侯炳辉,沈林兴,彭澎.毕业设计案例择选M.北京:清华大学出版社,20003 施新刚.实效编程百例M.北京:人民邮电出版社,20044 谭浩强.Delphi 程序设计M.北京:清华大学出版社,20005 东名,吴名月.access 数据库管理实务M.北京:人民邮电出版社,20026 乔林.参透Delphi M.北京:中国铁道出版社,2003:75-1567 沈才梁.Delphi 7.0程序设计教程M.北京:北方交通大学出版社,20048 张海藩.软件工程导论M北京:清华大学出版社,1998 目 录1系统介绍. 22 数据库表的结构描述及其关系 22.1数据库概要设计 . 22
4、.2 数据库设计. 32.3 详细设计及具体功能的实现 . 4 2.3 性能需求 . 53 软件的模块结构图. 54 主要功能模块的流程图. 65主要功能的实现代码. 76程序运行效果及其分析. 347总结. 36 正文1.系统介绍药房等单位的药品信息和数据纷乱复杂,整理统计费力费时。要做好对企业的管理,企业就必须快速准确地获取自己企业单位的信息,这就要求及时统计数据并方便查看,以及对企业的数据信息进行维护。本软件是利用DELPHI 7.0设计开发的药房管理系统,是药房信息系统的一个重要组成部分,可实现对药房药品信息的分类管理和数据分析,从而使信息整理快速、准确、简单,以便于相关部门给予统筹安
5、排,从而提高改进传统的管理方法,提高企业管理水平。本文所叙述的内容以及程序代码都是医院药品管理中的常见问题。药房管理系统应具有如下功能模块:(1).药品信息部分:对药品信息的添加,删除修改及查询功能的实现.完成对药品的管理. (2).库存管理部分:对保存药品的库房进行管理,出入库的时间,药品等信息的录入。(3).销售信息部分:包括对药品的销售情况及销售信息的查询.(4).用户权限管理部分:系统的退出的实现.(5).帮助部分:用户对系统不理解的时候给与帮助和指导.(6).打印部分:实在药品信息、销售和库存的信息的打印.2.数据库表的结构描述及其关系21 数据库概要设计 根据数据库的要求分析,确定
6、该管理系统应具有的数据实体和数据实体的属性。在医院及药店的药品管理系统中包括的实体对象有药品实体、供应商实体、客户实体、操作员实体等。其每个实体的属性关系如下:1、 药品实体中主要包括商品名称、简称、批号、产地、规格、单位、进价、库存等属性,该实体关系如图2.3所示药品简称产地商品名称规格时间单位库存批号进价图2.3 药品实体图 2.客户实体包括客户编号、客户全称、地址、联系人、电话、其中编号是为每个固定顾客作的编号码,以便查找操作。其客户实体关系如图2.4所示:名称地址编号客户联系电话联系人图2.4 客户实体图2.2数据库的设计我采用了SQL Server2005作为后台数据库。1、用户表(
7、table_1):包括操作员和密码;主要用来保存用户信息和密码。2、入库表(table_3):包括商品名称、简称、批号、产地、规格、包装、单位、数量、进价、金额、备注、供应商、日期、经手人、票号,用来保存商品入库的详细信息。3、销售表(table_2):包括商品名称、批号、产地、规格、包装、单位、数量、单价、金额、备注、客户、日期、经手人、票号,用来保存商品销售的详细信息。 药房的药品管理系统的数据库E-R图如图 :库存实体中是药品的相关信息,包括商品名称、产地和批号,他和其他表的关系全部为1对多关系,入库单,销单,入库退单,销售退单都和它有主外键的关系。供应商和客户这两个实体也是作为引用实体
8、存在的,供应商和入库单实体和入库退单实体发生关系,客户和销售单和销售退单发生1对多关系。23 详细设计及系统功能的实现 经过上述的需求分析和系统分析以及数据库的设计,确定药房的药品管理系统的全部功能和所需数据库,下面根据系统详细设计的任务要求,对该软件进行详细的设计及功能实现。在此过程中采用结构化的设计方法,来改善控制结构,降低程序的复杂度,从而提高程序的可读性、可测试性、可维护性。软件结构:该软件顶层数据流图如图。登录操作员身份验证数据处理24 性能需求1、数据精确度查询时应保证查全率,所有相应域包含查询关键字的记录都应能查到。查询时应保证查准率,查到的记录应与给定的单项或组合查询条件完全匹
9、配。2、时间特性一般操作的响应时间应在12秒内,对数据的导入和导出也应在可接受的时间内完成。3、适应性满足个人使用的需求。对前面提到的运行环境要求不应存在困难。3. 软件的模块结构图医药管理系统从功能上可以划分为如下几个功能模块4. 主要功能模块的流程图 药房的药品管理系统所处理的信息较多,功能强大,其基于药品管理的系统流程如图2.2所示: 销 售 作 业客 户表 供 应 商销 售 信 息表入 库 作 业表销 售 查 询表库 存 盘 点表库 存 查 询表价 格 管 理表库存信息管理系统 退货返厂管理系统 入库信息管理系统 客户退货管理系统 入库查询管理系统 医药管理系统的系统流程图5. 主要功
10、能的实现代码Preject1:program Project1;uses Forms, windows, Unit1 in Unit1.pas Form1, Unit2 in Unit2.pas Form2, Unit3 in Unit3.pas Form3, Unit4 in .2012-12-15改Unit4.pas Form4, Unit5 in .2012-12-15改Unit5.pas Form5, Unit6 in .2012-12-15改Unit6.pas Form6, Unit7 in .2012-12-27Unit7.pas Form7;$R *.resbegin Appli
11、cation.Initialize; form2:=Tform2.Create(application); form2.Show; form2.Update; sleep(3000); form3:=Tform3.Create(application); form2.Free; if form3.ShowModal=100 then begin Application.CreateForm(TForm1, Form1); end; Application.Run;End.unit1:unit Unit1;interfaceuses Windows, Messages, SysUtils, Va
12、riants, Classes, Graphics, Controls, Forms, Dialogs, Menus, ExtCtrls, jpeg;type TForm1 = class(TForm) MainMenu1: TMainMenu; N1: TMenuItem; N2: TMenuItem; N3: TMenuItem; N4: TMenuItem; N6: TMenuItem; N5: TMenuItem; Image1: TImage; N7: TMenuItem; procedure N2Click(Sender: TObject); procedure N1Click(S
13、ender: TObject); procedure N3Click(Sender: TObject); procedure N6Click(Sender: TObject); procedure N4Click(Sender: TObject); procedure N7Click(Sender: TObject); private Private declarations public Public declarations end;var Form1: TForm1;implementation uses unit4,unit5,unit6,unit7;$R *.dfmprocedure
14、 TForm1.N2Click(Sender: TObject);beginform5:=Tform5.create(self);form5.Show;end;procedure TForm1.N1Click(Sender: TObject);beginform4:=Tform4.create(self);form4.Show ;end;procedure TForm1.N3Click(Sender: TObject);beginform6:=Tform6.create(self);form6.Show;end;procedure TForm1.N6Click(Sender: TObject)
15、;begin showmessage(有问题找百度!);end;procedure TForm1.N4Click(Sender: TObject);begin form7:=Tform7.create(self); form7.Show;end;procedure TForm1.N7Click(Sender: TObject);begin form1.Close;end;End.Unit2:unit Unit2;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dia
16、logs, jpeg, ExtCtrls, bsMessages;type TForm2 = class(TForm) Image1: TImage; private Private declarations public Public declarations end;var Form2: TForm2;implementation$R *.dfmEnd.Unit3:unit Unit3;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCt
17、rls, DB, ADODB, jpeg, ExtCtrls, bsSkinData, BusinessSkinForm;type TForm3 = class(TForm) Image1: TImage; Label1: TLabel; Label2: TLabel; Edit1: TEdit; Edit2: TEdit; Button1: TButton; Button2: TButton; Button3: TButton; DataSource1: TDataSource; ADOConnection1: TADOConnection; ADOQuery1: TADOQuery; AD
18、OTable1: TADOTable; bsBusinessSkinForm1: TbsBusinessSkinForm; bsSkinData1: TbsSkinData; bsStoredSkin1: TbsStoredSkin; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); private Private declarations public Public declarations end;var Form3: TForm3;implementationuses Uni
19、t1, Unit2;$R *.dfmprocedure TForm3.Button1Click(Sender: TObject);begin ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add(select * from table_1 where 用户名=+edit1.Text+and +密码=+edit2.Text+ ); ADOQuery1.Open; if ADOQuery1.Eof then begin showmessage(用户号或密码不正确); end else begin ModalResult := 100; /用
- 1.请仔细阅读文档,确保文档完整性,对于不预览、不比对内容而直接下载带来的问题本站不予受理。
- 2.下载的文档,不会出现我们的网址水印。
- 3、该文档所得收入(下载+内容+预览)归上传者、原创作者;如果您是本文档原作者,请点此认领!既往收益都归您。
下载文档到电脑,查找使用更方便
10 积分
下载 | 加入VIP,下载更划算! |
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 药房 管理 系统 设计