医院信息系统论文

1、医院信息管理系统2008年4月10日摘要医院管理系统是典型的管理信息系统(MIS>,其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面 对于前者要求建立数据一致性和完整性强，数据安全性好的数据库而对于后者则要求应用程序功能完备，易使用等特点计算机化的医院信息系统已成为现代化医院运营必不可少的基础设施与技术支撑环境。就好象一个现代化医院的成功运行离不开功能完整，美观舒适的建筑物，技术娴熟的医护人员，性能齐全，高精尖的医疗设备一样，它也离不开计算机化的医院信息系统。经过分析如此情况，我们使用 VB ,数据库等开发工具，利用其提供的各种面向对象的开发工具,尤其是数据窗口这一能方

2、便而简洁操纵数据库的智能化对象，首先在短时间内建立系统应用原型然后，对初始原型系统进行需求迭代 ，不断修正和改进，直到形成用户满意的可行系统 关键词：原型法 面向对象 数据一致性 数据窗口 医院管理系统目录1第一章绪论32第二章相关技术介绍62.1课题背景42.2国内外研究现状42.3课题目的53第三章系统分析73.1系统的初步调查103.2系统的可行性分析113.3系统开发步骤114第四章系统设计144.1模块设计144.2开发环境74.3功能模块144.4数据流图154.5数据库设计154.6详细设计20系统主界面20用户管理界面21药品管理界面26挂号界面28i465划价界面305第五章

3、开发总结336第六章致谢 347参考文献 35第一章 绪 论随着社会化大生产的不断扩大和社会对产品多样化的需求，人们越来越重视信息在生 产经营及企业管理中的作用，并把它当做企业的一种极其重要的资源，人们称之为 “信息资源”，信息资源的处理已经成为当今世界上一项主要的社会活动。同样，在 医疗系统中也不例外，其中加强对门诊信息的管理，一方面能更好为病人服务，另一 方面能加强对医院效益的监控。本世纪以来，因为社会生产力的迅速发展和科学技术的突飞猛进，人们进行信息交流 的深度和广度不断增加，管理所需要的信息量急剧增长，同时对信息的处理要求及 时、准确，这导致了传统的信息处理方法和手段已不能适应现代管理

4、的需要；电子计 算机的诞生和在信息处理中的应用，标志着一个崭新时代“信息时代”的开始， 它使企业管理现代化成为可能。管理信息系统的发展 管理信息系统通过对企业当前运行的数据进行处理来获得有关信 息，以控制企业的行为；利用过去和现在的数据及相应的模型，对未来的发展进行预 测；能从全局目标出发，对企业的管理决策活动予以辅助。从工业发达国家来看，管 理信息系统的发展经历了以下几个阶段。第一阶段：1953年至1965年）单项数据处理阶段，也称电子数据处理 EDP阶段。这是电子计算机在管理领域应用的起步阶段。这一阶段，因为当时计算机硬、软 件的限制，数据处理的性质只是使用计算机代替人的手工劳动，进行简单

5、的单项数据 处理工作，第二阶段：1965年至1970年）综合数据处理阶段，也称事务处理系统 TPS阶段。这个阶段计算机硬、软件有了很大的发展，出现了多用户的分时系统，计算机开 始应用于对某一个管理子系统的控制，并具有一定的反馈功能。第三阶段：1970年至今）管理信息系统vMIS阶段。这个阶段是在企业中全面的使用计算机把各种管理子系统的功能集中起来，构成了计算机化的全方位的信息系 统，即现代管理信息系统。总的说来，计算机技术的发展，其性价比大幅的下降，使得其被大量广泛的使 用。针对现实中的各种应用需求，相应的产生很多技术体系、技术标准，如J2EE、。NET COM/COM+。这又大大的推动了企业

6、的信息化进程。其影响可以归纳为如下两 点：八、（1计算机已经成为我们学习和工作的得力助手：首先，计算机可以代替人工进行许多繁杂的劳动； 其次，计算机可以节省许多资源；第三，计算机可以大大的提高人们的工作效率； 第四，计算机可以使敏感文档更加安全，等等。（2开发医院管理系统的意义 现在我国的一些小型医院或诊所对于病人就诊信息的处理还停留在纸介质或半自 动由电脑处理一部分数据，由人工处理一部分数据）的基础上，这样的机制已经不能 适应时代的发展，因为它浪费了许多人力和物力，在信息时代这种传统的管理方法必 然被计算机为基础的信息管理所取代。软件作为一有项有力的工具，只能当此种工 具，与我们的实践相结合

7、起来的时候，才具有重大的社会价值及使用价值。因此根据 企业目前实际的医院管理情况开发一套医院管理系统是十分必要的。课题背景要提高竞争力，既要有好的就医环境，同时也要有好的客户服务，而要实现这 些目标的办法就是信息化。 医院信息化建设的目标是：适应我国全面建设小康社会和医药卫生改革发展的形势， 以病人为中心，综合运用现代信息技术 计算机、网络、通讯等），充分体现药特点， 提高医疗质量和市场竞争能力，满足患者与医院管理的多种需求，促进医院持续快速 稳定发展。在手工管理的情况下，对病人的病历的管理是一个极其繁杂的过程，医生很难 记住每一位病人的情况，就医记录。所以往往采用的手工记录的方式，这个势必造

8、成 具大的物资浪费。并且随着医院规模的扩大，对药品的管理，对药品价格的管理等都是一件巨大的 工作。国内外研究现状通过这前段时间的市场调查和分析，初步了解到现在各种进销存软件的优点及不 足。比如说有些传统进销存软件是为替代手工录入，从传统数据记录中产生的，这些 软件面对 Internet 及电子商务迅猛发展的网络经济时代显得如此脆弱而只能望 e 兴叹！1、体系封闭，无法实现网络化管理，更无法支持电子商务。传统软件因为产生的 技术背景落后，无法实现网络化管理或只支持局部网络应用，更无法支持电子商 务，不能适应网络时代企业的需求。2、信息单一、落后且缺乏前瞻性，因为技术方面的限制，传统软件无法做到库

9、存 信息的实时动态处理、事前的预测并提供前瞻性信息。3、对管理考虑甚少。软件依旧没有摆脱传统束缚，以对外报告为其存在目的。课题目的当今时代是飞速发展的信息时代。在各行各业中离不开信息处理，这正是计算机 被广泛应用于信息管理系统的环境。计算机的最大好处在于利用它能够进行信息管 理。使用计算机进行信息控制，不仅提高了工作效率，而且大大的提高了其安全性。 尤其对于复杂的信息管理，计算机能够充分发挥它的优越性。计算机进行信息管理与 信息管理系统的开发密切相关，系统的开发是系统管理的前提。本系统就是为了更好 管理门诊信息信息而设计的。当前，医院作为病人就诊的地方，有许多信息需要处理和管理。现今，有很多门

10、 诊信息都是初步开始使用，甚至尚未使用计算机进行信息处理。根据调查得知，他们 以前对信息管理的主要方式是基于文本、表格等纸介质的手工处理，对于医历等很多 信息都是用人工计算、手抄进行。数据信息处理工作量大，容易出错；因为数据繁 多，容易丢失，且不易查找。总的来说，缺乏系统，规范的信息管理手段。数据处理手工操作，工作量大，出错率高，出错后不易更改。基于这此问题，我 认为有必要建立一个医院管理系统，使医院管理工作规范化，系统化，程序化，避免 医院管理的随意性，提高信息处理的速度和准确性，能够及时、准确、有效的查询和 修改医院情况。开发门诊管理系统的现实意义：现在我国的多数诊所或小型医院的管理水平还

11、停留在纸介质的基础上，这样的机 制已经不能适应时代的发展，因为它浪费了许多人力和物力，在信息时代这种传统的 管理方法必然被计算机为基础的信息管理所取代。 归纳起来，好处大约有以下几点： 1可以存储以往的门诊信息，安全、高效； 2只需一到二名信息录入员即可操作系统，节省大量人力；3可以迅速查到所需信息。第二章、相关技术介绍2 1 开发环境本系统采用面向对象的软件开发方法，以 Microsoft 公司的可视开发环境 Visual Basic 6.0 作为主要开发工具，使用 Microsoft Access 2000 作为关系数据库，并在 VB编程语言中采用ADO数据库编程模型，配合功能强大的 SQ

12、L查询语言实现建立关系 数据库，访问数据库，对数据库的更新，较好地实现了预定的需求功能。2.1.1 Visual Basic 6.0 开发环境VisualBasic 6.0 是一种可视化、面向对象和采用事件驱动方式的结构化高级程序 设计语言，可用于开发 Windows 环境下的各类应用程序。它简单易学、效率高、且功 能强大。在 Visual Basic 环境下，利用事件驱动的编程机制、新颖易用的可视化设计 工具，使用 Windows内部的应用程序接口 API）函数，以及动态链接库DLL、动态 数据交换DDE、对象的链接与嵌入vOLE、开放式数据连接vODBC等技术，可以高 效、快速地开发出Wi

13、ndows环境功能强大、图形界面丰富的应用软件系统。总的来看， Visual Basic 有以下主要特点：1. 可视化编程Visual Basic 提供了可视化设计工具，把 Windows 界面设计复杂性“封装”起 来，开发人员不必为界面设计而编写大量程序代码，只需要按设计要求的屏幕布局， 用系统提供的工具，在屏幕上画出各种“部件”，即图形对象，并设置这些图形对象 的属性。 Visual Basic 自动产生界面设计代码，程序设计人员只需要编写实现程序功 能的那部分代码，从而可以大大提高程序设计的效率。2. 面向对象的程序设计 在一般的面向对象程序设计语言中，对象由程序代码和数据组成，是抽象的

14、概念；而Visual Basic 则是应用面向对象的程序设计方法OOP，把程序和数据封装起 作为一个对象，并为每个对象赋予应有的属性，使对象成为实在的东西。在设计对象 时，不必编写建立和描述每个对象的程序代码，而是用工具画在界面上，VisualBasic 自动生成对象的程序代码并封装起来。每个对象以图形方式显示在界面上，都是 可视的。3. 事件驱动编程机制Visual Basic 通过事件来执行对象的操作。一个对象可能会产生多个事件，每个 事件都可以通过一段程序来响应。例如，命令按钮是一个对象，用户单击该按钮时， 将产生一个“单击”事件，而产生该事件时将执行一段程序，用来实现指定的操作。在用

15、Visual Basic 设计大型应用软件时，不必建立具有明显开始和结束的程序， 而是编写若干个微小的子程序，即过程，这些过程分别面向不同的对象，由用户操作 引发某个事件来驱动执行某特定的功能，或者由事件驱动程序调用通用过程来执行指 定的操作。这样可以方便编程人员、提高效率。4. 访问数据库Visual Basic 系统具有很强的数据库管理功能。利用数据控件和数据库管理窗 口，可以直接建立或处理 Microsoft Access 格式的数据库，并提供强大的数据存储和 检索功能。同时， Visual Basic 还能直接编辑和访问其他外部数据。Visual Basic 提供开放式数据连接 <

16、;Open DataBase Connectivity ) ，即卩 ODBC功 能，它可通过直接访问或建立连接的方式使用并操作后台大型网络数据库，如SQLServer、Oracle等。在应用程序中，可以使用结构化查询语言SQL数据标准，直接访问 Server 上的数据库，并提供了简单的面向对象的库操作指令、多用户数据库访问的 加锁机制和网络数据库的 SQL的编程技术，为单机上运行的数据库提供了SQL网络接口，以便在分布式环境中快速而有效地实现客户服务器方案。Visual Basic 6.0 是专门为 Microsoft 的 32 位操作系统设计的，可用来建立 32 位的应用程序。在 Windo

