百度文库- 让每个人平等地提升自我目录医院药品管理系统数据库的设计 (1)1、概述 (1)2、需求分析 (1)3、数据库设计 (2)系统结构图 (2)系统部分流程图 (3)各个实体关系E-R图 (6)各个表的关系图 (7)4、应用程序设计 (7)程序登陆界面的设计 (7)程序主切换面板的设计 (8)程序增删改界面的设计 (9)程序查询界面的设计 (10)5、编码与调试 (10)登陆界面窗体程序代码的设计 (10)主切换面板窗体程序代码的设计 (11)增删改界面窗体程序代码的设计 (13)查询界面窗体程序代码的设计 (13)6、总结 (14)医院药品管理系统数据库的设计1、概述随着医药卫生体制改革的深入,医药连锁经营的推行以及日趋激烈的商业角逐,越来越多的医药经营企业意识到提高企业管理水平的重要性,也迫切要求加快管理信息化的进程。
在医药行业中,医药经营企业的物流管理以及相应的财务处理、信息处理,长期以来一直采用手工操作,但随着产业结构调整、全新的市场竞争环境,企业管理和运营效率已经成为企业成败的关键所在,手工方式的弊端毕现无遗。
这就要求药品管理摆脱过去人手操作的烦琐过程,对所有的药品管理数据实行智能管理,促使药品管理朝着科学化和规范化的方向前进。
随着计算机技术的普及,在医药行业中,医药经营企业逐渐借助计算机技术去完善医药的管理和提高自身的工作效率,以赢得市场竞争的胜利。
因而药品管理信息系统已经成为各医药经营企业实现药品管理网络化和信息化的必备工具,是医药经营企业规模经营管理不可缺少的部件之一。
同时,软件开发环境的高度集成和数据库技术的日益成熟成为开发药品管理信息系统的技术基础,大大降低了系统的开发成本。
系统开发工具的智能化、人性化,使得所开发的系统充分满足了医药经营企业的各种需求,从医药经营企业的各个环节对人流、物流、资金流、信息流进行统一系统的管理。
市场的需求和技术的支持,最终会导致越来越多的优秀药品管理软件的出现,并在竞争中得到不断的完善和优化。
2、需求分析这个系统是帮助他们完成日常繁重窗口业务的工具。
借助计算机系统,使他们凌乱的工作变得有条理,解脱他们需要记忆大量信息(药品的规格,价钱,疾病的名称与编码等)的困难。
保证他们遵守某些规范,减轻他们汇总、统计、报告和传递这些信息的负担。
因此,尽量符合这些事务处理级工作人员的工作秩序与工作习惯,功能完整,操作简单,响应迅速,界面友善,易学易用成为这类软件必须满足的功能要求。
管理员登录以后可以很清晰的看到各种项目列表和可以实现的功能,库存管理和药品管理一目了然。
由于是限定医院使用,所有只有登录系统。
库存管理功能是在使用系统的开始初始化医院的库存,并进行库存管理的其他操作,可以修改库存,读取。
这个药品管理系统主要涉及医院药库的药品进、出、存等业务,以及入库、出库和库存管理,药品管理主要管理药库中所有药品的进出和内部统计计算,为药品会计提供基础数据,以及包括有效期的报警和下限报警。
3、数据库设计本系统主要由用户管理、入库管理模块,出库管理模块,过期药品管理,供应商管理 系统结构图业务流程图:医院药品管理药品信息管理出库管理 入库管理用户管理供应商查询 药品信息查询取药记录查询 入库 登记 供应商信息查添加 用户药品信息报表取药记录报表 库存 查询修改 库存取药记录计费 修改 权限 编辑 信息过期药品管理 药库 清理 删除 过期免费药品清理系统部分流程图概念设计部分主要包括实体的E-R 图、联系的E-R 图和系统总的E-R 图。
由需求分析知,基本实体有药品、职工、供应商、库存和用户登录信息。
(1) 药品E-R 图:药品信息表字段名 数据类型 药品编码 数字 药品名 文本 供应商 文本 药剂 文本售价 数子有效日期日期/时间药品 库存职工供应商订单入库出库药品药品编码药品名药剂供应商有效日售价(2)职工E-R 图:职工信息表(3)供应商E-R 图:字段名 数据类型 职工号 数字 姓名 文本 性别 男/女 练习方式 数字 身份证号 数字职位 文本地址文本职工姓名联系方式身份证号职位职工号地址性别供应商供应商编负责人供应商名地址联系方式邮箱所在城市字段名 数据类型 供应商编码 数字 供应商名 文本 负责人 文本 联系方式 数字邮箱 文本所在城市 文本 地址文本字段名 数据类型 药品编码 数字 药品名称 文本 供应商 文本 供应商编码 文本库存量数子库存药品名称供应商 供应商编库存量药品编码用户 用户名密码用户登录信息表各个实体关系E-R 图字段名 数据类型 用户名 文本 密码数字药品性别 联系方式登记编号身份证号码姓名 供应商职工供应商编码 名称 联系人 联系方式 邮箱 地址 职工号性别职位地址供求供给姓名身份证号各个表的关系图4、应用程序设计程序登陆界面的设计设计效果如下图:程序主切换面板的设计设计效果如下图:程序增删改界面的设计设计效果如下图:程序查询界面的设计设计效果如下图:5、编码与调试登陆界面窗体程序代码的设计登陆界面窗体设计,如果在登录过程中输入密码有误,将登陆不进系统,只有输入密码正确才可以进入系统。
程序代码设计如下:Option Compare DatabaseDim text As StringDim text1 As StringDim lentext As IntegerDim i As IntegerDim d As IntegerPrivate Sub Concel_Click()On Error GoTo Err_Concel_Click'QuitExit_Concel_Click:Exit SubErr_Concel_Click:MsgBoxResume Exit_Concel_ClickEnd SubPrivate Sub OK_Click()On Error GoTo Err_OK_ClickIf Nz([password]) = Nz(DLookup("[密码]", "用户密码表", "[用户名]=" & "'" & username & "'")) _And <> "" Then '验证用户和密码)= False '隐藏窗体"主切换面板"ElseMsgBox "输入密码有误,请您重新输入!", , "出错"IfExit_OK_Click:Exit SubErr_OK_Click:MsgBoxResume Exit_OK_ClickEnd Sub主切换面板窗体程序代码的设计主切换面板窗体的设计,在系统登录界面验证操作员密码后,将进入程序主界面。
通过程序主界面将会执行相应的权限操作,并且还可以通过主界面的菜单,来调用相应程序,再进行相应操作。
程序代码设计如下:增删改界面窗体程序代码的设计增删改界面窗体的设计,可以对药品增删跟供应商增删等操作。
程序代码设计如下:Private Sub Command15_Click()= False"主切换面板"End SubPrivate Sub Command17_Click()acCmdSaveRecordDim rs As NewDim str_temp As Stringstr_temp = "select * from 库存 Where 产品编号 =" & 产品编号 & ""str_temp, , adOpenDynamic, adLockOptimisticIf Not IsNull(rs) Thenrs("库存量") = rs("库存量") + 入库数量End Sub查询界面窗体程序代码的设计查询界面窗体的设计,根据输入的职工号、判断数据库中是否存在其中的信息。
如果存在,则将这个节点的所有信息输出。
如果不存在,则输出不存在。
程序代码设计如下:Private Sub Command20_Click()= False"主切换面板"End SubPrivate Sub 取消_Click()On Error GoTo Err_btn_clear_ClickDim ctl As ControlFor Each ctl InSelect CaseCase acTextBoxIf = False Then = NullCase acComboBox= NullEnd SelectNextExit_btn_clear_Click:Exit SubErr_btn_clear_Click:End Sub6、总结这个系统不仅可以查询药品信息、供应商信息、药品库存信息、药品入库信息、药品出库信息、用户取药记录的查询,还可以对药品添加跟删除,大大方便了药品的管理,同时还有供应商的删除添加窗体,这样把药品跟供应商信息更好的联系起来了,方便管理。
但是由于知识的局限性,不能把库存信息跟入库信息和出库信息联系起来,所以对于新进的药品与已经卖出去的药品,管理起来还是比较繁琐。