医院收费管理系统毕业设计说明书

1、毕业设计(论文) 需要全套：联系qq625880526 或手算机系.02级电子与信息技术专业(delphi)数据库管理系统 (目录)第一部分 引言1.1 -任务或问题：1.2 -实际背景：1.3 -我的工作1.4 -特色（创新）第二部分 毕业设计课题2.1 -设计课题2.2 -设计时间2.3 -设计人员及任务2.4 -指导老师2.5 -设计内容第三部分 系统方案论证3.1-软件定义3.2-体系结构规划第四部分 毕业设计内容 4.1-功能模块分析 4.2-模块1功能实现4.3-模块2功能实现4.4-模块3功能实现4.5-模块4功能实现4.6-模块5功能实现4.7-数据库

2、分析4.8-系统界面实现第五部分 毕业设计心得体会第六部分 附录 6.1-代码部分参考文献 摘要本次毕业设计任务是通过开发一个数据库校医院门诊收费管理系统，学习用delphi开发分布式多层数据库系统。采用delphi7.0和ms server2000等软件为开发工具；通过对计算机硬件和软件解决方案的论证；对应用领域进行调查分析；参考各种资料和进行数据库编程实践。在我指导老师的帮助下，已经基本上成功地实现了设计任务书的要求。使得设计的数据库系统能够实现一般数据库的管理。我们研究了数据库的查询优化问题。第一部分 引 言1.1任务或问题：开发一个医院门诊收费管理系统，可以实现动态的连接应用程序服务器

3、，只要对配置文件进行配置，就可以像网上邻居一样选择所要连接的应用程序服务器。并能实现门诊收费,划价;药品管理,住院管理;医务人员管理及各种查询,报表等功能。1.2实际背景：随着社会发展，人类的生产、生活越来越离不开信息。谁拥有了更多更有效的信息，谁就将在竞争中处于有利地位。信息产业正在成为一个国家的支柱。数据作为信息的载体，其管理工具数据库对于信息技术的重要性，正日益得到人们的重视。只有拥有了先进的数据库技术，才能有效地管理好浩如烟海的数据，并从中提取出对自己有用的信息来加以利用。90年代，人们开发mis系统大都采用客户机/服务器结构，客户机/服务器结构既是硬件结构又是软件结构。即数据放在服务

4、器上，程序在客户机上。进行数据访问时，由客户机提出请求（一般是sql语句），服务器执行并给出结果。客户机/服务器对于优化了网络，提高了系统的利用率。客户机/服务器体系结构的发展经历了从二级体系结构模式到三级体系结构模式。我校医院目前仍然是人工手动计算,整理,查询医院门诊,药房,病房等各项工作,执行效率非常低,不方便,给医务人员带来了不少麻烦;现在已是21世纪,为了跟上时代的发展,实现信息网络化,有我建议,石家庄职业技术学院校医院院长( ) 决定并批准开发此项系统.在校学习期间,我们电子与信息技术专业没有开过(delphi 程序设计课程,sql server 数据库)等相关技术性学科,所以我是在

5、学习阶段边学习边开发.(有难度).1.3我的工作 设计系统框架，设计数据库，编写代码，测试数据等。 对整个软件进行全面分析,制作,完成等.1.4特色（创新）数据库连接不需要手动连接,采用智能连接方式。第二部分 毕业设计课题2.1 设计课题石家庄职业技术学院校医院门诊收费管理系统.2.2 设计时间二五年5月至二五年5月底2.3 设计人员及任务莫建坡-整个软件:分析,制作及完成.2.4 指导老师吴健老师2.5 设计内容利用delphi7.0和ms server2000为主要开发工具，以windows server2000为开发平台。设计出医院门诊收费管理系统。可以实现数据库连接不需要手动连接,采用

6、智能连接方式; 医院门诊收费管理系统应实现: 门诊收费,划价;药品管理,住院管理; 医务人员管理及各种查询,报表等功能。第三部分 系统方案论证3.1软件定义 数据库设计所要的解决的问题是：对于一个给定的应用领域，设计优化的数据库逻辑和物理结构，使之满足用户的信息管理要求和数据操作要求，有效地支持各种应用系统的开发和运行。数据库设计的目标是为用户和各种应用系统提供一个高效的运行环境。而数据库的设计可以视为如下的优化问题。（1） 计算机的软硬件环境；（2） 数据库管理系统的能力；（3） 用户的操作要求与信息要求；（4） 完整性和安全性约束。3.2 体系结构规划本次设计的系统采用客户/服务器体系，为

