医院药品管理系统数据库的设计Word文档下载推荐.doc
《医院药品管理系统数据库的设计Word文档下载推荐.doc》由会员分享,可在线阅读,更多相关《医院药品管理系统数据库的设计Word文档下载推荐.doc(15页珍藏版)》请在冰豆网上搜索。
随着医药卫生体制改革的深入,医药连锁经营的推行以及日趋激烈的商业角逐,越来越多的医药经营企业意识到提高企业管理水平的重要性,也迫切要求加快管理信息化的进程。
在医药行业中,医药经营企业的物流管理以及相应的财务处理、信息处理,长期以来一直采用手工操作,但随着产业结构调整、全新的市场竞争环境,企业管理和运营效率已经成为企业成败的关键所在,手工方式的弊端毕现无遗。
这就要求药品管理摆脱过去人手操作的烦琐过程,对所有的药品管理数据实行智能管理,促使药品管理朝着科学化和规范化的方向前进。
随着计算机技术的普及,在医药行业中,医药经营企业逐渐借助计算机技术去完善医药的管理和提高自身的工作效率,以赢得市场竞争的胜利。
因而药品管理信息系统已经成为各医药经营企业实现药品管理网络化和信息化的必备工具,是医药经营企业规模经营管理不可缺少的部件之一。
同时,软件开发环境的高度集成和数据库技术的日益成熟成为开发药品管理信息系统的技术基础,大大降低了系统的开发成本。
系统开发工具的智能化、人性化,使得所开发的系统充分满足了医药经营企业的各种需求,从医药经营企业的各个环节对人流、物流、资金流、信息流进行统一系统的管理。
市场的需求和技术的支持,最终会导致越来越多的优秀药品管理软件的出现,并在竞争中得到不断的完善和优化。
2、需求分析
这个系统是帮助他们完成日常繁重窗口业务的工具。
借助计算机系统,使他们凌乱的工作变得有条理,解脱他们需要记忆大量信息(药品的规格,价钱,疾病的名称与编码等)的困难。
保证他们遵守某些规范,减轻他们汇总、统计、报告和传递这些信息的负担。
因此,尽量符合这些事务处理级工作人员的工作秩序与工作习惯,功能完整,操作简单,响应迅速,界面友善,易学易用成为这类软件必须满足的功能要求。
管理员登录以后可以很清晰的看到各种项目列表和可以实现的功能,库存管理和药品管理一目了然。
由于是限定医院使用,所有只有登录系统。
库存管理功能是在使用系统的开始初始化医院的库存,并进行库存管理的其他操作,可以修改库存,读取。
这个药品管理系统主要涉及医院药库的药品进、出、存等业务,以及入库、出库和库存管理,药品管理主要管理药库中所有药品的进出和内部统计计算,为药品会计提供基础数据,以及包括有效期的报警和下限报警。
3、数据库设计
本系统主要由用户管理、入库管理模块,出库管理模块,过期药品管理,供应商管理
3.1系统结构图
药品信息查询
药品信息报表
出库管理
医院药品管理
取药记录计费
取药记录报表
取药记录查询
药品信息管理
修改
库存
查询
入库
登记
入库管理
药库
清理
供应商信息查询
供应商查询
免费药品清理
删除
过期
过期药品管理
编辑
信息
权限
添加
用户
用户管理
业务流程图:
药品
库存
职工
供应商
订单
入库
出库
3.2系统部分流程图
概念设计部分主要包括实体的E-R图、联系的E-R图和系统总的E-R图。
由需求分析知,基本实体有药品、职工、供应商、库存和用户登录信息。
(1)药品E-R图:
药品编码
药品名称
药剂
有效日期
售价
药品信息表
字段名
数据类型
数字
药品名
文本
数子
日期/时间
(2)职工E-R图:
性别
姓名
联系方式
身份证号
职位
职工号
地址
职工信息表
男/女
练习方式
文本
(3)供应商E-R图:
供应商编码
负责人
供应商名称
邮箱
所在城市
供应商信息表
供应商名
(4)库存E-R图:
库存量
库存信息表
(5)用户登录信息E-R图
用户名
密码
用户登录信息表
3.3各个实体关系E-R图
登记编号
身份证号码
名称
联系人
供求
供给
3.4各个表的关系图
4、应用程序设计
4.1程序登陆界面的设计
设计效果如下图:
4.2程序主切换面板的设计
4.3程序增删改界面的设计
4.4程序查询界面的设计
5、编码与调试
5.1登陆界面窗体程序代码的设计
登陆界面窗体设计,如果在登录过程中输入密码有误,将登陆不进系统,只有输入密码正确才可以进入系统。
程序代码设计如下:
OptionCompareDatabase
DimtextAsString
Dimtext1AsString
DimlentextAsInteger
DimiAsInteger
DimdAsInteger
PrivateSubConcel_Click()
OnErrorGoToErr_Concel_Click
'
DoCmd.Close
Quit
Exit_Concel_Click:
ExitSub
Err_Concel_Click:
MsgBoxErr.Description
ResumeExit_Concel_Click
EndSub
PrivateSubOK_Click()
OnErrorGoToErr_OK_Click
IfNz([password])=Nz(DLookup("
[密码]"
"
用户密码表"
[用户名]="
&
"
"
username&
))_
AndMe.username<
>
Then'
验证用户和密码)
Me.Visible=False'
隐藏窗体
DoCmd.OpenForm"
主切换面板"
Else
MsgBox"
输入密码有误,请您重新输入!
,"
出错"
Me.username.SetFocus
EndIf
Exit_OK_Click:
Err_OK_Click:
ResumeExit_OK_Click
5.2主切换面板窗体程序代码的设计
主切换面板窗体的设计,在系统登录界面验证操作员密码后,将进入程序主界面。
通过程序主界面将会执行相应的权限操作,并且还可以通过主界面的菜单,来调用相应程序,再进行相应操作。
5.3增删改界面窗体程序代码的设计
增删改界面窗体的设计,可以对药品增删跟供应商增删等操作。
PrivateSubCommand15_Click()
Me.Visible=False
DoCmd.OpenForm"
PrivateSubCommand17_Click()
DoCmd.RunCommandacCmdSaveRecord
DimrsAsNewADODB.Recordset
Dimstr_tempAsString
str_temp="
select*from库存Where产品编号="
产品编号&
rs.Openstr_temp,CurrentProject.Connection,adOpenDynamic,adLockOptimistic
IfNotIsNull(rs)Then
rs("
库存量"
)=rs("
)+入库数量
rs.Update
5.4查询界面窗体程序代码的设计
查询界面窗体的设计,根据输入的职工号、判断数据库中是否存在其中的信息。
如果存在,则将这个节点的所有信息输出。
如果不存在,则输出不存在。
PrivateSubCommand20_Click()
PrivateSub取消_Click()
OnErrorGoToErr_btn_clear_Click
DimctlAsControl
ForEachctlInMe.Controls
SelectCasectl.ControlType
CaseacTextBox
Ifctl.Locked=FalseThenctl.Value=Null
CaseacComboBox
ctl.Value=Null
EndSelect
Next
Exit_btn_clear_Click:
ExitSub
Err_btn_clear_Click:
6、总结
这个系统不仅可以查询药品信息、供应商信息、药品库存信息、药品入