医院病房管理制度系统.docx
《医院病房管理制度系统.docx》由会员分享,可在线阅读,更多相关《医院病房管理制度系统.docx(18页珍藏版)》请在冰豆网上搜索。
![医院病房管理制度系统.docx](https://file1.bdocx.com/fileroot1/2023-2/4/393661cd-1ce2-4dcb-9d60-cdbfcfc6bbae/393661cd-1ce2-4dcb-9d60-cdbfcfc6bbae1.gif)
医院病房管理制度系统
医院病房管理系统
————————————————————————————————作者:
————————————————————————————————日期:
管理信息系统
课程设计报告
设计题目:
医院病房管理系统
专业经济学类
班级经类093
学生彭菲
学号3090552097
指导教师薛宏权
时间2012.6.25-2012.6.29
地点经管学院实验室机房
2012年春季学期
一·绪论
随着计算机网络和通讯技术的发展与融合,信息化已经在世界各国各领域的应用越来越广泛,这些应用带来了生产方式的改革,经济的快速增长和人类文明的进步,整个世界进入了一个信息时代。
医院作为特殊的服务行业,管理方式千差万别,并且使用着大量的先进的仪器设备,处理着大批的业务,产生庞大的信息,因此医院急需一套适合本院的医院信息系统来收集处理信息,从而更好地利用信息,来提高医院管理水平,改善医院服务质量,加速医院临床研究步伐,提高医院的竞争能力。
二·系统规划
规模的大型化,传统的医院靠人工管理的方式已经越来越不适应现代医院的规模了。
而且随着电脑的普及及电脑性能的提高,使用电脑来管理医院的常规运作已经成为必然。
同时,用电脑进行管理可以大大的节约劳动力降低医院的成本,降低人为的误操作,大大的提高工作效率,给医院和病人同时带来巨大的方便。
本系统就是在这个背景下开发的,将先进的电脑技术和现代医院的管理完美的结合起来,完成以前需要大量人工才能完成的任务,实现了医疗,服务一体的全新概念的服务和管理方式。
三·系统分析
1.可行性分析:
疗管理需要大量的人力来管理繁琐的入院手续,病历管理,病房管理,出院管理等工作,非常麻烦,而且由于手工操作,非常容易出错。
而且病历保存占地方且保存很麻烦,浪费资源更加不用说了。
还有繁琐的手续,让病人觉得非常麻烦,也给管理人员造成很大麻烦。
直接的影响就是效率低下,成本高,给本来就不想上医院的人更加讨厌进医院。
以上问题普遍存在于各个医院。
仔细想来,其实这些工作电脑其实完全可以胜任,而且非常容易完成。
通过电脑的辅助管理,不仅可以解决上述问题,而且符合现代的潮流,体现一个医院的现代化形象,对于提高员工工作效率,加速资金周转、降低各项成本及改善服务质量都有十分积极的作用。
一个成熟的医院管理系统不仅仅是记录病人的信息,提供查询,报表打印等一系列简单的工作,它能让工作人员从烦琐的手工操作中解脱,并且医院管理系统本身就代表着一种管理方法。
随着它的深入,将带动企业的运做,为管理和决策提供支持。
为了达到这个要求,它必须依靠高起点的硬件环境和软件开发工具来保证系统的稳定和正常运行。
总之,使用该医院管理系统,将会有以下好处:
1.高效的病房管理:
能有效的提高病房使用率。
2.提高决策依据:
管理者可以随时了解经营情况,以制定相应的经营方针。
3.减轻员工的工作负担:
从而使员工把更多的精力放在提高为病人服务的质量上。
4.简单、方便地保存和查询历史资料。
5.树立良好的医院形象。
6.可以方便的查阅病人的病历及类似病人的医疗情况,给医生提供可靠参考。
7.对病人的实时监控,保证病人的生命安全。
2·组织结构调查。
\
上图是医院的组织结构图,医院下设院办、医务处、财务处、信息中心等,其中医务处为核心部分,分为门诊办公室、专家门诊、门诊病案室、挂号室、医疗部门,其中最重要的部门医疗部门又分为急诊科、内科、外科、妇产科、儿科、中医科等各科室,从上至下,各机构、部门的关系比较清晰。
3,业务流程图:
上图即为医院病房管理系统的业务流程图,大致过程如下,病人将病历交给门诊挂号处,进行挂号收费之后,开据收费证明交给检查科,进行所需的各类检查,然后将检查报告单交给医生科室,医生根据检查结果作出诊断,开处方,并决定病人是否需要住院,如需住院,医生开出住院单,并递交给病人住院建议,病人根据医嘱,填写递交住院申请表给住院部,住院处可随时给出病人的住院信息,并在病人出院时打印出院报告,收费处将医药费、检查费、住院费等各项费用统计汇总收取。
4.数据流程图:
上图是医院病房管理系统的数据流程图,大致过程如下,病人的基本信息通过病历传送到挂号处,挂号处经过收费挂号处理之后,将收据信息传送给检查科室和医生科室,检查科室进行所需各项检查之后,将检查结果数据存于检查报告单中,并将报告单数据传送到医生科室,医生科室收到收费单据和检查报告单,然后进行诊断处理,决定病人是否需要住院,如需住院,则把病人的相关信息提供给住院部,将病人的将查结果存于诊断检查单中,住院部查询病房基本信息,并根据病人的就诊情况,安排病房,将病人的床位、护理情况存于住院信息中,将病人的就诊、住院、收费情况等相关数据存于出院报告中。
5.数据字典:
1)数据项的定义
数据项编号:
F02-01
数据项名称:
床位
简述:
病房床位的编码
类型及宽度:
字符型,8位
取值范围:
“A-00101”—“E-00105”
2)数据结构的定义
数据结构编号:
D03-05
数据结构名称:
病房基本信息
简述:
病房的床位、价格、状态等基本信息
数据结构组成:
F02-01+J01-01+Z06-05
3)数据流的定义
数据流编号:
B01-06
数据流名称:
挂号单
简述:
挂号处开出的挂号单
数据流来源:
挂号处
数据流去向:
收费处理模块
数据流组成:
科室+主治医生+收费情况
数据流量:
15份/小时
高峰流量:
25份/小时(上午9:
00-11:
30)
4)处理逻辑的定义
处理逻辑编号:
P05-02
处理逻辑名称:
入住病房处理
简述:
安排病人入住的病房、床位等
输入的数据流:
病人的姓名、性别、身份证号码、家庭住址,来源于病人基本信息表,病人的诊断信息来源于诊断信息表,病房号、床位、价格、值班医生、护理人员,来源于病房信息表。
处理:
住院部根据数据流“病人的诊断信息”,确定病人需要入住的病房、床位、护理条件、收费情况。
输出的数据流:
病人的住院信息,出院时的报告,返回给病人。
5)数据存储的定义
数据存储编号:
E05-04
数据存储名称:
检查单
简述:
存放病人的检查诊断结果
数据存储组成:
身份证号码+姓名+性别+症状+检查结果+诊断结论
关键字:
身份证号码
相关联的处理:
P03,P04
6)外部实体的定义
外部实体编号:
S02-01
外部实体名称:
病人
简述:
在本院就诊的病人
输入的数据流:
D02-01,D03-05
输出的数据流:
D05-06
二.系统设计
1.系统功能结构图:
上图为医院病房管理系统的功能结构图,该系统的功能主要分为五个模块:
查询功能、病人住院情况处理功能、病房使用情况更新、系统的维护、打印功能,能够查询病人基本信息、病房基本信息、病人住院情况查询和处理、入院信息登记、出院信息删除,还能进行病房使用信息的更新,系统登录密码的修改、打印功能,功能较为全面。
2.代码设计:
A-00101,B-00101,C-00101
床位编码的设计:
采用字母与数字结合,打头字母表示病房所在科室,比如A-00101,字母A表示内科,前三位数字表示所在科室的病房号,比如A-00101中001表示内科的001号病房,后两位数字表示所在病房中的病床编号,比如A-00101中后两位数字01表示内科001号病房里的01号病床,同理,B-00101,C-00101也是采用此原理编码。
3.数据库设计:
3.1数据库概念结构设计:
1)系统中实体的E-R图:
2)系统整体的E-R图:
3.2数据库逻辑结构设计:
1)病人基本信息表(身份证号码、姓名、性别、年龄、家庭住址、联系方式)
2)病房基本信息表(房号、床位、单价、状态、值班医生、护理人员)
表1病人基本信息表
字段名称
字段类型
字段长度
身份证号码
字符型
20
姓名
字符型
8
性别
字符型
2
年龄
数值型
3
家庭住址
字符型
30
联系方式
字符型
11
表2病房基本信息表
字段名称
字段类型
字段长度
房号
字符型
5
床位
字符型
8
单价
数值型
4
状态
字符型
8
值班医生
字符型
8
护理人员
字符型
8
4.主要功能及界面:
1)系统登录界面:
代码如下:
select(thisform.dataenvironment.cursor1.alias)
locatefor姓名=ALLTRIM(thisform.text1.value);
and工号=ALLTRIM(thisform.text2.value)
iffound()
doform进入界面
else
=messagebox("用户名或密码不正确,请重新输入!
")
thisform.text1.value=""
thisform.text2.value=""
endif
return
thisform.release
2)进入系统主页面:
菜单设计:
3)病人基本信息查询功能界面:
代码如下:
docase
casethisform.optiongroup1.value=1
bool='身份证号码='+"'"+trim(thisform.text1.value)+"'"
casethisform.optiongroup1.value=2
bool='姓名='+"'"+trim(thisform.text1.value)+"'"
casethisform.optiongroup1.value=3
bool='性别='+"'"+trim(thisform.text1.value)+"'"
endcase
thisform.dataenvironment.cursor1.filter=bool
thisform.refresh
return
4)病房基本信息查询功能界面:
功能代码如下:
docase
casethisform.optiongroup2.value=1
bool='房号='+"'"+trim(thisform.text1.value)+"'"
casethisform.optiongroup2.value=2
bool='状态='+"'"+trim(thisform.text1.value)+"'"
endcase
thisform.dataenvironment.cursor1.filter=bool
thisform.refresh
return
5)病人入院信息登记功能:
功能代码如下:
InsertInto病人信息表(身份证号码,姓名,性别,年龄,家庭住址,联系方式);
values(Alltrim(Thisform.Text1.Value),Alltrim(Thisform.Text2.Value),;
Alltrim(Thisform.Text3.Value),val(Alltrim(Thisform.Text4.Value)),Alltrim(Thisform.Text5.Value),Alltrim(Thisform.Text6.Value))
Thisform.Text1.Value=""
Thisform.Text2.Value=""
Thisform.Text3.Value=""
Thisform.Text4.Value=""
Thisform.Text5.Value=""
Thisform.Text6.Value=""
Thisform.Refresh
6)病人住院情况查询功能:
功能代码如下:
docase
casethis.value=1
gotop
casethis.value=2
ifnotbof()
skip-1
endif
casethis.value=3
skip
ifeof()
skip-1
endif
casethis.value=4
gobottom
casethis.value=5
sfzh=""
doform输入身份证号码
qjlh=recno()
iflen(sfzh)<>0
locatefor身份证号码=sfzh
ifnotfound()
waitwindow"无此记录!
"
goqjlh
endif
endif
casethis.value=6
tj=messagebox('需要添加新记录吗?
',4+32+256,'确认')
iftj=6
appendblank
endif
casethis.value=7
sc=messagebox('需要删除当前记录吗?
',4+32+256,'确认')
ifsc=6
delete
pack
endif
casethis.value=8
thisform.release
endcase
thisform.refresh
7)出院信息处理功能:
程序代码如下:
SETDELETEON
Thisform.Text1.SetFocus
LocateForAlltrim(身份证号码)=Alltrim(Thisform.Text1.Value)AndAlltrim(姓名)=Alltrim(Thisform.Text2.Value)and;
Alltrim(性别)=Alltrim(Thisform.Text3.Value)and年龄=val(Alltrim(Thisform.Text4.Value))
Iffound()
Delete
Thisform.Text1.Value=""
Thisform.Text2.Value=""
Thisform.Text3.Value=""
Thisform.Text4.Value=""
Thisform.Text1.SetFocus
ELSE
MessageBox("键入信息有误,请您认真核对后重新键入信息!
",48,"警告!
")
Thisform.Text1.Value=""
Thisform.Text2.Value=""
Thisform.Text3.Value=""
Thisform.Text4.Value=""
Thisform.Text1.SetFocus
EndIf
Thisform.Grid1.Refresh
Thisform.Refresh
8)病房信息更新功能界面:
程序代码如下:
a=alltrim(thisform.text4.value)
locatefor房号=alltrim(thisform.text1.value)and床位=alltrim(thisform.text2.value)
docase
case单价=alltrim(thisform.text3.value)
update病房信息表set单价=a
case状态=alltrim(thisform.text3.value)
update病房信息表set状态=a
case值班医生=alltrim(thisform.text3.value)
update病房信息表set值班医生=a
case护理人员=alltrim(thisform.text3.value)
update病房信息表set护理人员=a
endcase
thisform.text1.value=""
thisform.text2.value=""
thisform.text3.value=""
thisform.text4.value=""
thisform.refresh
9)系统登录密码的修改功能:
功能的程序代码如下:
setexacton
ifempty(thisform.text1.value)
messagebox("请您注意,用户名不能为空!
")
thisform.text1.setfocus
else
xm=alltrim(thisform.text1.value)
gh=alltrim(thisform.text2.value)
xmm=alltrim(thisform.text3.value)
qrmm=alltrim(thisform.text3.value)
locateforalltrim(工号)=ghandalltrim(姓名)=xm
iffound()
ifxmm=qrmm
update工作人员表set工号=xmmwherealltrim(工号)=gh
thisform.text1.value=""
thisform.text2.value=""
thisform.text3.value=""
thisform.text4.value=""
messagebox("密码已修改成功!
",48,"提示!
")
else
messagebox("密码不一致,请您重新键入密码!
",48,"警告!
")
thisform.text2.value=""
thisform.text3.value=""
thisform.text4.value=""
thisform.text2.setfocus
endif
else
messagebox("密码错误",48,"警告!
")
thisform.text1.setfocus
endif
endif
thisform.refresh
10)报表打印功能:
三.经验总结
1.经验:
1)建报表时,在预览情况下,某些数据没有显示,原因是在拖拽字段的过程中,缩短了它本身具有的长度,这样在显示的时候没有足够的空间来显示相应的数据。
2)在编写程序代码时,会出现死循环,无法停止运行,则重新仔细检查程序,转换思路,尝试不同方法路径,最终解决了疑难问题。
3)在这次的管理信息系统的课程设计中,不但要设计实现系统的功能,而且要充分考虑系统的流程性,数据的少数输入原则,以避免出错,是系统更加严密,更加有实用性。
2.主要收获:
将书本知识应用于实际问题,更加深刻地理解了书本上的内容,更加清楚的了解了系统的流程性、数据的流程性。
同时切身体会如何在实际系统软件开发中应用VisualFoxpro数据库语言程序设计中的工具和程序语言结构。
在这次课程设计中,不但要实现系统的各项功能,而且流程性要好。
同时认识到在以后的管理信息系统设计中,一定要先从系统性、流程性方面考虑,然后再进行系统功能的规划,这样整个系统会更严密,更有实用性。
在以后的学习中更加努力,认真,掌握好管理信息系统的思想和原理、数据库语言和计算机知识,并善于将所学的知识更加灵活地应用于实际生活中,解决实际问题。
在这次课程设计中,我觉得自己的耐力、毅力、独立思考和解决问题的能力有了很大的提高,以后我也一定要将这种精神坚持下去。