7、了便于理解，我们先从二层客户/服务器体系结构来阐述：客户/服务器是在网络基础上，以数据库管理为后援，以计算机为网上工作站的一种系统结构。该结构的关键在把网络环境上的数据库存取和应用程序一分为二，分别由网上的数据库服务器和网上客户来执行。虽然本系统客户/服务器是建立在lan的基础上，但它比以往的文件服务系统有了很大的改进。首先，它消除了不必要的网络传输负担；其次，它可以使作为数据库服务器的计算机被高度优化，以适应数据处理的需要。客户/服务器已经能够应用于复杂的网络上，并使之能够更有效地进行选择、检索、索引排序等数据处理。作为一种高级的分布式计算机环境、客户/服务器有足够的能力把处理后的结果（不是

8、整个文件）通过网络传输出去，并根据用户需求灵活地配置各种大、中、小型计算机系统。3.3 系统设计数据流图病人管理人员 医院收费管理系统 管理要求 查询要求 管理结果 查询结果 （顶层数据流图）数据库设计过程数据库的设计过程如下图所示。在数据库设计过程中，需求分析和概念设计可以独立于任何数据库管理系统进行。逻辑设计和物理设计与具体的数据库管理系统密切相关。由于需求分析比较重要。我们在设计的时候，花了比较多的时间。在获得这些资料之后，进行分析。从中提取有用的部分。分析各种用户的权限。现实世界 需求分析 需求分析说明书 概念数据库设计 概念数据库模式 独立于数据 （高级数据模型） 库管理系统 与数据

9、库管逻辑数据库设计 理系统相关 逻辑数据库模式 （特定数据模型）物理数据库设计 物理数据库模式 （特定的物理存储结构和存取方式） 图：数据库设计过程系统模块图:医院收费管理系统门诊管理药品管理住院管理医务人员管理辅助资料管理系统设置财务管理第四部分 毕业设计内容4.1-功能模块分析门诊收费管理模块图:门诊管理系统门诊挂号管理门诊划价管理门诊收费管理门诊取药管理药品管理模块图:药品管理药品入库药品出库药品库存住院管理模块图:住院管理入院登记交预交款住院划价收费配药出院结算医务人员管理模块图:医务人员管理医务人员登记部门维护职务维护医务值班人员管理辅助资料管理模块图:辅助资料管理药品分类管理药品种

10、类维护计量单位维护治疗种类维护系统设置系统设置模块图:系统等待用户注册修改密码数据备份数据还原计算器打开本院主页帐目管理模块:财务管理月结算管理每日结算管理数据库表管理4.2-模块1功能实现门诊收费管理:门诊收费管理主要完成:病人挂号,药品收费,划价,等功能管理,并且能够对药房药品进行动态的调整,所使用的数据表:挂号表:3挂号编号int401病人姓名char2001病人班级char3011挂号日期datetime801挂号科室char2001挂号类型char2001挂号金额money80门诊收费明细表:2编号int400挂号编号int400收费名称char2500计量单位char1000数量i

11、nt400收费单价money800收费金额money801药品种类char101门诊收费结算表:2编号int400挂号编号int400患者姓名char2000结算日期datetime800西药费money810中药费money810中成药费money810手术费money810输液费money810检查费money810治疗费money810化验费money810拍片费money810其它费money810主治医生char2011总费用额money81挂号功能界面:门诊收费，划价管理功能界面:门诊流程图:4.3-模块2功能实现药品管理主要完成:药品的入库,出库,库存统计,药品价格管理:所使用的

12、数据表:药品入库总表:2入库总表编号int400入库操作员char2000入库日期datetime801入库备注text161药品入库明细表:2入库明细编号int400入库总表编号int400药品名称char3000药品种类char1000计量单位char1000药品出厂日期datetime810药品过期日期datetime810进货日期datetime810进货公司int410药品单价money800药品数量int401药品总金额money80药品出库表:2编号int400出库操作员char2000出库日期datetime800出库药品名char2500出库药品种类char1010出库价格m

13、oney800出库数量int401备注text161药商表:2药商编号int401药商公司名char300药品库存表:2编号int400药品名称char2510药品种类char1010生产日期datetime810过期日期datetime810计量单位char1010药品进价money810药品售价money810药品数量int411备注text161药品入库功能界面:药品填写单界面:药品出库功能界面:药品管理流程图:4.4-模块3功能实现住院管理功能实现:住院预交款,住院收费,医药管理,住院结算管理;所用的数据表:预交款信息表:2编号int400交款姓名char2010预交金额money80