17、ws9x WindowsNT或 Windows2000环境下，用 Visual Basic 6.0 的编译器可以自动生成 32位应用程序。这样的应用程序在 32位操作系统下运行， 速度更快，更安全，并且更适合在多任务环境下运行。2.1.2 Microsoft Access 与 ADO作为应用程序与OLE DB连接的桥梁，ActiveX Data Objects (ADO> 为 VisualBasic 6.0 下开发的应用程序访问本地或远程数据库提供了有效的手段。MicrosoftActiveX Data Objects (ADO> 主要优点是易于使用、高速度、低内存支出和占用磁盘

18、空间较少。ADO支持用于建立基于客户端/服务器和Web的应用程序的主要功能。在 VB中，可以使用开发环境提供的 ADO空件，数据库访问方法，对 ACCES中建立的关系 数据库简单快捷的进行访问。2.1.3 SQL 查询语言及使用SQL语言是结构化语言vStructure Query Language )的缩写，是一种用于数据库查询和编程的语言，已经成为关系型数据库普遍使用的标准，使用这种标准数据库语言对程序设计和数据库的维护都带来了极大的方便，广泛地应用于各种数据查询。VB和其他的应用程序包括 Access、Foxpro、Orcale、SQL Server等都支持SQL语言。SQL语言的常用操

19、作有：建立数据库数据表 vCREATETABLE )，如本系统中的学生及成绩备份就用到该语句；从数据库中筛选一个记录集<SELECT)，这是最常用的一个语句，功能强大，能有效地对数据库中一个或多个数据 表中的数据进行访问，并兼有排序、分组等功能；在数据表中添加一个记录vINSERT);删除符合条件的记录vDELETE );更改符合条件的记录vUPDATE);VB中的数据库操作对象都提供了对SQL语句的支持。其一般的用法是以VB的各种 控件接收用户对数据库访问的请求，在事件响应程序代码中将其转换成对数据库的SQL查询语句，并以字符串的形式存在，然后将其传递给相应的数据库操作对象，最终完 成

