《医院信息系统》实验报告

上传人:lis****210 文档编号:117641036 上传时间:2022-07-09 格式:DOCX 页数:25 大小:449.86KB
收藏 版权申诉 举报 下载
《医院信息系统》实验报告_第1页
第1页 / 共25页
《医院信息系统》实验报告_第2页
第2页 / 共25页
《医院信息系统》实验报告_第3页
第3页 / 共25页
资源描述:

《《医院信息系统》实验报告》由会员分享,可在线阅读,更多相关《《医院信息系统》实验报告(25页珍藏版)》请在装配图网上搜索。

1、湖北中医药大学 医学信息工程专业 实验报告 课程名称医院信息系统课程设计 实验题目 和协医院门诊挂号系统 实验日期:2012年05月以日起2012年05月28日止 班 级:09级信工(2)班 姓 名:途彦 学 号:20090702076 指导教师:沈邵武肖勇 目录 第一章概述 3 L1背景 -3- L2系统开发目的与意义 -3- 第2章系统需求分析 -3- 2.1现行系统调查 -3- 2.2业务流程分析 -3- 2. 3数据流程分析(略) -4- 2.4现行系统存在的主要问题和薄弱环节 -4- 第3章系统总体设计 -4- 3.1系统开发目标 -4- 3

2、.2系统功能设计 -4- 3.3系统数据流程 -4- 3. 4新系统数据模型(E-R图) -4- 3. 5数据库结构设计(含数据字典) -6- 第4童系统详碱计 -7- 4. 1系统功能模块说明 -7- 4. 2界面设计 -8- 4.3代码设计 -9- 第5章系统实施 -23- 结论 -23- 参考文献 -24- 第一章概述 1.1背景 21世纪是一个信息化的时代,可以毫不夸张的说,离开了信息,一切将无从运转。而 一向以治病救人为目的的医院为了提高服务质量,加强内部管理,改善医患关系,也纷纷将 人类智慧的结晶一一信息技术引进来。一时间,医院信息化的浪潮席卷全球。我们国

3、家虽然 起步较晚,但是后劲足。时值十二五规划期间,党和国家纷纷出台各种政策和投入大量人力 物力,以利于医院信息化的建设。 1.2系统开发目的与意义 医院信息系统并非是以机械的代替传统的手工操作,其意义一方面在于利用现代信息 技术的高度时空伸缩性,将有限的医疗资源充分利用起来,缓解当前形势下,我们国家百姓 抱怨看病难,看病贵的问题;另一方面在于利用现代信息系统强大的功能,对医院进行管理, 将医务人员从以前繁重的工作中解放出来,并旦可以辅助医务人员进行口常诊断。 门诊挂号系统作为医院信息系统的一个子系统,是整个医疗活动的开始阶段,其重要 性不言而喻,与传统的手工录入信息相比,本系统智能化程度

4、高,出错概率小,分工明确, 操作简单易上手,适于大面积推广。 第2章系统需求分析 2. 1现行系统调查 经过实地调查与网上搜集资料综合分析,大部分医院所用的挂号系统操作不方便,而且 不适合与医院信息系统集成,造成了各自为政的局面,阻碍了医院信息化的发展,甚至有部 分医院仍在使用手工的方式填写挂号单,这种方式不利于病人信息的储存,而且也因为修改 方便,一旦出现医疗纠纷,往往损害的是病人的利益,造成不公。 2. 2业务流程分析 挂号员和管理员先通过用户名和密码进入的操作界面,挂号员负责给病人输入挂号信 息,由于很多内容都是系统生成,挂号员所要输入的仅是病人的姓名和性别,其它的可以通 过下

