医院骨密度数据管理系统的设计与实现
2013-07-31
延安大学附属医院 网络管理科，陕西 延安 716000
医院骨密度数据管理系统的设计与实现
冯海云，周红涛
延安大学附属医院 网络管理科，陕西 延安 716000
目的开发医院骨密度数据管理系统，用于科学管理患者的骨密度数据。方法采用VFP9.0开发医院骨密度数据库系统。系统主要由登录界面、数据的维护及查询模块、数据统计模块等组成。结果该数据库系统能方便地对病人骨密度数据进行存储、查找、统计和分析，极大地提高了使用者的工作效率。结论该数据库系统可以满足临床、科研和教学的要求。
医院骨密度数据管理系统；骨密度数据库；骨质疏松
0 前言
医院对病人骨密度数据的管理通常采用纸质的资料，或者存储在电脑的Excel表里，需手工来查找相关数据，这种传统的方式非常不方便，效率低下。当数据量较大时，对数据查找非常困难，且很难对数据进行需要的计算和统计。数据库是按照数据结构来组织、存储和管理数据的仓库，把病人的骨密度数据保存到数据库中是非常必要的。为此，我们设计和实现了医院骨密度数据管理系统[1-2]，以较好地解决上述问题。
1 系统的设计
根据临床需求，本系统设计的功能模块结构，见图1。数据浏览模块可以快速地浏览数据库里的所有数据，但不可以增加、删除、更改数据；查询数据模块可以根据病人姓名、性别和年龄段进行快速查询；维护数据模块可以向数据库中增加、删除和修改病人的数据信息；统计数据模块可以根据性别、年龄段、地域来计算骨密度各项数据的均值和标准差，统计相关人数；修改密码模块可用于用户修改密码，为系统安全提供保障；帮助模块提供版本、单位和开发者的信息，便于系统的升级和维护；退出系统模块可以对退出系统进行确认，以防误操作[3]。
图1 系统功能模块结构图
2 系统的实现
2.1 登录界面
系统启动后，首先出现的是登录界面，见图2。输入用户名和密码，进入系统的主菜单。如果3次输入密码错误，系统将会从登录界面自动退出，不再允许用户登录[4]。在系统登录表单的“load”过程中写入下列代码：
public n &&定义全局变量
n=0
use login.dbf &&打开存储用户名和密码的表
go top
图2 系统登录界面图
在“确定”按钮的“click”过程中添加如下代码：
n=n+1 &&n为全局变量初值为0 ，控制密码输入的次数
IF allt(Text2.value)=allt(login.password).and.allt(Text1. value)=allt(login.name)
do 菜单1.mpr &&如果用户名和密码正确，就调出主菜单
_screen.visible=.t.
thisform.release
ELSE &&否则提示错误信息
if n＞=3
=messagebox("你不是合法用户！你不能使用！！"64"提示窗口")
thisform.release
Clear events
else
=messagebox("口令不正确！请重新输入！"64"提示窗口")
thisform.Text2.value=''
thisform.Text2.setfocus()
endif
ENDIF
2.2 数据的维护及查询
数据维护功能可以向数据库中增加、删除和修改病人的骨密度数据，属于对数据库的常规操作，较容易实现[5]。数据查询功能要求根据病人的姓名、性别和年龄段进行自由组合查询，查询界面，见图3。“查找”按钮的主要代码如下：
if thisform.optiongroup1.value=1 &&判断是否只按年龄范围查找
CC1=val(ALLTRIM(THISFORM.Text1.VALUE))
CC2=val(ALLTRIM(THISFORM.Text2.VALUE))
CC4=ALLTRIM(THISFORM.Combo1.DisplayValue)
SET FILT TO 年龄＞=CC1 and 年龄＜=CC2 and 性别
=CC4
GO TOP
thisform.refresh
else &&只按照给定的姓名查找
CC3=ALLTRIM(THISFORM.Text3.VALUE)
set filt to 姓名=CC3
go top
thisform.refresh
endif
图3 数据查询界面图
2.3 数据统计
在该功能模块中，可以根据病人的性别、年龄段、地域等组合条件来计算骨密度数据L2_4、L2、L3、L4的均值和标准差，见图4。
图4 骨密度数据统计界面图
直接调用average函数就可以完成均值的计算，但在计算标准差就比较困难。标准差是方差的算术平方根，因此在计算标准差之前必须先计算方差，方差=[(x1-x)^2 +(x2-x)^2 +......(xn-x)^2]/n (x为平均数)，在程序中用一个循环来实现[6]。计算椎骨密度L2_4标准差的关键代码如下：
local s,sq1,sq2,sq3,sq4,C1,C2,C3,C4,T &&定义需要的变量
C1=thisform.Text1.value
C2=thisform.Text2.value
C3=thisform.Text3.value
C4=thisform.Text4.value
count to T &&获得记录的总数
copy to array b fields L2_4 &&把L2_4数据拷贝到数组b中
s=0
do while T＞0 &&通过循环来求平方和
s=s+(b(T)-C1)*(b(T)-C1)
T=T-1
enddo
count to T
s=s/(T-1) &&计算方差
sq1=sqrt(s) &&计算标准差
…
thisform.Text5.value=sq1 &&在表单的文本框内显示计算结果
thisform.Text6.value=sq2
thisform.Text7.value=sq3
thisform.Text8.value=sq4
thisform.refresh
当选定年龄范围、住址、性别等条件后 ，点击“均值”按钮就会计算出符合条件的所有人的骨密度参数L2_4、L2、L3、L4的平均值，然后再点击“标准差”按钮就可以计算出相应的标准差值。
3 结束语
骨密度数据管理系统采用Visual FoxPro9.0开发完成，系统具有很强的稳定性，减少了数据的冗余，提高了数据计算的效率，极大地方便了对数据查询和统计。实践证明，该系统可以满足临床、科研、教学的需求。
[1] 王珊,萨师煊．数据库系统概论[M]．4版．北京:高等教育出版社,2006．
[2] 严冬梅．数据库原理[M]．北京:清华大学出版社,2011．
[3] 何玉洁,刘福刚．数据库原理及应用[M]．2版．北京:人民邮电出版社,2012．
[4] 张洪举．Visual FoxPro软件开发模式与应用案例[M]．北京:人民邮电出版社,2005．
[5] 明日科技．Visual FoxPro管理信息系统完整项目实例剖析[M]．北京:人民邮电出版社,2005．
[6] 盛骤,谢式千,潘承毅．概率论与数理统计[M]．4版．北京:高等教育出版社,2010．
[7] 郭国斌,和钦安,杨保卫,等．我院健康体检系统的设计与开发[J]．中国医疗设备,2012,27(9):69-71．
[8] 姜鑫．生物信息学数据库及其利用方法[J]．现代情报,2005,(6): 185-187．
Design and Implementation of Data Management System of Bone Density in the Hospitals
FENG Hai-yun, ZHOU Hong-tao
Department of Network Management, Yanan University Affiliated Hospital, Yan’an Shaanxi 716000, China
ObjectiveTo develop the data management system of bone density to manage bone density data of patients for hospitals.MethodsUsing VFP9.0 development software to develop the system which includes modules such as logon screen, data maintenance and query and data statistics.ResultsBone density data of patients can be stored, searched, counted and analyzed through this system so that the user's work efficiency can be improved greatly.ConclusionThe system can meet the clinical, scientific research and teaching requirements.
data management system of bone density for hospitals; bone density database; osteoporosis
TP392
A
10.3969/j.issn.1674-1633.2013.09.014
1674-1633(2013)09-0042-03
2013-04-03
2013-07-19
本文作者：冯海云，工程师。
作者邮箱：fhy_mail@qq．com