20、对数据库的访问。第三章系统分析3.1系统的初步调查 系统的初步调查系统的初步调查目标是在可行性分析的基础上进一步对原有系统进行的调查和分 析，弄清原有管理信息系统的运行状况，发现其薄弱环节，找出要解决问题的实质， 确保新系统比原系统更加有效、可靠。具体内容包括：管理业务状况的调查分析、数 据流程的调查分析。调查之后，绘制出医院信息管理系统的业务流程图,查询结果系统用户设置人员设计理系统般用户表单维护统计结果图 3.1.2系统逻辑模型的提出为了实现管理信息系统的计算机化，仅仅用业务流程图形象地描述信息的流动和 存储还远远不够，还要进一步调查分析舍去物质流，抽象出信息流，绘制出数据流程 图，并对各

21、种数据的属性和各项处理功能进行详细分析。系统分析的主要成果是系统的逻辑模型。本系统主要是以数据流图、数据字典为主要描述工具来勾画系统的概貌3. 1.3数据流图Flow数据流图DataDiagram），是描述系统逻辑模型的主要工具之一，它是在对系统的业务流程图进行分 析的基础上用少数几种符号综合地反映出信息在系统中的流动、存储和处理等情况， 并能将信息处理功能和彼此之间的联系，自上而下，逐层分解，从逻辑上精确地描述 出系统应具有的数据加工功能、数据输入输出、数据存储、数据来源和去向等项目。图 3. 1.33. 1.4数据字典数据字典DataDictionary）,是数据流图DFD ）上所有成分的