5、拉框进行选择,例如选择急诊,那么挂号费用就会自动显示所对应的金额,选择一个科 室,医生这一栏就自动显示对应科室的医生,挂号员只有对病人进行挂号的权限。管理员进 入对应的页面之后,可■以对挂号表进行查询,查询方式有多种,如:按挂号口期查询,按挂 号编号•查询,按挂号姓名查询,显示所有信息。管理员还有退号的权限,进入相应的界面后, 输入病人的挂号编号,就可以退号了。 2.3数据流程分析(略) 2. 4现行系统存在的主要问题和薄弱环节 1. 现行的系统存在着分工不明确,例如挂号员和管理员集于一身,对数据的权限控制 形成真空,不利于保护的用户的信息。 2. 现行系统比较分立,各自独立,不能集成

6、为一个大型的,功能强大的医院信息系统。 第3章系统总体设计 3.1系统开发目标 本系统是为了对现行的系统的功能进行改进,以期最大的程度方便挂号员挂号,有效的 缩短患者挂号的等待时间,以及对用户的信息进行必要的保护。 3. 2系统功能设计 1. 对用户的身份进行验证 2. 添加(打印)挂号信息 3. 查询并统计挂号信息 4. 删除(退号)挂玷者的信息 3. 3系统数据流程 首先,用户的信息是事先直接添加到数据库中的,用户(挂号员和管理员)凭各自的用户 名和密码选择要进入的操作界面,若条件符合,则进入;否则给出错误提示。 挂号员进入挂号界面,其中医生和科室的信息是直接从数据库

7、中查询后显示的,选择不 同的科室,显示医生就会不同,挂号的编号和挂号日期是系统自动生成的,不允许用户修改, 用户只要输入挂号者的姓名和年龄,选择性别,就可以将挂号信息添加到数据库中,至于打 印挂号单,目前没有实现,只是用了一个按钮表示。 管理员进入管理界面可以对挂号的信息进行查询,查询方式有按口期,按编号,按姓名, 查询的信息来自挂号表,还可以根据编号删除相应的挂号信息,己完成用户的挂号退号要求。 3.4新系统数据模型(E-R图) 3.5数据库结构设计(含数据字典) 表名:yonghu 字段名 数据类型 含义说明 空值情况 userid

8、tinvint J 用户编号 主关键字 userName varchar(20) 用户姓名 不为空 passwd varchar(20) 用户密码 不为空 grade tinvint J 用户权限级别 不为空 表名:registered 字段名 数据类型 含义说明 空值情况 gliNo vaichai(10) 挂号编号 主关键字 gliXin vaichai(10) 挂号姓名 不为空 xb chai (2) 性别 不为空 ill chai (2) 年龄 不为空 glLb vaichai(10) 挂号类别 不为

9、空 gliKs varchar(20) 挂号科室 不为空 zzYs varchar(20) 专家医师 不为空 ghFy vaicliai(5) 挂号费用 不为空 ghy vaichai(10) 挂号员 不为空 ghRq vaichai(10) 挂号日期 不为空 表名:ks 字段名 数据类型 含义说明 空值情况 ksNo tinvint 科室编号 主关键字 ksName vaichar(20) 科室名称 不为空 表名:doctor 字段名 数据类型 含义说明 空值情况 docld smallmt 医生编号

10、 主关键字 docName vaichar(20) 医生姓名 不为空 docKs tinvint J 医生科室 不为空 第4章系统详细设计 4. 1系统功能模块说明 1. 对用户的身份进行验证:己确认用户信息是否正确,并根据用户的权限级别,让用 户进入相应的界面。 2, 添加(打印)挂号信息:根据输入的信息,添加到相应的挂号表中去 3, 查询并统计挂号信息:选择一种查询方式,根据输入的内容,查询并统计相应的信 息,例如选择按口期查询,输入想查询的口期,就可以查到当天挂号的人数和详细信息。 4. 删除(退号)挂号者的信息:根据输入的挂号编号,可以从挂号表中删除该

