医院信息系统试验报告

1、海南医学院计算机网络技术专业(医学方向)课程设计报告书课程名称 医院信息系统 课程设计题目 制作一个简单医院系统 课程设计日期 _2012_年4月 起 _2012_年5月 止学生姓名_谢荣权_ 班级_计算机网络专科_学号_110224017_指导教师_刘伟_ 课程设计报告书课程设计报告书目录范例目录范例目录目录第第 1 1 章章 绪论绪论 .第第 2 2 章章 系统分析系统分析 .2.12.1 选择开发工具选择开发工具 .2.22.2 需求分析需求分析 .第第 3 3 章章 系统总体设计系统总体设计 .3 31 1 系统功能系统功能 .3 32 2 系统流程图系统流程图 .3 33 3 数据库

2、的设计数据库的设计 .3 34 4 数据库的逻辑设计数据库的逻辑设计 .3 35 5 数据库的表间关系数据库的表间关系 . 第第 4 章章 34.14.1 界面设计界面设计 .4.24.2 代码设计代码设计 .结论：结论： .参参 考考 文文 献献1 1、绪论、绪论随着计算机技术的飞速发展，计算机信息处理技术已经渐渐应用于医院业务活动的随着计算机技术的飞速发展，计算机信息处理技术已经渐渐应用于医院业务活动的各个反面。目前在医学信息学领域中，应用最多，涉及面最广的是医院信息系统。各个反面。目前在医学信息学领域中，应用最多，涉及面最广的是医院信息系统。医院信息系统是一项非常繁重而枯燥的劳动，耗费许

3、多人才和物力建立医院信息医院信息系统是一项非常繁重而枯燥的劳动，耗费许多人才和物力建立医院信息管理系统，采用计算机对医院进行管理与查询，进一步提升医院住院管理效益和现代化管理系统，采用计算机对医院进行管理与查询，进一步提升医院住院管理效益和现代化水平帮助提高医院管理人员工作效率，实现医院管理工作流程的系统化、规范化和自水平帮助提高医院管理人员工作效率，实现医院管理工作流程的系统化、规范化和自动化。动化。2 2 、系统分析、系统分析 选择开发工具选择开发工具前端环境：前端环境：Visual studio 2010； 后台数据库：后台数据库：SQL server 2008； 需求分析需求分析系统开

4、发的总体任务是实现各种信息的系统化、规范化和自动化。系统开发的总体任务是实现各种信息的系统化、规范化和自动化。 系统功能分析是在系统开发的总体任务的基础上完成。医院信息系统需要完成功能系统功能分析是在系统开发的总体任务的基础上完成。医院信息系统需要完成功能主要有：主要有： 病人基本信息的添加、修改、删除，包括病人编号、姓名、性别、年龄、有效证病人基本信息的添加、修改、删除，包括病人编号、姓名、性别、年龄、有效证件名称、证件号码等。件名称、证件号码等。 病人基本信息的查询，包括病人编号、姓名、性别、年龄、有效证件名称、证件病人基本信息的查询，包括病人编号、姓名、性别、年龄、有效证件名称、证件号码

5、等。号码等。 科室管理添加、修改与删除，包括病科室编号、科室名称、科室简介等。科室管理添加、修改与删除，包括病科室编号、科室名称、科室简介等。 医院管理人员的基本信息添加、修改、删除，包括医院管理人员的编号、姓名、医院管理人员的基本信息添加、修改、删除，包括医院管理人员的编号、姓名、所在科室等。所在科室等。 药品管理的添加、修改、删除，包括药品编号、药品名称、药品单位、药品规格、药品管理的添加、修改、删除，包括药品编号、药品名称、药品单位、药品规格、生产产家、购入价格、销售价格、库存数量等。生产产家、购入价格、销售价格、库存数量等。病人挂号信息的登记，包括病人编号、姓名、性别、年龄、证件类型、

