完整word版医院门诊挂号系统数据库设计与应用课程设计.docx
《完整word版医院门诊挂号系统数据库设计与应用课程设计.docx》由会员分享，可在线阅读，更多相关《完整word版医院门诊挂号系统数据库设计与应用课程设计.docx（19页珍藏版）》请在冰豆网上搜索。
完整word版医院门诊挂号系统数据库设计与应用课程设计
成绩：
数据库技术与应用
课程设计
题目：
医院门诊挂号系统
班级：
软件2班
************
学号：
********
日期：
评语：
签字：
1系统总体设计方案
1.1系统实现目标
本系统是一个功能强大、操作使用简单、智能化、可扩展性、集成有效性和垮平台的医院门诊挂号系统。
1.2系统功能模块设计
图1.2.1功能模块
其中各模块的信息维护还包括对各类信息的增删改查操作。
后台管理（权限管理）若为超级管理员，则可进行用户的增删改查
由于多组合查询功能比较简单，只需输入相关查询的条件即可进行多组合模糊查询，因此在此并没有画出查询子系统的总体结构。
1.3数据库设计
1.3.1数据库表设计
数据库表的命名是用表名的英文或英文缩写，编程实现简单易记。
（1）用户信息表Tuser：
保存系统使用者的信息，包括用户名及其密码。
（2）医生资料表TDoctor:
保存医生信息，包括医生所属的科室。
（3）科室资料表TDepartment:
保存科室分类信息，如分为内科、外科。
（4）病人信息表TPatient:
保存病人的基本信息，以后可以重复使用。
（5）门诊挂号表TRegister:
保存门诊病人挂号的信息。
（6）门诊挂号类型表TRegisterType:
保存门诊挂号类型分类信息及其挂号价格，如普通号、专家号。
1.3.2数据库表设计格式说明
在前章介绍的实体以及实体之间关系的基础上，形成数据库中表以及各个表之间的关系。
医院门诊管理系统数据库中各个表格的设计结果如下面的几个表格所示。
每个表格表示在数据库中的一个表。
表1-1用户信息表Tuser
编号
字段名
字段代码
字段类型
允许为空
主键
外键
1
用户名
Uid
Varchar（50）
N
Y
2
姓名
Uname
Varchar（50）
Y
3
密码
Upwd
Varchar（50）
N
4
身份证
UIDcard
Varchar（50）
Y
表1-2医生资料表TDoctor
编号
字段名
字段代码
字段类型
允许为空
主键
外键
1
医生编号
Did
Varchar（10）
N
Y
2
姓名
Dname
Varchar（50）
Y
3
性别
Dgender
Varchar（10）
Y
4
身份证
Didcard
Varchar（20）
Y
5
出生日期
Dbirthday
date
Y
6
所属科室编号
Dpmtid
Varchar（5）
Y
Y
7
电话
Dtel
Varchar（11）
Y
表1-3科室资料表TDepartment
编号
字段名
字段代码
字段类型
允许为空
主键
外键
1
科室编号
Dpmtid
Varchar（50）
N
Y
2
科室名称
Dpmtname
Warchar（50）
N
表1-4病人信息表TPatient
编号
字段名
字段代码
字段类型
允许为空
主键
外键
1
病人编号（就诊卡号）
Pid
Varchar（20）
N
Y
2
姓名
Pname
Varchar（50）
Y
3
性别
Pgender
Varchar（10）
Y
4
身份证
Pidcard
Varchar（20）
Y
5
出生日期
Pbirthday
date
Y
7
电话
Ptel
Varchar（11）
Y
表1-5门诊挂号表TRegister
编号
字段名
字段代码
字段类型
允许为空
主键
外键
1
挂号
Rid
Varchar（20）
N
Y
2
病人编号
Pid
Varchar（20）
Y
Y
3
挂号类型编号
Rtypeid
Varchar（10）
Y
Y
4
科室编号
Dpmtid
Varchar（5）
Y
Y
5
医生编号
Did
Varchar（10）
Y
Y
6
挂号日期
RegistDate
Datetime
Y
表1-6门诊挂号类型表TRegisterType
编号
字段名
字段代码
字段类型
允许为空
主键
外键
1
类型编号
Rtypeid
Varchar（10）
N
Y
2
类型名称
Rtypename
varchar（50）
Y
3
价格
Regprice
Money
Y
2系统实现
2.1PB11.5和SQLSERVER2012连接
PB11.5和SQLSERVER2012连接方式有两种，一种是通过ODBC数据源连接数据库，另一种是MSSSQLSERVER专用接口连接数据库。
前者首先在计算机ODBC数据源管理器中创建新的数据源，设置好DataSourceName（数据源名称）和DataBase（数据库文件名），然后在PB中建立数据库配置文件（配置文件就是命名了的一组连接到特定数据源或数据库的参数），输入ProfileName（配置文件的名字）和DataSource（定义好的ODBC数据源），点击Connect按钮即可。
此外，在通过专用接口连接数据库时还可以使用配置参数文件连接数据库。
配置参数文件主要包含数据库名，服务器地址，登录名，登录密码等内容。
2.2应用系统的对象
在应用程序对象的Open事件中输入如下代码：
SQLCA.DBMS="ODBC"
SQLCA.AutoCommit=False
SQLCA.DBParm="ConnectString='DSN=hmis;UID=hisl;PWD=123456'"
//连接数据库
ConnectusingSQLCA;
ifsqlca.sqlcode<>0THEN
messagebox（"数据库连接出错",SQLCA.SQLerrtext）
else
open（w_login）
endif
应用程序运行后连接数据库，数据库连接好后就出现系统登录界面，否则退出系统，直至数据库连接成功.在应用程序对象的变量定义窗口中，定义全局变量用于应用程序不同对象间参数的传递。
2.3登录模块
2.3.1功能概述
用户登录系统窗口是用户进入系统的唯一通道，它是进入应用系统的喉舌，在安全保密、系统维护中占有重要的地位，登录系统在外观界面上一定要美观、友好，登录系统就是要验证当前的用户名是否与该用户密码一致，用户类型是否正确，限制用户登录出错的次数，保留登录痕迹等工作。
2.3.2主要技术要点
（1）保留登录痕迹
根据操作局部性原理，一般情况下用户上次登录之后还会继续登录，因此在程序中可以依照人机交互界面友好性原则保留用户登录时的用户名，控件sle_1用来显示用户名，profilestring是一个函数，用来读取profile文件中一组参数，核心代码如下:
//将登录名写入配置文件
SetProfileString（"user.ini","user","username",sle_1.text）
gs_username=sle_1.text
//将配置文件中的登录名写到用户名的编辑框中
sle_1.text=profilestring（"user.ini","user","username",""）
iftrim（sle_1.text）<>""then
sle_2.setfocus（）
else
sle_1.setfocus（）
endif
（2）友情提示用户登录出错的原因
用户登录错误的原因可能包括用户名不存在，密码错误等等
核心代码如下：
t//判断输入的用户名是否存在。
密码是否正确
selectUid,Upwdinto:
lg_uid,:
lg_upwdfromTUserwhereUid=:
sle_1.text;
iflg_uid=""then
st_4.text="提示：
当前输入的用户名不存在！
"
sle_1.text=''
sle_2.text=''
sle_1.setfocus（）
return
endif
iflg_upwd<>sle_2.textthen
st_4.text="提示：
输入的密码错误！
"
sle_2.text=''
sle_1.setfocus（）
return
endif
2.4系统主窗口和菜单的设计
2.4.1功能概述
医院门诊挂号系统的主窗口是信息管理系统的重要部分，勾勒出整个应用程序的概况，系统的主要功能为：
病人首次就诊（即需要填写病人信息来办理就诊卡）、就诊卡就诊、当前科室挂号量以及挂号信息的查询医生信息管理（包括增删查改）、科室信息管理（包括增删查改）、用户信息管理，注销（可以切换用户）。
2.4.2主要技术要点
（1）对主窗口中的功能按键进行了权限管理
在本系统中实现的是当登录的用户不是超级管理员，即用户名为000的用户使，用户无法使用后台信息管理功能。
核心代码如下：
stringuser
user=profilestring（"user.ini","user","username",""）
ifuser="000"then
m_main.m_后台管理.enabled=true
else
m_main.m_后台管理.enabled=false
endif
（2）定义了计时器，可以随系统显示当前时间和当前使用这个系统的用户名
核心代码如下
datetimed1
selectgetdate（）into:
d1fromTuser;
this.title="医院门诊挂号系统"+""+gs_username+""+string（d1）
2.5首次就诊卡就诊
2.5.1功能概述
首次就诊卡就诊是门诊挂号管理中比较重要的模块，由于病人没有就诊卡号故先进行信息录入，并赋予一个就诊卡号，随之，即可进行挂号，选择挂号科室，类型，医生，还可以查询当前该科室的挂号人数，所有这些信息均会在一个框内打印出来，用户可以查看这些信息。
2.5.2主要技术要点
（1）挂号功能
由于该功能是将录入病人信息和挂号结合合在一起，故使得操作更为简便。
stringreg_gender
ifrb_1.checked=truethen
reg_gender="男"
endif
ifrb_2.checked=truethen
reg_gender="女"
endif
datedt
dt=date（dp_1.text）
insertintoTPatient（Pid,Pname,Pgender,Pidcard,Pbirthday,Ptel）values（:
sle_3.text,:
sle_2.text,:
reg_gender,:
sle_5.text,:
dt,:
sle_1.text）;
datetimeregdt
st
升级会员 