11、挂号者的信 息,事先对是否存在该用户做了判断。 4. 2界面设计 登陆界面 挂号界面 匚叵冈 |ghFy |ghy |ghiq - 管理界面 gliNu IgFMn xblnl] ghLb |ghKs kzYs 2012052000 2012052001 2012052002 2012052003 2012052004 2012052005

12、•□-3 bb CO dd cc ff * 23 另23警通门诊 女23专家门诊 女23专病门诊 女23有诊 男23传兔病(形 专病门诊 内科 目科 外村 toil Project 1 区j 景玲 I 件时沱贸温 张李华孙吴 避超 tem 戏 华华华华华 v®^-■ .lx 201205.20 201205.20 201205.20 201205.20 201205.20 共查询到6条记录 :二二明二二 M 梅国强 舞:华杰 201205.20 I查询所有 .com/Dull: 管理界面

13、 退号处理界面 4.3代码设计 Umtl代码如H: unit Umtl; inreiface uses Windows, Messages. SysUtils, Valiants, Classes. Giaplucs, Contiols. Forms. Dialogs. StdCtils, Mask, DB. ADODB. DBTables. jpeg. ExtCtrls: type TFonnl - class(TFoim) Editl: TEdit; Edit2: TEdit; RadioButt on 1: TRa

14、dioButton; RadioButton2: TRadioButton; Buttonl: TButton: Button2: TButton: ADOCoiinectionl: TADOConnection; ADOQueryl: TADOQuery; Image 1: TImage; Labell: TLabel; Label2: TLabel; procedure Buttoii2Click(Sendei: TObject); procedure ButtonlClick(Sendei: TObject); private (Private declaiati

15、ons ) public (Public declarations ) end: var Fonnl: TFonnl; implementation uses Umt2. Unit3; {SR ♦.dfin} procedure TForml Buttoii2Click(Sendei: TObject); begin close; end; procedure TForml.ButtonlClick(Sender: TObject); var g:integer; begin g:-o; if RadioButtonl .Checked then g:-2;

16、 if RadioButtoii2.Checked theng:-l; with ADOQuer\4 do begm close: sql.Cleai: sql.Add(*select * from yonghu where username-:name and passwd-:pass and grade-^ade'); ADOQuend.Pai ameters[O].Value:-editl.Text; ADOQuend.Pai ameters[l].Value:-edit2.Text; ADOQueryrl.Paiaineters[2].Value:-g; execs

17、ql; open; if recordcount>0 then begm if RadioButtonl Checked then fbrni2.Show; if RadioButton2.Checked then fdnn3.show; end else begm edit 1 Tag:-edit 1 Tag-rl; if editl.Tag>3 then begin showMessage(对不起,您无权使用该程序!,); Application. Tenninate; end else begin showMessage(对不起,您输入的用户名或密码有误

18、,造重新输入!,); editl.Text:-M; edit2.Text:-M; end; end: end; end; end. Umt2代码如下: unit Unit2; interface uses Windows, Messages. SysUtils, Valiants, Classes. Graphics, Controls, Forms, Dialogs. StdCtds, DB. DBCtils. DBTables, ADODB. jpeg, ExtCtrls; type TFonn2 - class(TForm) Button 1: TButt

19、on: Button?: TButton: Button3: TButton: Editl: TEdit; ADOQueryl: TADOQuery; ADOCoiinectionl: TADOCoimection; Edit2: TEdit; Button4: TButton: Button5: TButton: ComboBox2: TComboBox; ComboBox3: TComboBox; ComboBox4: TComboBox; ComboBox5: TComboBox; ComboBoxd: TComboBox; Edit3: TEdit; Ed

20、it4: TEdit; Image 1: TImage; ComboBoxl: TComboBox; Labell: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; Label6: TLabel; Label?: TLabel; Labels: TLabel; Label9: TLabel; LabellO: TLabel; procedure FonnShow(Sender: TObject); procedure Button4Click(Sendei: TObjec

21、t); procedure Buttoii2Click(Sendei: TObject); procedure ButtonlClick(Sendei: TObject); procedure Button5Click(Sendei : TObject); procedure ComboBox2Change(Sender: TObject); procedure ComboBox6KeyPiess(Sender: TObject; var Key: Char); procedure ComboBox 1 KeyPiess(Sender: TObject; var Key: Char

22、); procedure ComboBox2KeyPiess(Sender: TObject; var Key: Char); procedure ComboBox3KeyPiess(Sender: TObject; var Key: Char); procedure ComboBox4KeyPiess(Sender: TObject; var Key: Char); procedure ComboBox5KeyPiess(Sender: TObject; var Key: Char); procedure ComboBox3Change(Sender: TObject); pri

23、vate (Private decimations ) public (Public declarations ) end: var Fonn2: TFonn2; ghNo :string: implementation uses Umtl; {SR *.dfiii} procedure TForm2.FonnShow(Sender: TObject); begin with ADOQuer\4 do begm close; sql.Clear; sql.AddCselect top 1 ghNo from registered order by ghNo desc

24、'); execsql; open; ghNo :■ Fields[O].AsSumg; edit 1.Text:- IntToStr(StrToInt(ghNo)+ 1); close; sql.Clear; sql.AddCselect ksName from ks'); execsql; open: while not eof do begin comboboxS.Items.AddtfieldbynanieC^sName^.asstimg); next; end; ComboBox3 Itenilndex:-O; close; sql.Clear; c