22、定义和解释的文字集合。它是系统分析 阶段的重要文档，它的作用是将数据流图中全部数据流及其组成部分的数据元素、数 据存储、数据加工外部项等，通过数据字典描述清楚，以便于以后系统设计时使用。3.2系统功能调查3.2.1医院管理信息系统的功能基础数据维护：对用户信息的管理药品管理：主要对药品类别、药品类型及药品信息的管理挂号:病人就医的主流程之一，为每一个病人分配一个号码划价：计算药品的价格，主要包括中药、西药、中成药等门诊收费：对各项收费进行汇总，如中药、西药、中成药等 查询:对挂号信息、收费信息进行查询3. 2. 2基础数据管理医院设置：门诊信息药房信息：药品信息常用基础数据：药品价格，药品数量

23、，挂号，医师费等3. 2. 3系统维护功能用户管理：包括新增用户、删除用户、修改用户密码等。数据库备份：数据操作数据初始化：初始化系统数据3.3系统总体流程图图3.3系统总体流程图第四章系统设计本系统主要针对医院管理，主要有如下功能模块:基础数据维护：对用户信息的管理药品管理：主要对药品类别、药品类型及药品信息的管理挂号:病人就医的主流程之一，为每一个病人分配一个号码划价:计算药品的价格，主要包括中药、西药、中成药等门诊收费：对各项收费进行汇总，如中药、西药、中成药等 查询:对挂号信息、收费信息进行查询功能模块管理信息系统设计阶段的主要目的是将系统分析阶段所提出的反映了用户信息需求的系统逻辑方

