commit; else
rollback;
messagebox(\错误!!!\数据保存失败\ return end if
elseif updateornot=2 then rollback;
elseif updateornot=3 then return; end if end if
3.6 模板管理模块
在模板管理模块设计是为了医生可以完整的定义主诉病历处方模板，可以分别定义主诉、病历、处方的模板以及在必要的时候进行模板查询。此模块将更加方便医生平时的临床诊断，为临床科研提供依据。首先建立数据窗选择数据库表blcfb中的字段mbh,bzmc,bznr,cfnr,zsnr,ygh。在窗口中运用该数据窗，通过该数据窗可将数据保存到数据表中。以下的录入模板设计类似此病历处方模板录入模板如图14。
图14 完整模板录入界面
在前面提到的模板查询界面如图15所示：
第 18 页 共 30 页
图15 病历主诉查询模板
当医生输入病症名称之后，按下“确定”键就可以在数据窗口中显示相似病症的记录，如果相似病症是多条记录就可以通过“第一条”、“上一条”、“下一条”、 “最后一条”进行查询选择,代码如下:
⑴“第一条”
dw_1.scrolltorow(1)
st_4.text=\⑵“上一条”
integer row_current
row_current=dw_1.scrollpriorrow() st_4.text=string(row_current) ⑶“下一条”
integer row_current
row_current=dw_1.scrollnextrow() st_4.text=string(row_current) ⑷“最后一条” int row
row = dw_1.rowcount() dw_1.scrolltorow(row) st_4.text= string(row)
3.7 数据管理模块
在医院门诊庞大的日常管理工作中，不可缺少的是对后台数据库中的数据进行管理，在该功能模块中就提供了对数据的统计，查询。
第 19 页 共 30 页
⑴对挂号人数的分类统计（示例如图16）
在主界面中点击“数据管理”下的“挂号人数统计”，则通过如下代码进入统计方式选择界面：
opensheet(w_ghtongjilb,w_zhujiemian,8,original!)
根据不同选择然后判断打开何种统计图，如图16所示
图16 挂号科室人数统计界面
是挂号人数按照科室统计的饼状图。该类型统计先创建一个根据数据表ghdj中的jzid和kb字段来Graph类型的数据窗，通过对kb字段分类然后通过count(jzid for graph)然后在创建的统计窗口中使用该数据窗来实现。
⑵病人基本信息查询
设计可以综合条件的信息查询，提高可供选择的条件，医生可以通过组合条件对所需要的病人基本信息以及简要病史进行查询，如图17所示。
图17 病人基本信息查询窗口
⑶预付款查询
第 20 页 共 30 页
图18 查询剩余预付款界面
拥有查询预付款权限的员工进入该界面之后，只需要输入病人的病历号，点
击“确定”按钮（该按钮代码如下）：
dec a,b,c string d SELECT blh into :d FROM ghdj
WHERE blh=:sle_1.text; if ::sqlca.SQLCode=0 then
SELECT count(*) INTO :c ROM ghb WHERE blh=:sle_1.text; if c>0 then
SELECT sum(je) INTO :a FROM ghb WHERE blh=:sle_1.text; else a=0
messagebox('提示',\病人尚未交付预付金,请先补交预付金\ return end if
SELECT count(*) INTO :c FROM fyb WHERE blh=:sle_1.text; if c>0 then
SELECT sum(ypkb.jg * fyb.sl) INTO :b FROM ypkb,fyb WHERE fyb.blh=:sle_1.text and fyb.xmnl=ypkb.ypbh; a=a - b end if
if a>=50 then
d='目前预付金额还剩'+string(a)+'元' messagebox('剩余金额',d) elseif a>=0 then
d='目前预付金额仅剩'+string(a)+'元,请尽快补交预付金' messagebox('剩余金额',d)
第 21 页 共 30 页
else
d='目前预付金额透支'+string(Abs(a))+'元,请尽快补交预付金' messagebox('剩余金额',d) end if
sle_1.setfocus() else
messagebox(\提示\病历号输入有误,请检查后重新输入\end if
3.8 报表模块
由于前面的个功能模块中都对病人的就诊各阶段的结果进行查询，所以在设计报表功能模块时主要考虑对病人的预付款项以及病人的费用进行统计并呈报表。
首先创建一个祖先窗口w_preview如图19所示，它是报表生成的通用窗口，具有预览、放大缩小、打印、保存等功能，可以用于各个报表模块窗口的继承。
图19 报表祖先窗口
病人预付报表窗口是w_preview祖先窗口的继承窗口，具有w_preview窗口的功能，界面如图20所示。
病人预付报表窗口用于生成病人的费用凭单，既可以用来生成病人的所有费预付的款项凭单，也可以生成其中任何一次预付凭单。其与w_preview祖先窗口相比，多了一个显示功能，可以通过病历号或自动流水号来查询符合条件的记录，并显示在数据窗口中。
第 22 页 共 30 页
百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库某小型医院信息管理系统的设计与开发 - 图文(5)在线全文阅读。
相关推荐：