6、证件号码、病人挂号信息的登记，包括病人编号、姓名、性别、年龄、证件类型、证件号码、挂号所在科室、挂号的类型、挂号费等。挂号所在科室、挂号的类型、挂号费等。 病人信息的改号、退号，包括病人编号、姓名、性别、年龄、门诊日期、病人信息的改号、退号，包括病人编号、姓名、性别、年龄、门诊日期、 、所在、所在的科室、执行的医生、应收金额等。的科室、执行的医生、应收金额等。 门诊的划价、发药、住院等。包括处方编号、药品编号、单位、规格、销售价格、门诊的划价、发药、住院等。包括处方编号、药品编号、单位、规格、销售价格、数量、是否划价、是否发药、是否住院等。数量、是否划价、是否发药、是否住院等。 诊疗科室。包括

7、科室、值诊医生、门诊号、病人编号、患者姓名、年龄、性别、诊疗科室。包括科室、值诊医生、门诊号、病人编号、患者姓名、年龄、性别、证件类型、证件号码、主观资料、客观资料、诊疗、保存处方等证件类型、证件号码、主观资料、客观资料、诊疗、保存处方等处方的添加、修改、删除。包括处方编号、药品编号、单位、规格、销售价格、数处方的添加、修改、删除。包括处方编号、药品编号、单位、规格、销售价格、数量、是否划价、是否发药、是否住院、医生、门诊号、病人编号、患者姓名、年龄、性别量、是否划价、是否发药、是否住院、医生、门诊号、病人编号、患者姓名、年龄、性别等。等。 医院信息管理医院信息管理 ERER 模型图模型图3

8、3 、系统总体设计、系统总体设计系统总体设计分析：用户的需求具体体现在各种信息的提供、保存、更新和查询，这系统总体设计分析：用户的需求具体体现在各种信息的提供、保存、更新和查询，这就要求系统结构能充分满足各种信息的输出和输入。收集基本数据、系统结构以及系统处就要求系统结构能充分满足各种信息的输出和输入。收集基本数据、系统结构以及系统处理的流程，组成一份详尽的数据字典，为后面的具体设计打下基础。理的流程，组成一份详尽的数据字典，为后面的具体设计打下基础。在仔细分析调查有关医院信息管理系统需求的基础上，得到如图在仔细分析调查有关医院信息管理系统需求的基础上，得到如图 1 12 2、图、图 1 13

9、 3、图、图1 14 4、如图、如图 1 15 5 的挂号系统、诊疗系统、划价系统、发药系统所处理的数据流程。的挂号系统、诊疗系统、划价系统、发药系统所处理的数据流程。图图医院信息管理挂号系统数据流程图医院信息管理挂号系统数据流程图针对一般医院信息管理挂号系统的需求，通过对医院挂号管理工作过程的内容和数据流程针对一般医院信息管理挂号系统的需求，通过对医院挂号管理工作过程的内容和数据流程分析，设计如下所述的数据项和数据结构：分析，设计如下所述的数据项和数据结构：挂号信息数据库表设计挂号信息数据库表设计功能设计功能设计门诊挂号子系统根据挂号的业务特点，分为以下功能：门诊挂号子系统根据挂号的业务特点

10、，分为以下功能：(1)(1)主要功能：挂号、退号、改号。主要功能：挂号、退号、改号。(2)(2)提示功能：根据医生的排班信息，提示号源情况，包括限号、加号等。提示功能：根据医生的排班信息，提示号源情况，包括限号、加号等。(3)(3)收费功能：收取挂号费及诊金等。收费功能：收取挂号费及诊金等。除了以上基本功能外，可根据业务发展需求，实现一些扩展功能，如预约登记、排班、除了以上基本功能外，可根据业务发展需求，实现一些扩展功能，如预约登记、排班、预约挂号等。预约挂号等。病人在挂号处进行挂号，可以把整个流程拆解为以下几个子流程：病人在挂号处进行挂号，可以把整个流程拆解为以下几个子流程：(1)(1)挂号