24、案转换成可以实施的基于计算机与通信系统的物理技术）方案。具体要求对系统进行功能分解，不断下去，直到分解成含义明确，功能单一的单元功能模块，从而绘制出系统的功能模块图，即HIPO图。此管理信息系统的 HIPO图如下4. 3数据流图图431数据流图4. 4数据库设计数据库设计是要在一个给定的应用环境 <DBM）中，通过合理的逻辑设计和有效的 物理设计，构造较优的数据库模式、子模式，建立数据库和设计应用程序，满足用户 的各种信息需求。1、概念结构设计在数据库设计中，先要对系统分析所得的数据字典中的数据存储进行分析，然后 得出系统的关系模式，可以采用实体一一联系图 <简称ER图）的方法进行

25、数据结 构的描述。ER图由实体、属性、联系三部分组成。ER图的有关符号说明如下：2、物理结构设计物理结构设计的原则如下：<1）尽可能的减少数据冗余和重复。<2）结构设计与操作设计相结合。<3）数据结构具有相对的稳定性。基于以上设计原则，本系统设计了一个数据库，包含基本信息表<如药品、医师、科室等）及几个实体联系建模后的表 <如划价信息表、收费信息表等）。为了加快系统访问的速度把这些表放在一个数据库中。本系统中相关数据库表结构设计举例如下:1、用户表 <p_user）编号字段名称字段类型字段说明1ID数值ID2用户名文本用户名3密码文本密码2、药品单位med_

26、dW编号字段名称字段类型字段说明1ID数值ID2单位名称文本单位名称3单位名称文本单位名称4单位名称文本单位名称5单位名称文本单位名称6单位名称文本单位名称3、药品类型表med_type)编号字段名称字段类型字段说明1ID数值ID2类型名称文本类型名称3类型名称文本类型名称4、科室表med_k9编号字段名称字段类型字段说明1ID数值ID2科室名称文本科室名称3科室名称文本科室名称4科室名称文本科室名称5、药品划价表hj_t )编号字段名称字段类型字段说明1ID数值ID2药品编码文本药品编码3药品名称日期药品名称4型号规格文本型号规格5数量数值数量6应付款数值应付款7挂号ID数值挂号ID6药品划

27、价汇总表hj)编号字段名称字段类型字段说明1ID数值ID2类型文本类型3应收款数值应收款4挂号ID数值挂号ID7、门诊收费表hj_aa)编号字段名称字段类型字段说明1ID数值ID2收费项目文本收费项目3应付款数值应付款4挂号ID数值挂号ID8、门诊收费汇总表hj_a)编号字段名称字段类型字段说明1ID数值ID2类型文本类型3应收款数值应收款4挂号ID数值挂号ID4. 5系统界面设计系统主界面在此系统中，充分考虑到人们的使用习惯，利用了菜单对系统中功能进行分类列 举,用使对系统的使用，通过菜单即能完成，这样使得主界面简洁，易于使用。另一方 面，对当前使用的某一功能选项对应的窗口，以模式的方式进行

