药店管理信息系统报告

《药店管理信息系统报告》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、........成绩管理信息系统课程设计报告系统名称药店信息管理系统班级管093姓名张新萌、田新驰、李新雷学号04、06、12.专业学习资料.........装订线2011年12月14日一、系统分析系统名称：药店管理信息系统.开发背景、目的、意义：随着人们生活水平的提高，健康意识的增强，对医药产品的需求也迅速增加。药店作为医药产品的主要销售渠道，也处于高速发展时期，同时也加剧了产业间的竞争。为了加强企业的内部管理，提高运营效率，利用现代信息技术提高企业的管理水平已非常迫切。另外，由于医药产品种类繁多、销售模式特殊、业务量大

2、，单凭手工记账已很难适应工作的需要。医药作为一个关系到人们健良的特殊行业，国家对医药行业又有一些不同于其他行业的管理政策，这些都加大了管理的难度。如何尽快建立和完善现代企业的信息化管理机制问题，已成为医药企业发展的关键所在。本课题以提高药店的医药管理水平和效率为目标，建立了管理信息系统。该系统能集中处理药品的进销存业务及其应付账目，实现了药店的现代化管理。实现目标：面对医药行业的高速发展及其发展过程中出现的各种情况，药店管理信息系统在实施后，应能够达到以下目标：(1)实现多点操作的信息共享，相互之间的信息传递准确，快捷和顺

3、畅。(2)全面自动化管理，可随时掌握药品的库存、销售等情况。(3)系统界面友好美观，操作简单易行，查询灵活方便，数据存储安全。(4)能够快速、准确地处理药品进、销、存、退、盘点、变价、折扣等多种业务模式。(5)提供助记码及支持多种结算方式。(6)系统维护方便可靠，有较高的安全性，满足实用性，先进性的要求。（5）系统功能：本系统由系统.专业学习资料.........设置、日常业务、查询统计、库存管理、基础信息管理五大分系统组成。主要功能如下：（1）系统设置：初期建账，密码设置，数据备份，数据恢复。（2）日常业务：入库单，销售

4、单，入库退单，销售退单。（3）查询统计：入库查询，销售查询，入库退货查询，销售退货查询。（5）库存管理：库存盘点，库存查询，价格管理。（6）基础信息管理：客户管理，供应商管理。药店管理信息系统E-R图.专业学习资料.........2.2概念模型通过对用户需求分析进行综合、归纳与抽象、形成一个独立于具体DBMS的概念模型。在本药店管理系统中涉及到了2种概念模型的抽象Ispartof.专业学习资料.........聚集模型概况模型2.3用例图和顶层数据流图总体分析的用例图经理与供货商的用例图.专业学习资料.........顾

5、客与经理间的用例图顶层数据流图.专业学习资料.........1.系统总体设计（1）分解的数据流图处理消费处理采购.专业学习资料.........组织结构或数学方法、构造模型。药店管理信息系统库存管理查询统计日常业务基础信息系统设置供应商管理客户管理初期建账密码设置数据备份数据恢复销售退货查询入库退货查询销售查询入库查询库存盘点价格管理库存查询销售退单入库退单销售单入库单二、系统设计说明：系统设计较为复杂，源程序代码较长，所以报告中只摘录了一小部分程序代码，其余代码详见程序中，程序先进入登陆界面，登陆后进入主界面，登陆到主

6、界面后即可点击进入相应的窗口。该系统采用Access数据库，数据库名称为yyjxc,它包括以下8个表：供应商基础信息表gys,库存表kc,客户基础信息表kh,入库表rkd,入库退单表rktd,密码表ma,销售表xsd,销售退单表xstd。1、系统登录模块及主程序界面设计（1）系统登录模块（窗体名：系统登录.frm）.专业学习资料.........源程序代码较长，此处省略，详见程序中实现目标：程序启动后，首先进入系统登录界面验证操作员密码。其实现的功能如下：a.可选择操作员，支持鼠标和键盘操作b.操作员和密码验证成功后，进入

7、主界面c.操作员错误或密码错误提醒并返回错误点。d.输入三次错误的密码，系统自动退出（2）主程序界面设计（窗体名：主界面.frm）PublicSubentercell()Dimx,yAsStringIfText1.Text="1"ThenSetmyform=main_rcyw_rkIfText1.Text="2"ThenSetmyform=main_rcyw_rktdIfText1.Text="3"ThenSetmyform=main_rcyw_xsIfText1.Text="4"ThenSetmyform=main_rc

8、yw_xstdIfmyform.mf1.CellWidth<=0Ormyform.mf1.CellHeight<=0ThenExitSubx=myform.mf1.TextMatrix(myform.mf1.FixedRows,myform.mf1.Col)y=myform.mf1.TextMatrix