11、处刷就诊卡调取病人资料。挂号处刷就诊卡调取病人资料。(2)(2)病人挂号到科室医生，完成一个挂号登记。病人挂号到科室医生，完成一个挂号登记。 (3)(3)登记完成后，需要缴纳挂号费与诊金。登记完成后，需要缴纳挂号费与诊金。图图3 3医院信息管理诊疗系统数据流程图医院信息管理诊疗系统数据流程图针对一般医院信息管理诊疗系统的需求，通过对医院诊疗管理工作过程的内容和数据流程分析，设针对一般医院信息管理诊疗系统的需求，通过对医院诊疗管理工作过程的内容和数据流程分析，设计如下所述的数据项和数据结构：计如下所述的数据项和数据结构：诊疗信息数据库表设计诊疗信息数据库表设计医生工作站主要负责存储医嘱、处方明细

12、信息，存储的主要数据为医生在开处方、下医生工作站主要负责存储医嘱、处方明细信息，存储的主要数据为医生在开处方、下医嘱等过程产生的临床数据。医嘱等过程产生的临床数据。医嘱表：功能设计功能设计门诊病人人次多，流动大，看诊时间短，一般情况下，一个病人看诊时间约门诊病人人次多，流动大，看诊时间短，一般情况下，一个病人看诊时间约 1010 分钟分钟左右，普通医生一个班次（左右，普通医生一个班次（4 4 小时）要看小时）要看 3030 个病人左右个病人左右, ,个别科室一个班次一个医生只能个别科室一个班次一个医生只能看诊不到看诊不到 1010 个，如牙科。为提高医生看诊效率，降低医生花费在系统操作上的工作

13、强度，个，如牙科。为提高医生看诊效率，降低医生花费在系统操作上的工作强度，系统要求做到简单易用，响应快速，并尽可能提供医生方便性录入的功能，如模板录入、系统要求做到简单易用，响应快速，并尽可能提供医生方便性录入的功能，如模板录入、历史资料引用等功能。历史资料引用等功能。门诊医生工作站主要功能包括叫号、开处方、开各种检验检查单、检验检查结果查询门诊医生工作站主要功能包括叫号、开处方、开各种检验检查单、检验检查结果查询等。等。(1)(1)排队叫号：排队叫号医生站与分诊对接，实现排队叫号功能。排队叫号：排队叫号医生站与分诊对接，实现排队叫号功能。(2)(2)开处方：包括西药、中草药、中成药处方，处方

14、内容含品名、用量、次数、用法、开处方：包括西药、中草药、中成药处方，处方内容含品名、用量、次数、用法、天数、数量。该功能一般支持处方模板调用和历史处方的复制，支持处方权限管理，支持天数、数量。该功能一般支持处方模板调用和历史处方的复制，支持处方权限管理，支持用药监控，支持药品库存提醒等。用药监控，支持药品库存提醒等。(3)(3)开检验、检查申请单开检验、检查申请单: :模拟医生手工申请单格式，采取分类选择，控件勾选方式。模拟医生手工申请单格式，采取分类选择，控件勾选方式。(4)(4)下诊断：支持多个诊断，包括主要诊断、次要诊断、中医诊断、中医症形等。下诊断：支持多个诊断，包括主要诊断、次要诊断

15、、中医诊断、中医症形等。(5)(5)书写门诊病历。书写门诊病历。(6)(6)查询：查询病人历史就诊记录、检验检查结果。查询：查询病人历史就诊记录、检验检查结果。(7)(7)接口：与合理用药系统接口，提供处方的自动监测和咨询功能：药品剂量、药品相接口：与合理用药系统接口，提供处方的自动监测和咨询功能：药品剂量、药品相互作用、配伍禁忌、适应症等。自动向有关部门传送检查、检验、诊断、处方、治疗处置、互作用、配伍禁忌、适应症等。自动向有关部门传送检查、检验、诊断、处方、治疗处置、手术、收住院等诊疗信息，以及相关的费用信息，保证医嘱指令顺利执行。手术、收住院等诊疗信息，以及相关的费用信息，保证医嘱指令顺

