当前位置：网学 > 设计下载 > PB毕业设计 > 正文

PB门诊电子病历系统开发与实现

论文降重修改服务、格式排版等获取论文论文降重及排版论文发表相关服务

【编者按】：网学网PB毕业设计为您提供PB门诊电子病历系统开发与实现参考，解决您在PB门诊电子病历系统开发与实现学习中工作中的难题，参考学习。

客服咨询，网学网竭诚为您服务，本站永久域名：myeducs.cn

4.7 模板管理模块设计

在模板管理模块设计是为了医生可以定义完整的定义主诉病历处方模板，可以分别定义主诉、病历、处方的模板以及在必要的时候进行模板查询。这将更加方便医生平时的临床诊断，为临床科研提供依据。

当医生输入病症名称之后，按下“确定”键就可以在数据窗口中显示相似病症的记录，如果相似病症是多条记录就可以通过“第一条”、“上一条”、“下一条”、 “最后一条”进行查询选择,代码如下:

⑴“第一条”

dw_1.scrolltorow(1)

st_4.text="1"

⑵“上一条”

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)

4.8 数据管理模块设计

在医院门诊庞大的日常管理工作中，不可缺少的是对后台数据库中的数据进行管理，在该功能模块中就提供了对数据的统计，查询。

⑴对挂号人数的分类统计（示例如图4-14）

在主界面中点击“数据管理”下的“挂号人数统计”，则通过如下代码进入统计方式选择界面：

opensheet(w_ghtongjilb,w_zhujiemian,8,original!)

⑵病人基本信息查询

医生可以通过组合条件对所需要的病人基本信息以及简要病史进行查询，如图4-15所示。

在图4-15的“显示”按钮的代码如下（通过代码将参数传递到图4-16所示的数据窗口中）：

long RowNumber //定义变量：当前行

string blh_String //定义变量：病历号

dw_jbxx_grid.SelectRow(0,false) //将所有行取消选中

dw_jbxx_grid.SetRowFocusIndicator(off!) //使当前行反显，并用手行表示

RowNumber=dw_jbxx_grid.GetRow() //得到双击的当前行

if rowNumber<=0 then return //如果双击的不是数据行

blh_String=GetItemString(dw_jbxx_grid,RowNumber,2) 当前记录的病历号

OpenSheetWithParm(w_jbxx_xs,blh_String,w_zhujiemian,8,Layered!)

在如图4-16所示的界面当中可以完成对数据报表的打印等功能。

⑶预付款查询

图4-17 查询剩余预付款界面

拥有查询预付款权限的员工进入该界面之后，只需要输入病人的病历号，点

击“确定”按钮（该按钮代码如下）：

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)

else

d=''目前预付金额透支''+string(Abs(a))+''元,请尽快补交预付金''

messagebox(''剩余金额'',d)

end if

sle_1.setfocus()

else

messagebox("提示","病历号输入有误,请检查后重新输入")

end if

上述程序主要实现了剩余预付款的计算，实现查询功能。

⑷检查化验结果查询

“血常规化验结果查询”、“尿常规化验结果查询”、“生化检查结果查询”、“检查结果查询”窗口的风格模式同基本信息查询窗口大致相同（如图4-17所示），此处也不再详细列出。

4.9 报表模块设计

由于前面的个功能模块中都对病人的就诊各阶段的结果进行查询，所以在设计报表功能模块时主要考虑对病人的预付款项以及病人的费用进行统计并呈报表。

首先创建一个祖先窗口w_preview如（图4-18）所示，它是报表生成的通用窗口，具有预览、放大缩小、打印、保存等功能，可以用于各个报表模块窗口的继承，代码见附录。

病人预付报表窗口是w_preview祖先窗口的继承窗口，具有w_preview窗口的功能，界面如图4-19所示。

病人预付报表窗口用于生成病人的费用凭单，既可以用来生成病人的所有费预付的款项凭单，也可以生成其中任何一次预付凭单。其与w_preview祖先窗口相比，多了一个显示功能，可以通过病历号或自动流水号来查询符合条件的记录，并显示在数据窗口中

此窗口所使用的数据窗口采用的是Group分组显示样式的，这种显示风格的特点是可以检索到的数据按某一列分组显示，并允许为每一组指定一些计算。本窗口就是按自动流水号来分组，分别对每一个自动流水号中的金额和整张预付凭单的金额进行统计。可以做到清晰明了，便于病人查阅。

病人费用报表与预付凭单报表风格模式上相同，都是由w_preview继承而来，界面和代码也不在详细列出。病人费用报表既可以根据病历号生成一个病人按照费用凭单号来分组的所有费用的单据，又可以根据费用凭单号生成其中一次费用的单据。

第五章系统的编译和发布