14、0交款次数int400交款日期datetime801病房号int40住院收费明细表:2编号int400病房号int400收费名称char3000种类char1000数量int400单价money801金额money81住院收费结算表:2编号int400病房号int400病人姓名char2000收费日期datetime800主治医生char2000药费money810手术费money810病房费money810其它费money811总金额money81出院结算信息表:2编号int400病房号int400出院日期datetime800住院总金额money801找还金额money81预交款信息功能界

15、面:住院收费,划价，医药管理功能界面:出院管理功能界面:4.5-模块4功能实现医务人员管理功能实现:医务人员注册,修改,维护,值班维护及各科室部门维护等所用到的数据表:医务人员信息表:2编号int400姓名char2000部门科室char2000职务char3000联系电话char1510星期1bit100星期2bit100星期3bit100星期4bit100星期5bit100星期6bit101星期7bit10医生表:2编号int400医生姓名char2001医生职务char250工作休息代码表:2编号int401休息值char100科室表:2科室号int401科室名char300职务表:2编

16、号int401职务名称char200医务人员管理功能界面:值班人员管理功能界面:科室维护功能界面:部门维护功能界面:4.6-模块5功能实现院长查询管理:药品价格整体调价控制,单个药品调价控制,用户注册管理等功能;药品价格调价控制管理界面:用户注册界面:4.7-数据库数据库所用到的数据表:create table 住院收费明细表 (create table 住院收费结算表 (create table 出院结算信息表 (create table 医务人员信息表 (create table 医生表 (create table 工作休息代码表 (create table 当日进帐表 (create t

17、able 挂号类型 (create table 挂号表 (create table 病房状态表 (create table 登陆表 (create table 科室表 (create table 职务表 (create table 药品入库总表 (create table 药品入库明细表 (create table 药品公司表 (create table 药品出库表 (create table 药品库存表 (create table 门诊收费明细表 (create table 门诊收费结算表 (create table 预交款信息表 (能够对数据库进行备份，还原操作等功能;4.8-系统界面实现

18、系统界面主要是对各功能界面实现中转,间接管理;系统功能界面:根据用户需求:增加了一个计算器,和简单记话本;用户登陆界面:第五部分毕业设计心得体会及结论在老师的指导下。本次毕业设计，就要画上一个句号了。可是，对我来说，这次设计的本身所产生的影响，还远远没有结束，我从本次毕业设计中学到了许多课本上没有的知识。从设计任务书的下达到今天基本实现任务书中的设计要求，时间已整整过去了1个月。在这1个月中。通过自己的学习和努力；通过各位老师的指导和教育，使我不仅仅在知识水平和解决实际问题的能力上有了很大的提高。还从思想的深处体会到，要把自己的所学变成现实时所将面对的种种难题。由于我平时的课程理论知识学的还可

19、以，我总是认为自己的知识水平已经能处理许多的现实问题了。而当自己真正的深入到设计实践当中,深入到问题当中时。我竟然发现自己无从下手，我开始怀疑我是否真正的学到了知识。也只有到了那个时候，我才真正体会到学会运用自己的能力与知识是何等的重要，知识是在课堂上，老师教授的，在书本中学到的，实践则是要自己动手，自己去做才能掌握。在老师们的关心和帮助下，我渐渐的开始了设计。根据老师的建议，我找来了数据库设计与建设的相关书籍和资料，从最基本的问题入手开始一个个的解决我心中的疑惑。 这是一个漫长的学习过程。随着时间的推移，我开始慢慢的掌握了设计时所需要的知识。我也终于明白了大学三年学习的意义和作用。扎实的基本

20、功和良好的学习习惯，能使自己在学习新知识有更深刻的认识力和更快的领会力。同时老师对毕业设计的重视也是我能完成设计的一个重要条件。为了保证我们毕业设计的正常进行，学院抽调了优秀的老师指导我们进行毕业设计，提供良好的设备给我们，在软硬件上支持我们进行毕业设计，并且不时地询问我们毕业设计的进展情况。为我们这次设计的正常开展提供了必要的物质基础。关于本次设计的命题，我的设计只能提供其基本的功能。还有许多的设想由于时间和自身和因素无法得以实现，这不能不说是本次设计的遗憾之处。不过，至少它已经启发了自己的思维，提高了我的动手能力，这是我在课本中学不到的。它为我们在以后的工作岗位上发挥自己的才能奠定了坚实的

21、基础。第六部分附录6.1-代码部分系统界面代码:unit main;interfaceuses windows, messages, sysutils, variants, classes, graphics, controls, forms, dialogs, extctrls, imglist, menus, comctrls, toolwin, jpeg, stdctrls, db, adodb;type tmain1 = class(tform) panel1: tpanel; pagecontrol2: tpagecontrol; tabsheet5: ttabsheet; stat

22、ictext5: tstatictext; groupbox1: tgroupbox; label_gh: tlabel; label_mzbagl: tlabel; label_cxhbb: tlabel; groupbox2: tgroupbox; label1: tlabel; label2: tlabel; label3: tlabel; b_go2: tbutton; groupbox3: tgroupbox; richedit1: trichedit; tabsheet6: ttabsheet; tabsheet7: ttabsheet; tabsheet9: ttabsheet;

23、 tabsheet10: ttabsheet; panel2: tpanel; pagecontrol1: tpagecontrol; tabsheet1: ttabsheet; image1: timage; tabsheet2: ttabsheet; tabsheet3: ttabsheet; statusbar1: tstatusbar; toolbar1: ttoolbar; toolbutton1: ttoolbutton; toolbutton2: ttoolbutton; toolbutton7: ttoolbutton; toolbutton8: ttoolbutton; to

24、olbutton6: ttoolbutton; toolbutton9: ttoolbutton; toolbutton5: ttoolbutton; toolbutton10: ttoolbutton; toolbutton4: ttoolbutton; toolbutton3: ttoolbutton; mainmenu1: tmainmenu; n11: tmenuitem; n1: tmenuitem; n2: tmenuitem; n3: tmenuitem; n4: tmenuitem; n21: tmenuitem; n5: tmenuitem; n6: tmenuitem; n

25、7: tmenuitem; n27: tmenuitem; objectn17tmenuitem1: tmenuitem; n28: tmenuitem; n29: tmenuitem; n31: tmenuitem; n8: tmenuitem; n9: tmenuitem; n10: tmenuitem; n12: tmenuitem; n41: tmenuitem; n51: tmenuitem; n13: tmenuitem; n14: tmenuitem; n15: tmenuitem; n52: tmenuitem; n16: tmenuitem; n61: tmenuitem;

26、n71: tmenuitem; n20: tmenuitem; n22: tmenuitem; n23: tmenuitem; n24: tmenuitem; n26: tmenuitem; n30: tmenuitem; n72: tmenuitem; n25: tmenuitem; imagelist1: timagelist; timer1: ttimer; b_go1: tbutton; groupbox4: tgroupbox; groupbox5: tgroupbox; groupbox6: tgroupbox; image2: timage; image3: timage; me

27、mo1: tmemo; groupbox7: tgroupbox; groupbox8: tgroupbox; groupbox9: tgroupbox; label4: tlabel; label5: tlabel; image4: timage; image5: timage; groupbox10: tgroupbox; groupbox11: tgroupbox; groupbox12: tgroupbox; image6: timage; image7: timage; image8: timage; toolbutton11: ttoolbutton; adoquery1: tad

28、oquery; procedure formclose(sender: tobject; var action: tcloseaction); procedure b_go1click(sender: tobject); procedure b_go2click(sender: tobject); procedure formshow(sender: tobject); procedure timer1timer(sender: tobject); procedure jishibenclick(sender:tobject); procedure calculateclick(sender:

29、tobject); procedure yaopinglclick(sender:tobject); procedure image2click(sender: tobject); procedure menzhenglclick(sender:tobject); procedure image3click(sender: tobject); procedure toolbutton9click(sender: tobject); procedure image4click(sender: tobject); procedure image5click(sender: tobject); pr

30、ocedure label5click(sender: tobject); procedure ywryzbglclick(sender:tobject); procedure toolbutton8click(sender: tobject); procedure image6click(sender: tobject); procedure image7click(sender: tobject); procedure image8click(sender: tobject); procedure tuichuclick(sender:tobject); procedure n20clic

31、k(sender: tobject); procedure n22click(sender: tobject); procedure toolbutton11click(sender: tobject); procedure n16click(sender: tobject); procedure toolbutton3click(sender: tobject); procedure n23click(sender: tobject); procedure n26click(sender: tobject); private private declarations public publi

32、c declarations end;var main1: tmain1;implementation$r *.dfm uses mzgh,mzshg,login,book,calculate1,yaorukugl,yaochukugldan, ywrydj,ksgl11,zwgl11,zbgl11,zyxkgl11,zyglzong11,cygl11,yzgl11,mimagai11,yztjgl11, jinzhanggl11,dmshuju11,connect;procedure tmain1.formclose(sender: tobject; var action: tcloseac

33、tion);begin application.terminate;end;procedure tmain1.b_go1click(sender: tobject);begin mzghd:=tmzghd.create(application); mzghd.show;end;procedure tmain1.b_go2click(sender: tobject);begin mzshgf:=tmzshgf.create(application); mzshgf.show;end;procedure tmain1.formshow(sender: tobject);begin statusba

34、r1.panels0.text:=:; statusbar1.panels2.text:=formatdatetime(yyyy-mm-dd hh:nn:ss mmmm dddd, now); statusbar1.panels1.text:= +login.form1.dbedit1.text; statusbar1.panels3.text:=; timer1.enabled:=true; tabsheet5.visible:=true; tabsheet6.visible:=false; tabsheet7.visible:=false; tabsheet9.visible:=false

35、; tabsheet10.visible:=false; tabsheet5.caption:=; pagecontrol2.refresh;end;procedure tmain1.timer1timer(sender: tobject);begin statusbar1.panels2.text:=formatdatetime(yyyy-mm-dd hh:nn:ss mmmm dddd, now);end;procedure tmain1.jishibenclick(sender:tobject);begin book.jishiben:=book.tjishiben.create(app

36、lication); if book.jishiben.showmodal=mrok then begin book.jishiben.memo1.lines.savetofile(love.txt); book.jishiben.free; toolbutton5.down:=false; end;end;procedure tmain1.calculateclick(sender:tobject);begin calculate1.calculate:=calculate1.tcalculate.create(application); calculate1.calculate.show;

37、end;procedure tmain1.yaopinglclick(sender:tobject);begin if toolbutton7.down then begin tabsheet6.visible:=true; tabsheet5.visible:=false; tabsheet7.visible:=false; tabsheet9.visible:=false; tabsheet10.visible:=false; tabsheet5.caption:=; pagecontrol2.refresh; end;end;procedure tmain1.image2click(se

38、nder: tobject);begin yaorukugl.rukuf:=yaorukugl.trukuf.create(application); yaorukugl.rukuf.show; yaorukugl.flag:=true;end;procedure tmain1.menzhenglclick(sender:tobject);begin if toolbutton2.down then begin tabsheet5.visible:=true; tabsheet6.visible:=false; tabsheet7.visible:=false; tabsheet9.visib

39、le:=false; tabsheet10.visible:=false; tabsheet5.caption:=; pagecontrol2.refresh; end;end;procedure tmain1.image3click(sender: tobject);begin yaochukugldan.yaochukugl:=yaochukugldan.tyaochukugl.create(application); yaochukugldan.yaochukugl.show;end;procedure tmain1.toolbutton9click(sender: tobject);b

40、egin if toolbutton9.down then begin tabsheet9.visible:=true; tabsheet6.visible:=false; tabsheet7.visible:=false; tabsheet5.visible:=false; tabsheet10.visible:=false; tabsheet5.caption:=; pagecontrol2.refresh; end;end;procedure tmain1.image4click(sender: tobject);begin ywrydj.register1:=ywrydj.tregis

41、ter1.create(application); ywrydj.register1.show;end;procedure tmain1.image5click(sender: tobject);begin ksgl11.keshigldd:=ksgl11.tkeshigldd.create(application); ksgl11.keshigldd.show;end;procedure tmain1.label5click(sender: tobject);begin zwgl11.zhiwugl:=zwgl11.tzhiwugl.create(application); zwgl11.z

42、hiwugl.show;end;procedure tmain1.ywryzbglclick(sender:tobject);begin zbgl11.ywzbgl:=zbgl11.tywzbgl.create(application); zbgl11.ywzbgl.show;end;procedure tmain1.toolbutton8click(sender: tobject);begin if toolbutton8.down then begin tabsheet7.visible:=true; tabsheet6.visible:=false; tabsheet5.visible:

43、=false; tabsheet9.visible:=false; tabsheet10.visible:=false; tabsheet5.caption:=; pagecontrol2.refresh; end;end;procedure tmain1.image6click(sender: tobject);begin zyxkgl11.zyyjgl:=zyxkgl11.tzyyjgl.create(application); zyxkgl11.zyyjgl.show;end;procedure tmain1.image7click(sender: tobject);begin zyglzong11.zyglzong:=zyglzong11.tzyglzong.create(application); zyglzong11.zyglzong.show;end;procedure tmain1.image8click(sender: tobject);begin cygl11.cygl:=cygl11.tcygl.create(applic