16、利执行。图图4 4医院信息管理划价系统数据流程图医院信息管理划价系统数据流程图功能设计功能设计门诊收费是针对门诊病人结算的过程，一般情况下，病人在医生看诊完成后或在医生门诊收费是针对门诊病人结算的过程，一般情况下，病人在医生看诊完成后或在医生看诊过程中需要中途交费结算的情况下，前往收费处交纳相应的费用的过程。看诊过程中需要中途交费结算的情况下，前往收费处交纳相应的费用的过程。收费人员通过调出病人的交费信息或录入应交费用明细信息，结合病人的支付情况、收费人员通过调出病人的交费信息或录入应交费用明细信息，结合病人的支付情况、身份情况，进行结算并打印结算单据。由于门诊的特殊性，收费系统不光要支持接收

17、医生身份情况，进行结算并打印结算单据。由于门诊的特殊性，收费系统不光要支持接收医生工作站发送过来的电子处方信息，生成相应的结算单，还可以通过自行录入的方式，录入工作站发送过来的电子处方信息，生成相应的结算单，还可以通过自行录入的方式，录入收费明细情况。系统还提供包括对费用的退费、医保接口结算、政策性优惠结算、多种支收费明细情况。系统还提供包括对费用的退费、医保接口结算、政策性优惠结算、多种支付方式等一系列的结算方式。付方式等一系列的结算方式。图图5 5医院信息管理发药系统数据流程图医院信息管理发药系统数据流程图功能设计功能设计门诊药房子系统是门诊药房人员用来完成日常工作的系统。通常门诊药房子系

18、统中，门诊药房子系统是门诊药房人员用来完成日常工作的系统。通常门诊药房子系统中，会包含两个大的业务模块，一为门诊配发药子系统，另一为门诊药房管理（本节主要介绍会包含两个大的业务模块，一为门诊配发药子系统，另一为门诊药房管理（本节主要介绍门诊发配药子系统，门诊药房管理将在物流管理系统中详细介绍）门诊发配药子系统，门诊药房管理将在物流管理系统中详细介绍） 。收费系统完成收费后，。收费系统完成收费后，处方传递到门诊药房，药房的配药人员根据处方内容进行配药，配药完成后药房工作人员处方传递到门诊药房，药房的配药人员根据处方内容进行配药，配药完成后药房工作人员通过指引设备（如显示器、通过指引设备（如显示器

19、、LEDLED 公告、语音叫号）通知病人取药。公告、语音叫号）通知病人取药。门诊药房的发配药根据医院情况，可能采用发配分开的流程或者发配混合的流程模式。门诊药房的发配药根据医院情况，可能采用发配分开的流程或者发配混合的流程模式。发配分开的模式即处方完成收费后，在配药界面上进行显示，配药人进行配药后并确发配分开的模式即处方完成收费后，在配药界面上进行显示，配药人进行配药后并确认，此时完成配药的处方才显示在发药界面上，发药人根据信息进行最后的核对，完成发认，此时完成配药的处方才显示在发药界面上，发药人根据信息进行最后的核对，完成发药。分配混合的模式即无发配人员的区分，只有一个人来完成配药及发药的工

20、作。药。分配混合的模式即无发配人员的区分，只有一个人来完成配药及发药的工作。第第 4 章章（1 1） 、登陆：、登陆：“登陆登陆”按钮的按钮的 clickclick 事件代码如下：事件代码如下：PrivatePrivate SubSub Command1_Click()Command1_Click()IfIf Text1.TextText1.Text = = AndAnd Text2.TextText2.Text = = ThenThenMsgBoxMsgBox 用户名密码不能为空用户名密码不能为空 ElseIfElseIf Text1.TextText1.Text = = 11 AndAnd

21、 Text2.TextText2.Text = = 11 ThenThenMsgBoxMsgBox 欢迎进入本系统欢迎进入本系统, vbApplicationModal,vbApplicationModal, 登陆登陆 Form2.ShowForm2.ShowForm1.HideForm1.HideElseElseMsgBoxMsgBox 用户名不正确，请重新输入用户名不正确，请重新输入 EndEnd IfIf EndEnd SubSubPrivatePrivate SubSub Command2_Click()Command2_Click()EndEndEndEnd SubSub科室管理功能