完成了医院门诊病人管理信息系统的编程工作并调试通过后，最后一步就是系统的编译和发布。这涉及到工程对象的创、可执行应用程序的生成以及发布环境的配置等多方面问题。一个系统开发的是否成功，归根结底是要看用户对系统的使用是否满意。本系统是一个数据库应用系统，需要涉及到数据库环境配置等问题。因此需要将系统应用程序编译成可执行文件，将应用所需要的环境发布出去，这样既可以减少应用程序的大小，又可以提高应用程序的运行速度。

和其他软件一样，用PowerBuilder提供的编译工具可将应用程序编译成可直接在系统下运行的应用程序。

5.1 创建工程对象

使用Project中的Application Wizard建立工程的基本步骤如下：

⑴在工具栏上单击New图标，选择Project页中的Application Wizard向导。

⑵在About the Application Project Wizard 对话框中单击Next按钮。

⑶在Specify Destination Library对话框中选择存储工程的应用库，本系统只有一个应用库，即cpr.pbl，单击Next按钮。

⑷在Specify Project Object 对话框中给工程命名为p_cpr_exe，单击Next按钮。

⑸在Specify Executable and Resource Files 对话框给可执行文件命名为E:\论文材料\我的毕业设计\毕业设计\cpr_sample2\cpr.exe，单击Next。

⑹在Specify Build Optuibs 对话框中选择编译类型Incremental Build(只重新编译新增部分)，并且选中Prompt for OverWrite 选中，表示当覆盖文件是出现提示，单击Next按钮。

⑺在Generate Machine Code 对话框中选择生成机器代码，单击Next按钮。

⑻在Specify Dynamic Library Options 对话框中选择应用程序生成动态库，单击Next按钮。

⑼在Specify Version Information 对话框中填写版本信息，单击Next按钮。

⑽在Ready to Create Application 对话框中单击Finish按钮，即生成了一个工程对象。

5.2 编译生成和测试

编译步骤如下：

⑴在PowerBuiler的环境下，打开该工程对象。

如图5-1所示在该对话框中列出了前面所设置的工程对象属性。可以在此处直接修改工作对象的各个属性。

图5-1　打开工程对象

⑵单击工程画笔工具栏上的Build图标进行工程编译。PowerBuilder将会弹出一个窗口，显示编译的过程信息。可以单击该窗口上的“Stop”按钮来终止编译过程。编译完毕后，即生成了相应的可执行文件和动态库文件。

编译通过后，生成可执行文件cpr.exe。在测试。发布前还要对生成的可执行文件进行测试，测试的步骤如下：

⑴离开PowerBuilder开发环境，返回到操作系统环境下。

⑵将编译好的文件拷贝到PowerBuilder库文件放置的路径下。

⑶运行可执行文件。

5.3 发布

通过上面测试的可执行文件，就可以进行发布了，考虑到最终用户使用机器的复杂性，还需要发布PowerBuilder的环境文件以及数据库运行的客户端软件。

PowerBuilder生成的可执行文件必须在其自身带的支持文件的帮助下才能运行。用户安装了PowerBuilder后，目录“Sybase\Shased\PowerBuilder”下就具有了这些支持文件。应用程序中不同的对象需要不同的支持文件。在发布应用程序时，必须发布的文件有PBVM90.DLL、LIBJCC.DLL、PBDWE90.DLL、PBRTC90.DLL、NPDWE90.DLL、NPPBA90.DLL、PBTRA90.DLL等。

第六章结论

目前，在医学领域内计算机的应用已经十分广泛，各种智能诊断设备都与计算机紧密结合在一起，以硬件为主的医疗设备智能化发展尤为迅速。然而以软件建设为基础的医院的现代化管理系统发展却相对缓慢。传统手工的业务处理方式，停留在纸作业基础上的管理模式，不仅速度慢、手续复杂，而且容易发生错误，已不能适应医院现代化发展的需要。建立医院电子化管理成为现代化发展必然选择。

本系统正是基于对医院门诊大概需求的理解，在满足基本业务的前提下，结合医院的管理特点、融合医院领导现代化的管理理念、以病人信息为中心的医院门诊病人信息管理系统。目的是通过对病人在门诊过程中产生的信息进行数字化管理，简化门诊手续，加快信息处理速度，提高治疗与管理效率。主要包括病人就诊管理、病历书写模板、医生出具处方、费用结算、病历查询打印统计等模块在内的计算机管理系统，以实现门诊病人就医信息管理电子化。

本系统以病人为中心，侧重于病人在门诊就医过程中信息的管理，便于医生跟踪病人病情发展情况，同时也有助于医生对各种病例进行分析研究。由于时间的限制，对于等各类员工信息，医院药品等方面的细节没有过多详细的设计。这些部分属于医院信息管理系统中其他模块的主要内容，本系统只是设计了其中与门诊系统有密切关系的部分。