- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
医院信息管理系统报告-2012
专业课程设计报告
题 目:住院部信息管理系统
专 业
软件工程
学生姓名
班级学号
指导教师
指导单位
南京邮电大学计算机学院
日 期
2012-11-12至2012-11-22
评 分 细 则
评分项
优秀
良好
中等
差
遵守机房规章制度
上机时的表现
学习态度
程序准备情况
程序设计能力
团队合作精神
课题功能实现情况
算法设计合理性
用户界面设计
报告书写认真程度
内容详实程度
文字表达熟练程度
回答问题准确度
简 短 评 语
教师签名:
年 月 日
评分等级
备注
评分等级有五种:优秀、良好、中等、及格、不及格
- PAGE 12 -
住院部信息管理系统
设计目标
按照软件工程的规范,以SQL Server 2000为后台数据库,建议以delphi为前端开发工具,设计并实现一个医院住院部信息管理系统。
二、需求描述
医院的住院部管理非常复杂,它涉及众多诸如病人的信息、每天的具体费用、住院期间的总费用等问题,因此,设计本系统,完成病人住院登记、每天费用录入、费用查询、总费用统计等功能,具体需求如下:
住院登记,用于录入住院病人的信息,包括编号、姓名、性别、年龄、病房号、床号、住院日期、工作单位、病因、预交押金等信息,同时可浏览、添加、删除、编辑记录。
费用录入,用于录入病人每天费用清单,包括编号、姓名、护理等级、结算日期、护理费、床位费、注射费、药费、治疗费、手术费等,同时可浏览、添加、删除、编辑记录。
费用查询,提供主从界面,当在主表中浏览病人信息时,从表中将显示当前对应记录病人的所有费用记录。
总费用统计,在此页面中单击“开始统计”按钮,表格中将依次显示各病人的预交押金、总费用以及剩余或赊欠的费用,同时,文本框将显示催款名单,若无人欠款,将显示“没有任何病人赊欠费用”。
三、总体设计
本次实验以SQL Server 2000为后台数据库,以delphi7.0为前端开发工具,OS为WinXP sp1系统。
住院部信息管理系统用一个数据库和两张表进行存储
1,数据库:医院住院管理
2,表:1,基本信息 用于录入存储住院病人的信息,包括编号、姓名、性别、年龄、病房号、床号、住院日期、工作单位、病因等信息
具体设置如下
2,医院信息 用于录入病人每天费用清单,包括编号、姓名、护理等级、预交押金,结算日期、护理费、床位费、注射费、药费、治疗费、手术费等
具体设置如下
其中,总费用=([手术费] + [治疗费] + [护理费] + [床位费] + [注射费] + [药费])
剩余费用=([预约金] - [手术费] - [治疗费] - [护理费] - [床位费] - [注射费] - [药费])(当为-的时候为赊欠)
在前端Delphi开发中最终用到了5个form。
初期设计有6个form,分别为登录,导航,住院登记,费用录入,信息查询和总揽统计。在开发过程中将费用录入合并到信息查询这个主从界面form中以增强安全性和减少资源占用。
四、详细设计
1,Project1中自动生成的语句
program Project1;
uses
Forms,
Unit1 in Unit1.pas {Form1},
Unit5 in unit5.pas {Form5},
Unit3 in Unit3.pas {Form3},
Unit7 in Unit7.pas {Form7},
Unit8 in Unit8.pas {Form4};
{$R *.res}
begin
Application.Initialize;
Application.CreateForm(TForm3, Form3);//第一个位置为程序打开时的第一个窗口,这里设置为登录窗口。
Application.CreateForm(TForm1, Form1);//导航界面
Application.CreateForm(TForm5, Form5);//信息登记界面
Application.CreateForm(TForm7, Form7);//查询录入界面
Application.CreateForm(TForm4, Form4);//总揽统计界面
Application.Run;
end.
2,FORM3:登录窗口
两个用户:管理用户admin和一般用户123权限不同,代码设置如下
//先判断两个输入框是否都填入数据
if edit1.Text = t
文档评论(0)