22、科室管理功能：选择科室登记，进入如下界面：选择科室登记，进入如下界面：“添加科室添加科室”按钮的按钮的 click 事件代码如下：事件代码如下：Private Sub Command1_Click()rs1.Open select * from 科室科室, cnn, adOpenKeyset, adLockOptimisticrs1.AddNewrs1.Fields(0).Value = Text1.Textrs1.Fields(1).Value = Text2.Textrs1.Fields(2).Value = Text3.Textrs1.Updaters1.CloseMsgBox 添加科室

23、信息成功添加科室信息成功Adodc1.RefreshEnd Sub“修改科室修改科室”按钮的按钮的 click 事件代码如下：事件代码如下：Private Sub Command2_Click()rs1.Open select * from 科室科室 where 编号编号= & Text1.Text & , cnn, adOpenKeyset, adLockOptimisticrs1.Fields(1).Value = Text2.Textrs1.Fields(2).Value = Text3.Textrs1.Updaters1.CloseMsgBox 修改科室信息成功修改科室

24、信息成功Adodc1.RefreshEnd Sub“删除科室删除科室”按钮的按钮的 click 事件代码如下：事件代码如下：Private Sub Command3_Click()rs2.Open select * from 科室科室 where 编号编号= & Adodc1.Recordset.Fields(0) & , cnn, adOpenKeyset, adLockOptimisticIf rs2.RecordCount 0 Then myval = MsgBox(是否删除该数据？是否删除该数据？, vbYesNo) If myval = vbYes Then rs2.

25、Delete rs2.Update MsgBox 删除成功删除成功 End IfElse MsgBox 没有要删除的数据！没有要删除的数据！End Ifrs2.CloseAdodc1.Refresh诊疗科室管理功能诊疗科室管理功能“保存病例保存病例”按钮的按钮的 click 事件代码如下：事件代码如下：Private Sub Command1_Click()If Text6.Text = Or Text7.Text = Or Text8.Text = Then MsgBox 输入的用户注册信息不完全输入的用户注册信息不完全!, , 提示信息提示信息Else Adodc1.RecordSourc

26、e = select * from 电子病例电子病例 where 病人编号病人编号= + Text9 + 判断注册的用户名是否存在判断注册的用户名是否存在 Adodc1.Refresh Set RS = adoCon.Execute(insert into 电子病例电子病例 values( & Text6 & , & Text7 & , & Text8 & ) rs1.Open select * from 电子病例电子病例, cnn, adOpenKeyset, adLockOptimisticWith rs1.AddNew.Fields(病人编

27、号病人编号) = frmfitjc.Text1(0).Text.Fields(病人编号病人编号) = IIf(IsNull(Text9.Text), , Text9.Text).Fields(姓名姓名) = IIf(IsNull(Text1.Text), , Text1.Text).Fields(主观资料主观资料) = IIf(IsNull(Text6.Text), , Text6.Text).Fields(客观资料客观资料) = IIf(IsNull(Text7.Text), , Text7.Text).Fields(诊断诊断) = IIf(IsNull(Text8.Text), , Tex

28、t8.Text).Update.CloseEnd Withrs2.Open select 是否诊疗是否诊疗 from 挂号信息挂号信息 where 挂号编号挂号编号= & Combo5.Text & , cnn, adOpenKeyset, adLockOptimistic rs2.Fields(0).Value = 是是 rs2.Update rs2.Close MsgBox 保存成功保存成功!, 48, 用户注册信息提示用户注册信息提示End IfAdodc1.RefreshCommand2.Enabled = TrueEnd Sub“科室科室”按钮的按钮的 click 事

29、件代码如下：事件代码如下：Private Sub Combo1_Click()Dim a As Longi = 0Label11.Caption = Combo1.Text + 诊室诊室rs1.Open select * from 人员表人员表, cnn, adOpenKeyset, adLockOptimisticCombo4.ClearWith rs1 If .RecordCount 0 Then .MoveFirst For i = 1 To .RecordCount If Combo1.Text = rs1.Fields(2).Value Then Combo4.AddItem .Fields(1).Value .Fields() 括号中可以是任括号中可以是任何一个字段何一个字段,可以用数字也可以直接用字段名可以用数字也可以直接用字段名 End If .MoveNext Next End If .Close End With rs