25、ombobox4.Items.Clear; sql.Addfselect docName from doctor where docKs-:docKs'); ADOQue^l ,Paiaineters[O] .Value:-1; execsql: open; while not eof do begm combobox4.Items.Add(fieldbyname(,docName,).assumg); next; end; ComboBox4.IteniIndex:-0; end; if

26、oBox6. Itemindex:-0: if

27、; procedure TFoim2.Buttoii2Click(Sendei: TObject); begin edit2.Text:-K; edit3.Text:-K; ComboBoxl Itemlndex:-O; end; procedure TFoim2.Button 1 Click(Sender: TObject); begin if(edit2.Text o ”)then begin if

28、t mto registered values (”'十 edit 1 .text+””-edit2.text十””十ComboBoxLItems[comboboxl.ItemIndex]十””十 edit3 .Text+”',”'KomboBox2.It ems[combobox2.IteniIndex]+MVM+ComboBox3.Itenis[combobox3.IteniIndex]-t-n7H+ComboBox4.Iteins[combobox 4.IteniIndex]+,,,,K,+ComboBox5.Items[combobox5.ItemIndex]+,M/,,+Com

29、boBox6.Items[combobox6.ItemIndex]+H, ,*edit4.Text 十”')'); execsql; showMessageC恭喜,添加成功! '); end; edit2.Text:-M; edit3.Texl; ComboBoxl Itemlndex:-O; with ADOQuer>4 do begm close; sql.Clear; sql.Addfselect top 1 ghNo from registered order by ghNo desc'); execsql: open; ghNo :- Fields[O]

30、.AsStrmg; editl.Text:- IntToSti(StrToInt(ghNo)+l); end; end else showmessage(,请输入挂号者的年龄冗 end else showmessage(/请输入挂号者的姓名'); end; procedure TFoim2.Buttoii5Click(Sendei : TObject); begin fbim2.Close; xmqoA爵 m/u£「qoH板 pu9s)SSEdA 爵寸 Xo8oquloo?.lo 》mp80】d -OU9 OTU 3胃 x2o>.爵 m/u£「qoH板 pu9s

31、)SSEdA 爵 ExogoquIOoTuno 》mp80】d -OU9 OTU 【•a)9q x2o>.爵 m/u£「qoH板 pu9s)SSEdA 爵"xogoqurooTuno 》mp80】d -OU9 OV& x2o>.爵 m/u£「qoH板 pu9s)SSEdA 爵 TxogoquIOoTunoJX》mp80】d -OU9 一号 rrLXQPUIU&ISXOffloqmoo UIBOq 一号 -TXPUIU&ISXOffloqmoo UIBOq 一号 PUIW2I5xoffloqmoo UIBOq 35(忠一B.LXU 殳offloqmoom