28、工作，使得在同一窗 口，仅能打开某一类功能的窗口，也在一定程度上减轻了用户的使用难度。系统的主 界面如下：窗体和控件的属性见表主窗体及控件属性设置控件属性属性取值Frmmai nnamefrmmaincapti on门诊收费管理系统startupposit oncen terscree nstatusbarn amestatusbar1Pan els( 1 >XbrTextPan els( 2 >SrDatePan els( 3 >SbrTime用户管理界面此界面为本系统中，较常用的一种界面结构。主要由最上方的工具条，中间的现有 数据显示区及下方的新增内容区。在系统细节，主要

29、采用了一个ADO.recordset对象，当增加保存时，使用了其add new及post方法；当删除某一行数据时，使用了其 Delete,post方法。用户管理窗体的界面如下图示筑用户管理窗体用一个表格控件msflexgrid,个工具条控件toolbar,两个标签控件table组成。各 控件的属性如下表用户管理窗体中各个控件的属性设置控件属性属性取值Formn ameFrm用户管理capti on用户管理startUpPosit onCen terSeree nToolbarNameToolbarlAppeata nee1-3DBorderstyle1-eefixedS ngleIn dex

30、1增加In dex 2删除In dex 3修改In dex 4退出MSFlexridgNameDatagrid滚动条S)3-Both选疋模式 M)1-By Row允许用户调整大小U )3-BothLablelCapti on用户名Lable2Capti on密码药品管理界面本界面，主要实现对药品信息的管理，如药品编码、药品名称、型号规格、有效期 等.能进行完备的药品编辑操作。各控件的属性如下表药品管理窗体中各个控件的属性设置控件属性属性取值Formn ameFrm药品管理capti on药品管理startUpPosit onCen terScree nToolbarNameToolbarlAp

31、peata nee1-3DBorderstyle1-ccfixedS ngleIn dex 1增加In dex 2删除In dex 3修改In dex 4退出MSFIexridgNameDatagrid滚动条S)3-Both选疋模式 M)1-By Row允许用户调整大小U )3-BothLable 1Capti on药品编码Lable 2Capti on药品名称Lable 3Capti on型号规格Lable 4Capti on单位Lable 5Capti on单价Lable 6Capti on库存量Lable 7Capti on有效期挂号界面挂号是系统主要流程的第一步，它的主要功能是为病人人

32、分配一个唯一的编号 ，在以后的流程中，这个编号即挂的号为划价、收费的基础。在具体的实现中，在医 师输入框后，放置了一命令按钮，方便用户快速的查找医师的信息。医师的信息也是 以后查询医师的业绩的主要标识.挂号PPnlfx挂号费应连续増加保存退出挂号窗体中放置了一个组合框控件，两个命令按钮，三个标签和两个文本框。各控件 的属性见下表挂号窗体控件属性表控件属性属性取值FormNameFrm挂号Capti on挂号startUpPsit onCen terScree nTextBoxName医师TextBoxName挂号费ComboBoxNameCmb类型Comma ndButt onNameCmdS

33、aveCapti on保存Comma ndButt onNameCmdCa ncelCapti on退出Lable1Capti on类型Lable2Capti on医师Lable3Capti on挂号费主要代码如下 :Private Sub Command1_Click(>Dim c_gl As StringIf Trim(Text1> = "" ThenText1.SetFocusEnd IfIf t_ = "add" And Text1.Text <> "init" Then c_gl = Now(>

34、c_gl = Replace(c_gl, "-", "">c_gl = Replace(c_gl, ":", ""> c_gl = Replace(c_gl, " ", "">Call ExcuteSql(rec_gh, "select * from med_gl"> If rec_gh.State = adStateOpen Then rec_gh.AddNewrec_gh.Fields(” 类型"> =Trim(Combo1.Text> rec_gh.Fields(” 医师 ID"> = Trim(Text1> rec_gh.Fields(" 挂号费 "> = Trim(Text3> rec_gh.Fields("编号"> =Trim(c_gl> rec_gh.UpdateMsgBox (" 你的挂号号码 :" & c_gl>