1、最新医院药品管理系统数据库的设计（4） 信息技术优势据调查统计在对大学生进行店铺经营风格所考虑的因素问题调查中，发现有50%人选择了价格便宜些，有28%人选择服务热情些，有30%人选择店面装潢有个性，只有14%人选择新颖多样。如图（1-5）所示三、主要竞争者分析8-4情境因素与消费者行为 2004年3月20日2003年，上海市总人口达到1464万人，上海是全国第一个出现人口负增长的地区。“碧芝”最吸引人的是那些小巧的珠子、亮片等，都是平日里不常见的。据店长梁小姐介绍，店内的饰珠有威尼斯印第安的玻璃珠、秘鲁的陶珠、奥地利的施华洛世奇水晶、法国的仿金片、日本的梦幻珠等，五彩缤纷，流光异彩。按照饰珠
2、的质地可分为玻璃、骨质、角质、陶制、水晶、仿金、木制等种类，其造型更是千姿百态：珠型、圆柱型、动物造型、多边形、图腾形象等，美不胜收。全部都是进口的，从几毛钱一个到几十元一个的珠子，做一个成品饰物大约需要几十元，当然，还要决定于你的心意 尽管售价不菲，却仍没挡住喜欢它的人。“碧芝”最吸引人的是那些小巧的珠子、亮片等，都是平日里不常见的。店长梁小姐介绍，店内的饰珠有威尼斯印第安的玻璃珠、秘鲁的陶珠、奥利的施华洛世奇水晶、法国的仿金片、日本的梦幻珠等，五彩缤纷，流光异彩。按照饰珠的质地可分为玻璃、骨质、角质、陶制、水晶、仿金、木制等种类，其造型更是千姿百态：珠型、圆柱型、动物造型、多边形、图腾形象
3、等，美不胜收。全部都是进口的，从几毛钱一个到几十元一个的珠子，做一个成品饰物大约需要几十元，当然，还要决定于你的心意。“碧芝”提倡自己制作：端个特制的盘子到柜台前，按自己的构思选取喜爱的饰珠和配件，再把它们串成成品。这里的饰珠和配件的价格随质地而各有同，所用的线绳价格从几元到一二十元不等，如果让店员帮忙串制，还要收取的手工费。世界上的每一个国家和民族都有自己的饰品文化，将这些饰品汇集到一起再进行新的组合，便可以无穷繁衍下去，满足每一个人不同的个性需求。（一）大学生的消费购买能力分析这里有营业员们向顾客们示范着制作各种风格炯异的饰品，许多顾客也是学得不亦乐乎。据介绍，经常光顾“碧芝”的都是些希望
4、得到世界上“独一无二”饰品的年轻人，他们在琳琅满目的货架上挑选，然后亲手串连，他们就是偏爱这种的方式，完全自助在现场，有上班族在里面精挑细选成品，有细心的小女孩在仔细盘算着用料和价钱，准备自己制作的原料。可以想见，用本来稀奇的原料，加上别具匠心的制作，每一款成品都必是独一无二的。而这也许正是自己制造所能带来最大的快乐吧。目录医院药品管理系统数据库的设计1、概述随着医药卫生体制改革的深入,医药连锁经营的推行以及日趋激烈的商业角逐,越来越多的医药经营企业意识到提高企业管理水平的重要性,也迫切要求加快管理信息化的进程。在医药行业中,医药经营企业的物流管理以及相应的财务处理、信息处理,长期以来一直采用
5、手工操作,但随着产业结构调整、全新的市场竞争环境,企业管理和运营效率已经成为企业成败的关键所在,手工方式的弊端毕现无遗。这就要求药品管理摆脱过去人手操作的烦琐过程,对所有的药品管理数据实行智能管理,促使药品管理朝着科学化和规范化的方向前进。随着计算机技术的普及,在医药行业中,医药经营企业逐渐借助计算机技术去完善医药的管理和提高自身的工作效率,以赢得市场竞争的胜利。因而药品管理信息系统已经成为各医药经营企业实现药品管理网络化和信息化的必备工具,是医药经营企业规模经营管理不可缺少的部件之一。同时,软件开发环境的高度集成和数据库技术的日益成熟成为开发药品管理信息系统的技术基础,大大降低了系统的开发成
6、本。系统开发工具的智能化、人性化,使得所开发的系统充分满足了医药经营企业的各种需求,从医药经营企业的各个环节对人流、物流、资金流、信息流进行统一系统的管理。市场的需求和技术的支持,最终会导致越来越多的优秀药品管理软件的出现,并在竞争中得到不断的完善和优化。 2、需求分析这个系统是帮助他们完成日常繁重窗口业务的工具。借助计算机系统，使他们凌乱的工作变得有条理，解脱他们需要记忆大量信息（药品的规格,价钱,疾病的名称与编码等）的困难。保证他们遵守某些规范，减轻他们汇总、统计、报告和传递这些信息的负担。因此，尽量符合这些事务处理级工作人员的工作秩序与工作习惯，功能完整，操作简单，响应迅速，界面友善，易
7、学易用成为这类软件必须满足的功能要求。管理员登录以后可以很清晰的看到各种项目列表和可以实现的功能，库存管理和药品管理一目了然。由于是限定医院使用，所有只有登录系统。库存管理功能是在使用系统的开始初始化医院的库存，并进行库存管理的其他操作，可以修改库存，读取。这个药品管理系统主要涉及医院药库的药品进、出、存等业务，以及入库、出库和库存管理，药品管理主要管理药库中所有药品的进出和内部统计计算，为药品会计提供基础数据，以及包括有效期的报警和下限报警。3、数据库设计本系统主要由用户管理、入库管理模块，出库管理模块，过期药品管理，供应商管理3.1系统结构图 业务流程图：3.2系统部分流程图概念设计部分主
8、要包括实体的E-R图、联系的E-R图和系统总的E-R图。由需求分析知，基本实体有药品、职工、供应商、库存和用户登录信息。（1） 药品E-R图：药品信息表字段名数据类型药品编码数字药品名文本供应商文本药剂文本售价 数子有效日期日期/时间（2）职工E-R图：职工信息表字段名数据类型职工号数字姓名文本性别男/女练习方式数字身份证号数字职位 文本地址文本（3）供应商E-R图：供应商信息表字段名数据类型供应商编码数字供应商名文本负责人文本联系方式数字邮箱 文本所在城市文本地址文本（4）库存E-R图：库存信息表字段名数据类型药品编码数字药品名称文本供应商文本供应商编码文本库存量 数子（5）用户登录信息E-
9、R图 用户登录信息表字段名数据类型用户名文本密码数字3.3各个实体关系E-R图3.4各个表的关系图4、应用程序设计4.1程序登陆界面的设计设计效果如下图：4.2程序主切换面板的设计设计效果如下图：4.3程序增删改界面的设计设计效果如下图：4.4程序查询界面的设计设计效果如下图：5、编码与调试5.1登陆界面窗体程序代码的设计登陆界面窗体设计，如果在登录过程中输入密码有误，将登陆不进系统，只有输入密码正确才可以进入系统。程序代码设计如下：Option Compare DatabaseDim text As StringDim text1 As StringDim lentext As Intege
10、rDim 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 GoTo Err_OK_ClickIf Nz(password) = Nz(DLookup(密码, 用户密码表, 用户名= &
11、 & 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.2主切换面板窗体程序代码的设计主切换面板窗体的设计，在系统登录界面验证操作员密码后，将进入程序主界面。通过程序主界面将会
12、执行相应的权限操作，并且还可以通过主界面的菜单，来调用相应程序，再进行相应操作。程序代码设计如下：5.3增删改界面窗体程序代码的设计增删改界面窗体的设计，可以对药品增删跟供应商增删等操作。程序代码设计如下：Private Sub Command15_Click()Me.Visible = FalseDoCmd.OpenForm 主切换面板End SubPrivate Sub Command17_Click()DoCmd.RunCommand acCmdSaveRecordDim rs As New ADODB.RecordsetDim str_temp As Stringstr_temp =
13、select * from 库存 Where 产品编号 = & 产品编号 & rs.Open str_temp, CurrentProject.Connection, adOpenDynamic, adLockOptimisticIf Not IsNull(rs) Thenrs(库存量) = rs(库存量) + 入库数量rs.UpdateEnd Sub5.4查询界面窗体程序代码的设计查询界面窗体的设计，根据输入的职工号、判断数据库中是否存在其中的信息。如果存在，则将这个节点的所有信息输出。如果不存在，则输出不存在。程序代码设计如下：Private Sub Command20_Click()Me
14、.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 acComboBox ctl.Value = Null End Select NextExit_btn_clear_Click: Exit SubErr_btn_clear_Click:End Sub6、总结这个系统不仅可以查询药品信息、供应商信息、药品库存信息、药品入库信息、药品出库信息、用户取药记录的查询，还可以对药品添加跟删除，大大方便了药品的管理，同时还有供应商的删除添加窗体，这样把药品跟供应商信息更好的联系起来了，方便管理。 但是由于知识的局限性，不能把库存信息跟入库信息和出库信息联系起来，所以对于新进的药品与已经卖出去的药品，管理起来还是比较繁琐。