32、 一号 二 LX9PUIUI2I5xoffloqmoo UIBOq (态一 J 撼皈.Lxg .殳。ffloqmoom 一号 oLX9PUIUI2I5xoffloqmoo UIBOq (态一 J®渤.Lxgaoffloqmoom xQwqoHuQPUQSvBacqo殳 ogoqurooTuno jx》mp80】d -OU9 >,oqs 】unqj key:-#O; end; procedure TFoim2.ComboBox5KeyPiess(Sendei: TObject;

33、var Key: Char): begin key:-#。; end; procedure TFoim2.ComboBox6KeyPiess(Sendei: TObject; var Key: Char); begin key:-#。; end; procedure TFoim2.ComboBox3Change(Sender: TObject); begin with ADOQueiy 1 do begm close; sql.Clear; combobox4.Items.Clear; sql.AddCselect docName from doctor wher

34、e docKs-:docKs'); ADOQuer>4 Paraineters[O].Value:-combobox3.IteniIiidex-rl; execsql; open; while not eof do begin combobox4.Items.Add(fieldbyname(,docName,).assumg); next; end; end; ComboBox4.IteniIndex:-0; end; end. Umt3代码如下: unit Umt3; interface uses Windows, Messages. SysUtils, V

35、ariants, Classes. Graphics, Contiols, Forms, Dialogs. StdCtds, Gilds. DBGnds, DB, DBTables, jpeg, ExtCtds, ADODB; type TFonn3 - chss(TForm) DBGndl: TDBGiid; Image 1: TImage; Label 1: TLabel; Button 1: TButton; Button2: TButton; Button3: TButton; Editl:TEdit; ComboBoxl: TComboBox; Label2:

36、TLabel; LabeB: TLabel; ADOCoiinectionl: TADOComiection; ADOQueryl: TADOQuery; DataSource 1: TDataSource; Tablel: liable; Label4: TLabel; Button4: TButton; Button5: TButton; procedure FonnShow(Sender: TObject); procedure Button3Click(Sendei: TObject); procedure Buttoii2Click(Sendei: TObjec

37、t); procedure Button 1 Click(Sendei: TObject); procedure Button4Click(Sendei: TObject); procedure Button5Click(Sendei: TObject); private (Private declarations ) public (Public declarations } end; var Fonn3: TFonn3; implementation uses Umtl. Unit4; {SR *.dfm} procedure TFoim3,FonnShow(Send

38、er: TObject); begin //dbgnd 1 .Colunms[0].Title.Caption:-*挂号编号 //dbgnd 1 .Columns] 1 [Title:盘挂号姓名。; //with ADOQuetyl do -61 - 柚碓•角布・网叮河dsia ["sp片日/ X而贸段王・一1叫叮,河dsia [9]sp片日/ :萍蚀官卉一四叮河dsia [s]spi。!% 朴*茉岳存一四叮河dsia [Hspi。!% :御由・一1叫叮,河dsg [£]spi。!% ••[iff 我 LioqW耶垣aldspi。!部/ 格琳布・网叮河dsg [t]spqu, ,含

39、物含孤一pqc]河 dsTQ〈。戏 XiucNAaP2U, Jbsgx。 :)01 口卬°-:9叫4\ [o]sj0】mnn€d [AignboOV X4b.n[3:-biq3 osqz pwqjstSqj utoij * 】g[9S,)ppv [bs :"9Q[bs Rsop inS^q op "ndOQV 叩tm mS^q g甲 颌■幽日 ^.-J^i TXoqoqiuoo);! uiS^q :(】g「qOJL :«puQS)ifon9Tuonnq fuuojx xnpsoid :pg :A\Ol{S TUT.TOJ :OSOJ3 £UT.TOJ uiS^q :(jOQ(q

40、01 mpgS)W!QWO))ns £unojx oinpsoid :pg ^jcurun^x uoTjuoTjddy uiS^q :(jOQ(q01 mpgS)W!Q买。))ns funojx oinpsoid :pg :PW :•血口各孤一网叮何dma [6]SP2U7 :褚.角 ^.-jsqcqXqdsia [s]sppij// :•山林有我l 1冲7何ds!a [/Jsp同助 :,而贸琲王L:PqcH何dma [9]SP2U7 滓姓昌我l 1冲7何ds!a [§]sp同助 :席采昌孤一网叮何dsTa[tdsp2U7 :•螺■L:pqc¥cids!a [£]sp同助 :•咯

41、料L:PqcH何dma ⑵SP2U7 M瞬 孤一网叮何dma [T]SP2U,7 :点蜥 ^.-^pqciXqdsia [o]sppij// inS^q// ・oc・ X,番由为,+(Junoopjoo9i)jjsoi)ui + Ji 舌限厚许)。矛sswunoqs mdo "bsgx。 :〈P9I9】S诣。i iuo.g * 】g[9s)ppv [bs moQlbs :9SOQ inS^q op [心冲0。¥叩tm uiS^q :(jg何01 :np国S)甲TQ»uonna funojx “npsoid :pg :pu。 :pg X,番由为,+ (Junoopjoo9

42、i)jJS01)ui + Ji 舌限厚许)。矛sswunoqs mdo "bsgx。 :冲 IJTpiQig [o]simunnud "nboav :(,oxi{3:-O5[q3 osqz p^jqjstSw iuo.g * 】g[9S)ppv [bs moQlbs :9S0Q inS^q op [心冲0。¥叩tm mS^q u。甲〈啤辜含费•■-Jxojnxogoquio加 :pu。 :pg X,番由为,+ (JunoopiooM)iJS01)ui + Ji 舌限厚许)。矛sswunoqs mdo "bsgx。 :冲 IJTpiQig [o]simunnud "nbo

43、av %,uiX^lS:-iuxn2 0】9qz p^jqjstSw iuo.g * 】g[9S)ppv [bs moQlbs :9S0Q inS^q op [心冲0。¥叩tm mS^q u。甲(O 才 .-JXQi- TXogoquiooljT :pu。 :pg X,番由为,+ (Junoopjoo9i)jJS01)ui + Ji 舌限厚许)。矛sswunoqs mdo W □ •含我 i 冲1 何 dsya [6]spi咆/ :酒 4我网叮Edsra [8]sp。!丑/ end; end; procedure TFoim3.Button5Click(Sendei

44、: TObject); begin fbim4.show; fbim3.Close; end; end. Unit4代码如下: unit Umt4; interface uses Windows, Messages. SysUtils, Valiants, Classes. Graphics, Contiols, Forms, Dialogs. StdCtils, jpeg, ExtCtrE. DB, ADODB; type TFonn4 - class(TForm) Editl: TEdit; Buttonl: TButton: Button2: TButton

45、: Button3: TButton: Image 1: TImage; Labell: TLabel; Label2: TLabel; ADOCoiinectionl: TADOConnection; ADOQueryl: TADOQuery; procedure Buttoii2Click(Sendei: TObject); procedure Button3Click(Sendei: TObject); procedure ButtonlClick(Sendei: TObject); private (Private declaiations ) public

46、(Public declarations ) end: var Fonn4: TFonn4; implementation uses Umt3; {SR *.dfiii} procedure TFoim4.Button2Click(Sendei: TObject); begin fbnn4.Close; fbnxB.show; end; procedure TFoim4.Button3Click(Sendei: TObject); begin Application. Tenninate; end; procedure TF01 m4.Bu(ton 1 Click

47、(Sender: TObject); var i: integer; begin i:-MessageDlg('确认要删除编号'十 editl.Text +,|l^\mtConfirmation.[mbYes,mbNo],0); iRi・6) then begin with ADOQiieryrl do begin close: sql.Cleai: sql.Add(*select * from xegistered where ghNo-:gliNo'); ADOQuend.Pai aineters[O].Value:-editl.Text; execsql; o

48、pen; if recordcount-0 then begin showmessage(,你所输入的编号不存在,请再次确认编号!); end else begin close; sql.Clear; sql.Addfdelete from registered where ghNo-:ghNo'); ADOQuer>4 Paiaineters[O] .Value:-editl Text; ExecSQL; showmessageC恭喜你,编号「十editl.Text + '已成功删除'); end: end; end; end; end. 第5章系统实施

49、 本系统对硬件的要求比较低,可在各种平台上流畅运行。数据库用的是sql server 2005, 可以放在一台普通的PC上,其他的PC与之联网即可,无要繁复的安装,操作简单易上手, 经过短时间的培训,即可熟练操作。 结论 学Delplu课程是在两年前的事了,距今时间长,中间又没有经常的去复习,所以很多 的内容都忘记了,而java我们学的又不是很深入,做这样的系统可谓是困难重重。考虑再 三,最终选择了 delplu,毕竟我们是学过的,回去看看书就能记起来了,而且delphi做界面 比较容易上手。 本次试验的项目我选的是门诊挂号系统,算是个小型项目,我本人也没有管理项目的经 验,再加上我们组

50、的另外一个项目比较大,需要人手,所以凭借一股不服输的决心,我一人 承担起这个项目的所有任务,包括从问题定义,到系统实施。还和另外一个组叫板,看看谁 先完成。 项目初始阶段就遇到了大的难题,那就是和数据库关联起来,由于在以前上delphi课程 的时候没怎么认真听,现在遇到麻烦了。于是上网查资料,看书,问同学,用了一下午的时 间把一个登录的功能实现了,取得了阶段性的胜利。完成了这个查询的功能,那么其他要对 数据库操作的基本上都是大同小异了。第二天,我花费了一天的时间,将其他的从界面到功 能大体都实现,看着自己的成果,虽然很累,可是也很欣慰。 接下来我把版本升级到2.0 了,加入了挂号退号处理的

51、模块,对其中一些不合理的逻辑 加以修正,对一些输入进行了验证,防止添加无效的,不合法的信息到数据库中去。 通过本次试验,我对门诊挂号的业务流程有了更好的认识,对程序中数据的流程有了更 清晰的思路,最后的体会是:编程虽然很累,很费脑子,但是能锻炼一个人的思维,培养一 个人冷静的思考方式,看着自己把想法变为现实,从中也能体会到不小的成就感。 最后感谢沈邵武老师和肖勇老师对我的指导,以及我们组员对我的大力支持和项目期间 提供的帮助。 参考文献 1. 医院信息系统 王明时主编 科学出版社 2. Delplu程序设计教程刘瑞新等编著 机械工业出版社 3. sql server 2005基础教程和试验指导清华大学出版社 4. 数据库原理与技术孙扬波等主编 武汉大学出版社

展开阅读全文
温馨提示:
1: 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
2: 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
3.本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
5. 装配图网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

相关资源

更多
正为您匹配相似的精品文档
关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

copyright@ 2023-2025  zhuangpeitu.com 装配图网版权所有   联系电话:18123376007

备案号:ICP2024067431-1 川公网安备51140202000466号


本站为文档C2C交易模式,即用户上传的文档直接被用户下载,本站只是中间服务平台,本站所有文档下载所得的收益归上传人(含作者)所有。装配图网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对上载内容本身不做任何修改或编辑。若文档所含内容侵犯了您的版权或隐私,请立即通知装配图网,我们立即给予删除!