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