1、本资料由三个皮匠管理资源文库整理收集（网址：）摘要本文以杭州秉信纸业有限公司作为刀具管理系统开发的背景，以公司刀具管理实际业务流程为基础，以此公司生管处资材科原物料组（下文中称：刀具管理中心）为主要使用对象而开发的刀具管理系统。之所以将刀具管理系统单独列出分析与设计，主要是考虑到刀具管理在此公司中非等同于其它物料管理，如：原材料管理、产成品管理等。其系统开发的过程主要包括业务流程分析、数据流程分析、系统功能结构设计、数据库设计、输入输出设计。经过详细的分析，选用Microsoft公司的Visual Basic 6.0作为前端开发工具，利用其提供的集成开发环境以及各种控件，尤其是对DAO的支持完2、成对数据库的各种操作，达到对刀具管理的目的。本刀具管理系统实现了对刀具日常使用中的出入库管理、库存查询、刀具使用跟踪定位以及涉及刀具采购、维修方面的管理。此外该系统克服了手工管理模式下各类基础数据管理混乱、查询不便的弱点，保证企业各类数据的准确性，可实现数据的实时查询、传递、共享。关键词：刀具管理；数据；管理中心目录1绪论11.1刀具管理系统时代背景11.2刀具管理系统的意义11.3刀具管理系统的发展趋势11.4刀具管理系统的问题22系统分析32.1公司背景及刀具管理现状32.1.1杭州秉信纸业有限公司简介32.1.2公司刀具管理现状32.2可行性分析32.2.1.管理可行性分析32.2.2.3、经济可行性分析42.2.3.技术可行性分析42.3业务流程分析42.4数据流程图分析72.5数据字典112.5.1数据流的定义112.5.2处理逻辑的定义162.5.3数据存储的定义202.5.4外部实体的定义223系统设计243.1功能结构图243.2代码设计253.3数据库设计263.3.1 E-R图263.3.2关系模型设计283.3.3数据库表284系统开发344.1开发工具选择344.2部门界面及源代码344.21部分界面344.22部分源代码375系统开发总结45致谢46附录47参考文献50本资料由三个皮匠管理资源文库整理收集（网址：）- 本资料来自 - 本资料来自 -1绪论1.14、刀具管理系统时代背景随着制造业的不断发展，企业生产中所需刀具的规格和种类不断增加，刀具管理问题已越来越多地受到关注。刀具的性能、质量及其管理直接影响到企业的产品质量、生产成本和生产效率。据山特维克统计，16%的计划作业停止由于缺乏刀具造成，30%60%的刀具库存不在控制之中、机床操作人员20%的时间花费在查找刀具上 张晓建.切削技术与刀具管理的现状与发展趋势J.装备维修技术.2005.（2）；。因此刀具管理单独作为一个重要的管理模块，逐渐浮出水面。刀具管理对制造的重要性、对生产效率和制造成本的重大影响正引起越来越多的制造企业高层管理者的重视和思考。因此近年来，国内外专家、学者以及企业都在纷纷开5、展建立和开发刀具管理系统。国内外从事刀具管理系统研究的专家也针对各种不同情况开发出很多刀具管理软件，这些刀具管理系统大大超越了过去简单的人工刀具管理模式，并且都采用了先进的数据库技术、网络技术、控制技术等，实现了刀具管理的计算机化和集成化，实现了信息的实时共享 周占峰、李涛、闫莉、杜彦炜.基于用户角色的刀具管理信息系统综合评价研究. EB/OL.1.2刀具管理系统的意义（1）有计划性的实施刀具的检查和更换，能及时了解、掌握和分析刀具的使用状况，对有效地利用刀具以及对刀盘进行有效的保护有重要意义。（2）建立准确、详尽的刀具台帐和完善刀具维护，能最大限度地减少在刀具方面的投入，对降低刀具的使用成本6、有重要意义。（3）掌握并熟练运用刀具检查、更换的方法，加强对刀盘的监控，能避免刀具非正常原因的大面积损坏，对保证生产顺畅，降低打破生产计划风险有重要意义。1.3刀具管理系统的发展趋势（1）增强刀具管理系统的专业技术含量，提升正确选刀能力，满足刀具应用条件。正确选刀是保证加工质量和效率的前提，而提供必要的应用技术(如高速旋转刀具的动平衡和装夹技术、刀具安全技术等)可以充分发挥刀具的加工性能。（2）发展外包管理模式，最大限度地发挥刀具管理系统的潜力。国际模具及五金塑胶产业供应商协会秘书长认为，刀具管理外包的模式符合服务型制造业的发展方向，也符合当前刀具行业改变经营模式、提高服务能力的转型方向，因此7、具有广阔的发展前景。（3）适时将刀具编码与ISO13399标准接轨。ISO13399是适应制造业信息化技术发展的需要而制订的关于刀具产品描述和交换的国际标准。（4）关注ISO14649(STEP-NC)标准的开发和实施进程。STEP-NC是一个面向对象的新型NC编程数据接口国际标准，将取代目前广泛使用的ISO6983标准，并能实现CAD、CAM与CNC的双向数据流动，将对数控制造技术领域产生深刻的影响，也将对刀具管理系统提出新的要求并带来新的功能。刀具管理系统的应用在我国还刚刚起步，随着我国制造业的发展，刀具管理有着很大的应用潜力和广阔的发展前景，它的应用将加快企业信息化步伐和实现精益生产的进8、度，提高企业的生产效率和市场竞争实力，也符合企业落实科学发展观的要求。1.4刀具管理系统的问题（1）刀具管理仅研究了刀具生命中的一个或几个时期，缺少对整个刀具生命周期的分析，刀具信息不够全面。（2）刀具信息自成一体，造成刀具信息的孤岛，即不同部门、不同系统之间信息不能共享，设计、生产、管理方面的数据出现脱节，不仅容易造成制造资源的浪费，还严重阻碍了企业信息化的整体进程。（3）刀具管理以满足生产制造中的刀具需求为目标，没有考虑到刀具全生命周期内的成本问题，因而无法给企业生产经营提供决策支持。针对上述问题，本文构建了一个基于B/S结构的刀具全生命周期管理系统，并研究了基于XMLSche而刀具对象数9、据模式，以实现对刀具信息从采购到报损整个过程的标准化管理，从而达到刀具数据共享的目的，为制造业信息化发展建立一定的基础。本资料由三个皮匠管理资源文库整理收集（网址：）2系统分析2.1公司背景及刀具管理现状2.1.1杭州秉信纸业有限公司简介秉信纸业有限公司隶属于顶新国际集团，是专注于向客户提供中高档环保型瓦楞纸箱纸盒的专业性包装公司。杭州秉信纸业有限公司（下文简称：公司）为秉信纸业有限公司在杭州的事业部。公司秉承“诚信、务实、创新”的集团经营理念，以“成就一流包装企业，提升客户产品价值”为己任。公司内部涉及刀具管理的部门或负责人有：事业部主管、采购部、生产部、工务部、管理中心（生管处资材科原物料10、组）、部门主管（一人为工务部、管理中心两个部门主管）。公司生产部共有三个生产车间，每个车间均配备先进的进口高速电脑控制瓦楞纸板生产线、环保型柔版印刷机、德国曼罗兰100型六色胶版印刷机等生产设备。能够满足食品、饮料、日货、家电、电子、家具、医药等高品质纸箱的客户需求。2.1.2公司刀具管理现状杭州秉信纸业有限公司刀具管理内容分为三大块：领换刀具管理、刀具维修管理、刀具采购管理，涉及的部门或人员有：管理中心、工务部、生产部、事业部主管、部门主管、采购部。公司目前的刀具管理模式为传统的手工管理，刀具信息在各部门之间存在传递障碍，导致在刀具领换、维修、采购等环节上效率低下，无法实时查询刀具的去向及库11、存信息，时常打破公司的生产计划，导致生产成本、库存资金及采购管理成本提升。2.2可行性分析2.2.1.管理可行性分析管理信息系统的设计是为了方便管理者对企业的业务流程操作的了解，熟悉企业的业务流程。公司现有的刀具管理业务流程较为繁杂，虽然企业的员工多是受过高等教育的知识分子，能熟习自己的职责，明确自己在企业部门中的分工，但这并不能良好解决各部门之间信息的传递障碍。通过管刀具理系统易于我们了解公司刀具的使用情况和库存状况，同时也便于公司其他相关部门对各种刀具使用、库存、维修、采购等信息的查询，减轻了刀具管理部门和相关负责人的工作强度，促进了各部门之间信息的传递效率，有利于公司制定生产计划、控制生12、产、采购、库存等成本。2.2.2.经济可行性分析本刀具管理系统是根据杭州秉信纸业有限公司的实际刀具管理业务流程专项设计，整个系统设计和实现过程并不需要太多人力物力，开发成本较低。开发出的刀具管理系统只需在公司现有的普通PC机上就能运行，系统维护所需的人力物力也较少。此外使用刀具管理系统可减少传统管理模式下较多的人力，节省办公成本，因此开发刀具管理系统在经济上可行。2.2.3.技术可行性分析技术可行性是指开发一个新系统所需要的技术是否具备，如支持新系统的软硬件功能以及技术人员的数量和水平。本系统针对公司刀具管理方面业务，采用的是Visual Basic 6.0和Access2007，对开发人员的13、技术要求不高。开发得出的刀具管理系统类似于普通电脑软件使用操作简便。2.3业务流程分析业务流程图是一种描述系统内各部门、人员之间业务关系、作业顺序和管理信息流向的图表，利用它可以帮助分析人员找出业务流程中的不合理流向，它是物理模型 慕静、檀柏红、任立肖.管理信息系统开发方法、工具与应用M.北京：清华大学出版社，2010，81140；。业务流程图主要是描述业务走向，明确每个部门的职责。通过对杭州秉信纸业有限公司刀具采购，刀具领换及刀具维修环节相关业务流程的了解，得出以下基本业务流程，具体刀具管理业务流程见图2-1：（1）生产车间填写普通刀具申请单到管理中心更换刀具，管理中心填写普通刀具供货单给生14、产车间。（2）生产车间填写高档刀具申请单发到工务部门，工务部门审核后再将高档刀具申请单发给管理中心，管理中心将高档刀具供货单发到工务部门，工务部门再将高档刀具供货单发给生产车间。（3）生产部门在接到临时生产申请时，先向管理中心发出库存刀具信息表，通过库存刀具管理信息表查看是否有所需要的刀具，如果库存里这种刀具没有或不足，生产车间填写临时采购申请单给部门主管，部门主管审批后将已批复临时采购单发给管理中心，管理中心将临时采购单发给事业部主管，事业部主管审核再批复后将临时采购单发给采购部，采购部填写采购单给供应商，供货商发货后将供货单发给工务部门，工务部门检验刀具后退还不合格产品并填写不合格刀具单给15、供货商，将合格刀具填写入库单，并入库。供货商更换不合格刀具后重复上述操作，直至采购的所有刀具都入库为止。（4）管理中心填写常规采购申请单发给部门主管审批后，将已批复常规采购单发给管理中心，管理中心将常规采购单发给事业部主管，事业部主管批复后将常规采购单发给采购部，采购部填写采购单给供应商，供货商发货后将供货单发给工务部门，工务部门验收刀具后退还不合格产品并填写不合格刀具单给供货商，将合格的刀具填写入库单，并入库。供货商更换不合格刀具后重复上述操作，直至采购的所有刀具都入库为止。（5）工务部门将检验通知单发给管理中心，让管理中心准备好接受刀具检查，工务部门检查完后，填写刀具报废单发给部门主管进行16、审批，部门主管发送维修申请单分别到管理中心和采购部，采购部将维修公司信息发给管理中心，管理中心填写维修单，再根据采购部提供的维修公司信息，将维修单和维修刀具交给特定维修公司，维修公司维修好刀具后将刀具和刀具修复单发给工务部门，工务部门验收并填写修复刀具入库单发给管理中心让管理中心来收货入库。业务流程图2-12.4数据流程图分析数据流程图是对原系统进行数据流程分析和抽象的工具，也是用来描述新系统逻辑模型的主要工具 黄梯云、李一军.管理信息系统第四版.M.北京：高等教育出版社.2009.7，112126；。它可以描述系统的主要功能、系统与外部环境间的输入和输出、数据传递、数据存储等信息。根据业务流17、程图描述的业务流程顺序，就可以将调查中获得的数据处理过程绘制成数据流程图。数据流程图具有抽象性和概括性。抽象性表现在它舍去了具体的物质，只剩下数据的流动、加工处理和存储；概括性表现它可以把信息中的各种不同业务处理过程联系起来，形成一个整体。顶层数据流程图2-2：顶级数据流程图2-2第一层数据流程图2-3：第一层数据流程图2-3第二层数据流程图：采购数据流程图2-4：采购数据流程图2-4领用数据流程图2-5：领用数据流程图2-5维修数据流程图2-6：维修数据流程图2-62.5数据字典 数据字典是对数据流程图的补充,它通过数据元素和数据结构来描写数据流,数据存储的属性。它将系统中有关数据的各种信息18、从不同的角度进行分析、汇总，在系统开发的全过程中都得到使用。数据字典是所有人员工作的依据和统一的标准，它可以确保数据在系统中的完整性和一致性，是整个系统开发过程以及系统运行后的维护必不可少的工具。数据流程图配以数据字典就可以从图形和文字两个方面对系统的逻辑模型进行完整的描述。2.5.1数据流的定义数据流编号： D1.01数据流名称：刀具库存信息简 述：管理中心提供的刀具库存信息数据流来源：管理中心数据流去向：生产车间数据流组成：刀具编号+刀具名称+规格型号+刀具数量+入库时间数据平均流量：4张/月最大流量：7张/月数据流编号： D1.02数据流名称：临时采购单简 述：生产部门开出的临时采购单数19、据流来源：生产部门数据流去向：部门主管数据流组成：刀具编号+刀具名称+规格型号+需求数量+备注数据平均流量：1张/月最大流量：3张/月数据流编号： D1.03数据流名称：常规采购单简 述：管理中心发出的常规采购单数据流来源：管理中心数据流去向：部门主管数据流组成：刀具编号+刀具名称+规格型号+需求数量+备注数据平均流量：3张/月最大流量：4张/月数据流编号： D1.04数据流名称：采购单（常规/临时）首张批复简 述：首张批复的采购单数据流来源：管理中心数据流去向：事业部主管数据流组成：刀具编号+刀具名称+规格型号+需求数量+备注数据平均流量：3张/月最 大 流 量：4张/月数据流编号： D1.20、05数据流名称：采购单（常规/临时）最终批复简 述：最终批复的采购单数据流来源： 事业部主管数据流去向：采购部门数据流组成：刀具编号+刀具名称+规格型号+需求数量+备注数据平均流量：3张/月最 大 流 量：4张/月数据流编号： D1.06数据流名称：入库单简 述：工务部门开出的检验合格后的入库单数据流来源：工务部门数据流去向：管理中心数据流组成：刀具编号+刀具名称+规格型号+刀具数量+入库时间+验收人员+刀具单价+供应商名称数据平均流量：3张/月最 大 流 量：4张/月数据流编号： D2.01数据流名称：刀具领用单简 述：生产部门发出的刀具领用单数据流来源：生产部门数据流去向：管理中心数据流组21、成：刀具编号（新旧）+刀具名称（新旧）+规格型号（新旧）+需求数量（新）+用刀具日期（新）+领刀具部门+领刀具人（新旧）+生产项目（新旧）；数据平均流量：10张/月最 大 流 量：15张/月数据流编号： D2.02数据流名称：普通刀具领用单简 述：生产部门开出的普通刀具领用单数据流来源：生产部门数据流去向：管理中心数据流组成：刀具编号（新旧）+刀具名称（新旧）+规格型号（新旧）+需求数量+用刀具日期+领刀具部门+领刀具人（新旧）+生产项目（新旧）数据平均流量：10张/月最 大 流 量：15张/月数据流编号： D2.03数据流名称：高档刀具领用单简 述：工务部门开出的高档刀具领用单数据流来源： 22、生产部门数据流去向：工务部门数据流组成：刀具编号（新旧）+刀具名称（新旧）+规格型号（新旧）+需求数量+用刀具日期+领刀具部门+领刀具人（新旧）+生产项目（新旧）数据平均流量：1张/月最 大 流 量：2张/月数据流编号： D2.04数据流名称：普通刀具供应单简 述：管理部门发出的刀具供应单数据流来源：管理部门数据流去向：生产部门数据流组成：刀具编号+刀具名称+规格型号+需求数量+发刀具日期+领刀具部门+领刀具人+生产项目数据平均流量：10张/月最 大 流 量：15张/月数据流编号： D2.05数据流名称：高档刀具供应单简 述：管理中心开出的高档刀具供应单数据流来源：管理中心数据流去向：生产部门23、数据流组成：刀具编号+刀具名称+规格型号+需求数量+发刀具日期+领刀具部门+领刀具人+生产项目数据平均流量：1张/月最 大 流 量：2张/月数据流编号： D3.01数据流名称：刀具损坏信息表简 述：工务部门开出刀具损坏维修表数据流来源：工务部门数据流去向：部门主管数据流组成：刀具编号+刀具名称+规格型号+可维修数量+刀具损坏统计人员+检测人员+报废数量数据平均流量：1张/月最 大 流 量：2张/月数据流编号： D3.02数据流名称：维修单简 述：部门主管批复的维修单数据流来源：部门主管数据流去向：管理中心 +采购部门数据流组成：刀具编号+刀具名称+规格型号+损坏数量+备注数据平均流量：1张/月24、最 大 流 量：2张/月数据流编号： D3.03数据流名称：维修公司信息简 述：采购部门发出的维修公司信息数据流来源：采购部门数据流去向：管理中心数据流组成：维修公司名称+维修公司地址+联系方式数据平均流量：1张/月最 大 流 量：2张/月数据流编号： D3.04数据流名称：刀具修复单简 述：维修公司开出刀具修复单数据流来源：维修公司数据流去向：工务部门数据流组成：刀具编号+刀具名称+规格型号+修复数量+修复刀具日期数据平均流量：1张/月最 大 流 量：2张/月数据流编号： D3.05数据流名称：入库单简 述：工务部门检验后刀具入库单数据流来源：工务部门数据流去向：管理中心数据流组成：刀具编号25、+刀具名称+规格型号+刀具数量+检验刀具日期+刀具检验人员数据平均流量：3张/月最 大 流 量：4张/月2.5.2处理逻辑的定义处理逻辑编号：P1.1处理逻辑名称：查询库存简 述：生产部门对管理中心的刀具库存进行查询输入的数据流：管理中心的刀具库存台账处 理：根据刀具库存来判断是否需要临时采购输出的数据流：生产车间处 理 频 率：30次/月处理逻辑编号：P1.2处理逻辑名称：采购单首张批复简 述：管理中心将需批复的采购单送给部门主管进行批复输入的数据流：管理中心处 理：部门主管将批复好的采购单再送回管理中心输出的数据流：部门主管处 理 频 率：3次/月处理逻辑编号：P1.3处理逻辑名称：采购单26、最终批复简 述：管理中心将事业部批复的采购单再送给事业部主管进行最后批复输入的数据流：管理中心处 理：事业部主管将采购单批复完成后直接发给采购部门进行采购输出的数据流：事业部主管处 理 频 率：3次/月处理逻辑编号：P1.4处理逻辑名称：采购处理简 述：采购部门通过采购单进行采购行动输入的数据流：事业部主管输出的数据流：采购部门处 理 频 率：3次/月处理逻辑编号：P1.5处理逻辑名称：验收简 述：工务部门对供应商发送的刀具进行检验输入的数据流：供应商处 理：根据刀具的检验的结果将合格刀具单据送给管理中心入库，不合格的退还供货商进行替换输出的数据流：管理中心处 理 频 率：3次/月处理逻辑编号27、：P1.6处理逻辑名称：提示简 述：刀具管理中心现有库存信息对刀具使用计划的提示输入的数据流：管理中心处 理：刀具管理中心现有库存信息对刀具使用计划的提示输出的数据流：管理中心处 理 频 率：4次/月处理逻辑编号：P2.1处理逻辑名称：刀具领用单简 述：根据刀具的不同进行分类输入的数据流：生产部门处 理：通过刀具标准手册来看刀具是何种刀具再选择不同的部门输出的数据流：管理中心/工务部门处 理 频 率：10次/月处理逻辑编号：P2.2处理逻辑名称：普通刀具处理输入的数据流：生产部门处 理：因为是普通刀具所以直接将领用单送往管理中心即可输出的数据流：管理中心处 理 频 率：10次/月处理逻辑编号：28、P2.3处理逻辑名称：高档刀具简 述：通过刀具标准手册判定是高档刀具输入的数据流：生产部门处 理：因为领用刀具为高档刀具所以将领用单送往工务部门输出的数据流：工务部门处 理 频 率：1次/月处理逻辑编号：P2.4处理逻辑名称：领用处理简 述：工务部门向管理中心提出刀具领用申请输入的数据流：工务部门输出的数据流：管理中心处 理 频 率：1次/月处理逻辑编号：P3.1处理逻辑名称：刀具损坏信息统计简 述：工务部门对刀具进行检验并统计损坏情况输入的数据流：工务部门处 理：对管理中心的库存进行检查，并统计出刀具损坏情况输出的数据流：管理中心处 理 频 率：1次/月处理逻辑编号：P3.2处理逻辑名称：批29、复处理简 述：部门主管对损坏刀具进行维修批复输入的数据流：工务部门输出的数据流：部门主管处 理 频 率：1次/月处理逻辑编号：P3.3处理逻辑名称：查询简 述：采购部门查询维修公司信息输入的数据流：事业部输出的数据流：采购部门处 理 频 率：1次/月处理逻辑编号：P3.4处理逻辑名称：修复处理简 述：维修公司对破损刀具进行修复输入的数据流：管理中心处 理：管理中心根据采购部门提供的维修公司的信息将破损刀具送往维修公司进行修复输出的数据流：维修公司处 理 频 率：1次/月处理逻辑编号：P3.5处理逻辑名称：检验简 述：工务部门对维修公司修复过的刀具进行检验输入的数据流：工务部门处 理：工务部门对30、修复后的刀具进行检验，将合格的刀具入库输出的数据流：管理中心处 理 频 率：1次/月处理逻辑编号：P3.6处理逻辑名称：库存提示简 述：管理中心的刀具库存量对刀具使用计划的提示输入的数据流：管理中心处 理：管理中心的刀具库存量对刀具使用计划的提示输出的数据流：管理中心处 理 频 率：4次/月处理逻辑编号：P3.7处理逻辑名称：查询打印简 述：管理部门对管理中心的刀具库存进行查询并打印输入的数据流：工务部门输出的数据流：管理中心处 理 频 率：4次/月2.5.3数据存储的定义数据存储编号：F1.01数据存储名称：入库单存档简 述：入库单信息数据存储组成：刀具编号+刀具名称+单价+库存量关 键 字31、：刀具编号相关联的处理： P1.5数据存储编号：F1.02数据存储名称：采购单存档简 述：采购刀具的数量数据存储组成：刀具编号+刀具名称+采购数量+采购人员+供应商关 键 字：刀具编号相关联的处理：P1.3数据存储编号：F1.03数据存储名称：刀具库存台账简 述：库存刀具数量和单价数据存储组成：刀具编号+刀具名称+库存数量+单价+备注关 键 字：刀具编号相关联的处理：P1.1 P1.5 P1.6数据存储编号：F1.04数据存储名称：刀具计划台账简 述：库存刀具数量数据存储组成：刀具编号+刀具名称+库存数量+单价+备注关 键 字：刀具编号相关联的处理：P1.5 P1.6数据存储编号：F2.01数32、据存储名称：刀具标准手册简 述：判断刀具所属类别数据存储组成：刀具编号+刀具名称+单价+适用情况+备注关 键 字：刀具编号相关联的处理：P2.1数据存储编号：F2.02数据存储名称：领用单存档简 述：需要领取的刀具数据存储组成：刀具编号+刀具名称+领用数量+领用人员+生产项目关 键 字：刀具编号相关联的处理：P2.1数据存储编号：F2.03数据存储名称：领用单简 述：普通刀具领用单数据存储组成：刀具编号+刀具名称+领用数量+领用人员+生产项目关 键 字：刀具编号相关联的处理：P2.2数据存储编号：F2.04数据存储名称：领用单简 述：高档刀具领用单数据存储组成：刀具编号+刀具名称+领用数量+领33、用人员+生产项目关 键 字：刀具编号相关联的处理：P2.3数据存储编号：F3.01数据存储名称：刀具库存台账简 述：刀具现有的库存量数据存储组成：刀具编号+刀具名称+库存数量+统计人员关 键 字：刀具编号相关联的处理：P3.1 P3.6 P3.7数据存储编号：F3.02数据存储名称：刀具计划台账简 述：除去破损刀具现有的库存量数据存储组成：刀具编号+刀具名称+库存数量+统计人员关 键 字：刀具编号相关联的处理：P3.1 P3.6 P3.7数据存储编号：F3.03数据存储名称：刀具打印简 述：刀具库存量数据存储组成：刀具编号+刀具名称+库存数量+打印人员关 键 字：刀具编号相关联的处理： P3.34、7数据存储编号：F3.04数据存储名称：维修单存档简 述：对要维修的刀具维修单进行存档数据存储组成：刀具编号+刀具名称+维修数量+维修公司关 键 字：刀具编号相关联的处理：P3.22.5.4外部实体的定义外部实体编号：S1.01外部实体名称：管理中心简 述：相当于库存系统，负责刀具的保管和发放输入的数据流：D1.01 D1.02输出的数据流：D1.03外部实体编号：S1.02外部实体名称：生产车间简 述：刀具的使用及对临时刀具的采购申请输入的数据流：D1.08输出的数据流：D1.07外部实体编号：S2.01外部实体名称：生产车间简 述：刀具的领用输入的数据流：D2.01 D2.06输出的数据流35、：D2.03外部实体编号：S2.02外部实体名称：管理中心简 述：刀具的发放和保管输入的数据流：D2.02 D2.04外部实体编号：S3.01外部实体名称：工务部门简 述：刀具的检验和查收输入的数据流：D3.06输出的数据流：D3.01 D3.03外部实体编号：S3.02外部实体名称：管理中心简 述：将破损刀具送去维修公司输入的数据流：D3.02 D3.04 D3.05输出的数据流：D3.063系统设计3.1功能结构图功能结构图就是按照功能的从属关系画成的图表，图中的每一个框都称为一个功能模块。根据上面的业务流程图我们将系统分成了四个大的模块，它们分别是：基本信息、刀具库存信息、采购信息、管理36、信息。系统功能结构图如图3-1所示：系统功能图结构图3-1其中：基本信息主要包括刀具信息，供应商和维修公司的信息，在这里我们我们可以查到所有与公司相关的信息，方便了各部门间的联系和信息交流。刀具库存信息主要包括出入库记录和库存信息查询，在这里我们可以清楚地查到每一笔出入库刀具的信息情况，和库存中现有的刀具的数量，使得管理中心，生产部门，采购部门随时都能根据现有库存量及时的做出正确的决定。采购信息主要包括采购单，和不合格供货单两大类，通过采购信息我们可以清楚我们的采购情况，通过采购单来看供货商的产品是否能满足我们的需要，有没有必要更换供货商等信息。同时通过实时监测采购单也能防止一些无必要的采购发37、生，降低企业的生产成本。系统管理主要包括用户管理和权限管理，通过对员工进行分级管理，增加员工的工作积极性，同时防止一些重要信息被底层员工透露出去，可以更有效的进行管理。3.2代码设计供应商编号：系统自动编号（1、2、3.）；维修商编号：系统自动编号（1、2、3.）；部门编号：Dxx; D：表部门； XX：为阿拉伯数字（01、02、03.）；采购单号：P12091501P：表采购；120915：指年月日：12年09月15日；01：指当日中的第1个采购单；不合格供货单号：U12091501 U：表不合格供货；120915：指年月日：12年09月15日；01：指当日中的第1个不合格供货单；入库单号根38、据三种入库类型分别编号，具体如下：采购入库单号：PE12091501 PE：表采购入库； 120915：指年月日：12年09月15日； 01：指当日中的第1个采购入库单；维修入库单号：SE12091501 SE：表维修入库； 120915：指年月日：12年09月15日； 01：指当日中的第一个维修入库单；换取入库单号：RE12091501 RE：表换取入库； 120915：指年月日：12年09月15日； 01：指当日中的第一个换取入库单；出库单号根据三种出库类型分别编号，具体如下：维修出库单号：SO12091501 SO：表维修出库； 120915：指年月日：12年09月15日； 01：指当日39、中的第一个维修出库单；报废出库单号：DO12091501 DO：表报废出库； 120915：指年月日：12年09月15日； 01：指当日中的第一个报废出库单；领用出库单号：CO12091501 CO：表领用出库； 120915：指年月日：12年09月15日； 01：指当日中的第一个领用出库单；3.3数据库设计3.3.1 E-R图E-R图为实体-联系图，提供了表示实体型、属性和联系的方法，用来描述现实世界的概念模型。E-R图如图3-2所示：E-R图3-2（具体实体图详见附录：图3-3至图3-13）3.3.2关系模型设计部 门 ：（部门编号、部门名称、联系电话、负责人姓名、传真）供 应 商 ：（供40、应商编号、供应商名称、地址、邮编、联系人姓名、传真、产品规格型号）维 修 商 ：（维修商编号、维修商名称、地址、邮编、联系人姓名、联系电话、邮编、传真）采 购 单 ：（采购单号、刀具规格型号、采购日期、供应商编号、供应商名称、单价、数量、刀具名称、备注）不合格供货单 ：（不合格供货单号、刀具规格型号、供应商编号、供应商名称、开单日期、刀具名称、数量、单价）维 修入库 单 ：（入库单号、刀具规格型号、维修商编号、刀具名称、数量、维修入库日期、入库类型、备注）换 取入库 单 ：（入库单号、刀具规格型号、刀具名称、刀具数量、入库日期、部门编号、入库类型、备注）采 购入库 单 ：（入库单号、刀具规格型41、号、刀具名称、刀具数量、入库日期、单价、供应商编号、供应商名称、入库类型、备注）入库 统计 单 ：（入库单号、刀具规格型号、刀具名称、数量、入库日期、入库类型）供应 出库 单 ：（出库单号、刀具规格型号、刀具名称、数量、部门编号、出库日期、出库类型、备注）报 废出库 单 ：（出库单号、刀具规格型号、刀具名称、刀具数量、报废出库日期、出库类型、备注）维修 出 库单 ：（出库单号、刀具规格型号、刀具名称、刀具数量、维修出库日期、出库类型、备注）出库 统 计单 ：（出库单号、刀具规格型号、刀具名称、刀具数量、出库日期、出库类型）刀具基本信息表：（刀具规格型号、刀具名称、刀具类型、保养周期、备注）刀具42、库存信息表：（刀具规格型号、出具时间、刀具名称、刀具数量、类型）3.3.3数据库表（1）报废出库单报废出库单用来保存报废道具出库的信息。表3-1 报废出库单数据名称数据类型长度允许空说明出库单号（报废）文本10否主键刀具规格型号文本20否主键刀具名称文本20是刀具数量数字整型是出库日期（报废）日期/时间是出库类型（报废）文本2是默认为“DO”备注备注是（2）不合格供货单 不合格供货单用来保存不合格刀具的信息。表3-2不合格供货单数据名称数据类型长度允许空说明供应商编号数字长整型否主键不合格供货单号文本9否主键供应商名称文本40是开单日期日期/时间20 是 刀具名称文本20是数量数字整型是单价货43、币是（3）部门信息表 部门信息表用来保存部门的基本信息。表3-3部门信息表数据名称数据类型长度允许空说明部门编号文本3否主键部门名称文本10是 负责人姓名文本10是联系电话文本15是传真文本15是（4）采购单 采购单用来保存新采购来的刀具的信息。表3-4采购单数据名称数据类型长度允许空说明采购单号文本9否主键刀具规格文本20否主键刀具名称文本20是采购日期日期/时间是供应商编号数字长整型是供应商名称文本40是刀具单价货币是数量数字整型是备注备注是（5）采购入库单采购入库单用来保存入库的刀具是由采购而得的刀具的信息。表3-5采购入库单数据名称数据类型长度允许空说明采购入库单号文本10否主键刀具规44、格型号文本20否主键刀具名称文本20是刀具数量数字整型是入库日期日期/时间是单价货币是供应商编号数字长整型是供应商名称文本40是入库类型文本2是默认为“PE”备注备注是（6）维修商信息表维修商信息表用来保存维修商的基本信息。表3-6维修商信息表数据名称数据类型长度允许空说明维修商编号自动编号长整型否主键维修商名称文本40是联系人姓名文本10是联系电话文本15是传真文本15是地址文本60是邮编文本6是（7）供应商信息表供应商信息表用来保存供应商的基本信息。表3-7供应商信息表数据名称数据类型长度允许空说明供应商编号自动编号长整型否主键供应商名称文本40是地址文本60是邮编文本6是联系人姓名文本145、0是传真文本15是产品规格型号备注是（8）维修入库单维修入库单用来保存入库的刀具是由维修而得的刀具的信息。表3-8维修入库单数据名称数据类型长度允许空说明维修入库单号文本10否主键刀具规格型号文本20否主键维修商编号数字长整型是刀具名称文本20是刀具数量数字整型是维修入库日期日期/时间是入库类型文本2是默认为“SE”备注备注是（9）换取入库单换取入库单用来保存刀具入库是由换取而得的刀具的信息。表3-9换取入库单数据名称数据类型长度允许空说明换取入库单号文本10否主键刀具规格型号文本20否主键刀具名称文本20是刀具数量数字长整型是入库日期日期/时间是部门编号文本3是入库类型文本2是默认为“RE”46、备注备注是（10）入库统计单入库统计单用来保存所有入库刀具的信息。表3-10入库统计单数据名称数据类型长度允许空说明入库单号文本10否主键刀具规格型号文本20否主键刀具名称文本20是刀具数量数字长整型是入库日期日期/时间是入库类型文本2是“PE”或“SE”或“RE”（11）供应出库单供应出库单用来保存供应出库刀具的信息。表3-11供应出库单数据名称数据类型长度允许空说明供应出库单号文本10否主键刀具规格型号文本20否主键刀具名称文本20是刀具数量数字长整型是部门编号文本3是出库日期日期/时间是出库类型文本2是“COT”或“COO”备注备注是（12）维修出库单维修出库单用来保存维修出库的刀具的信47、息。表3-12维修出库单数据名称数据类型长度允许空说明维修出库单号文本10否主键刀具规格类型文本20否主键刀具名称文本20是刀具数量数字整型是维修出库日期日期/时间是出库类型文本2是默认为“SO”备注备注是（13）出库统计单出库统计单用来保存所有出库刀具的信息。表3-13出库统计单数据名称数据类型长度允许空说明出库单号文本10否主键刀具规格型号文本20否主键刀具名称文本20是刀具数量数字整型是出库日期日期/时间是出库类型文本2是“SO”或“COO”或“COT”或“DO”（14）刀具基本信息表刀具基本信息表用来保存刀具的基本信息。表3-14刀具基本信息表数据名称数据类型长度允许空说明刀具规格型号48、文本20否主键刀具名称文本20否刀具类型文本4是“高常”或“高临”或“普常”或“普临”保养周期数字整型是单位为“次/月”备注备注是（15）刀具库存信息表刀具库存信息表用来保存库存里刀具的数量及基本信息。表3-15刀具库存信息表数据名称数据类型长度允许空说明刀具规格型号文本20否主键出具时间日期/时间是刀具名称文本20是刀具数量数字整型是刀具类型文本4是4系统开发4.1开发工具选择系统以Windows XP作为开发平台。选择Windows XP作为开发平台是因为无论是用于工作站还是服务器，Windows XP都适用于各种规模的公司，其性能稳定，易于安装且普及度高，在这样的平台下开发的程序具有很强49、的通用性。系统所用的开发工具是Visual Basic 6.0。Visual Basic 6.0(vb6.0)是一种由微软公司开发的包含协助开发环境的事件驱动编程语言。从任何标准来说，VB都是世界上使用人数最多的语言。vb6.0源自于BASIC编程语言。Visual Basic 6.0拥有图形用户界面(GUI)和快速应用程序开发(RAD)系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建ActiveX控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序 张翰文、齐锦刚.Visual Basic数据库系统开发实例与解析.M.北京：高等教育出版社，2003.11，111450、；。系统选择的数据库管理系统是Microsoft Access 2007。Microsoft Office Access 2007是由微软发布的关联式数据库管理系统。它结合了 Microsoft Jet Database Engine 和图形用户界面两项特点，是Microsoft Office 2007的系统程式之一。 凭借Microsoft Office Fluent用户界面和无需深厚的数据库知识即可使用的交互式设计功能，Office Access 2007 可帮助信息工作者轻松、快速地跟踪和报告信息 杨继萍、孙岩、梁文新.Access 2007数据库应用于开发.M.北京：清华大学出版社，251、008.11，192；。4.2部门界面及源代码4.21部分界面登陆界面 如图4-1所示：图4-1系统主界面，其中包括基本信息、库存信息、采购信息、系统管理、关于这五部分组成的，如图4-2所示：图4-2基本信息界面，其中包括部门信息、供应商信息、维修商信息、刀具信息、基本信息查询这五部分组成的，如图4-3所示：图4-3库存信息，其中包括入库单、出库单、刀具信息查询这三部分组成，如图4-4、图4-5所示：图4-4图4-5采购信息，其中包括采购单录入、不合格供货单录入、采购信息查询这三部分组成，如图4-6所示：图4-6系统管理，其中包括用户管理、权限管理两部分组成，如图4-7、图4-8所示：图4-752、图4-84.22部分源代码（1）基本信息菜单刀具录入源代码：Private Sub Command1_Click()Dim SQL1 As String If Len(Text1.Text) = 0 Then MsgBox 数据不全请重新输入, vbInformation, 提示 Exit Sub End If adocn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & 刀具管理信息系统.mdb adors.Open 刀具基本信息表, adocn, adOpenKeyset, adLockOptimistic, a53、dCmdTable SQL1 = INSERT INTO 刀具基本信息表 VALUES( & Text1.Text & , & Text2.Text & , & Text3.Text & , & Text4.Text & , & Text5.Text & ) adocn.Execute SQL1 adocn.Close QK MsgBox 添加成功, vbInformation, 提示End SubPrivate Sub QK()Text1.Text = Text2.Text = Text4.Text = Text5.Text = Text3.Text = End Sub（2）刀具信息查询源代54、码：Private Sub Command2_Click()If Len(Text1.Text) 0 Then Adodc1.RecordSource = select * from 刀具基本信息表 where 刀具规格型号= & Text1.Text & Debug.Print Adodc1.RecordSource Adodc1.RefreshElseIf Len(Text3.Text) 0 Then Adodc1.RecordSource = select * from 刀具基本信息表 where 刀具名称= & Text3.Text & Debug.Print Adodc1.Recor55、dSource Adodc1.Refresh Else If Len(Combo1.Text) 0 Then Adodc1.RecordSource = select * from 刀具基本信息表 where 刀具类型= & Combo1.Text & Debug.Print Adodc1.RecordSource Adodc1.Refresh Else If Len(Combo2.Text) 0 Then Adodc1.RecordSource = select * from 刀具基本信息表 where 保养周期= & Combo2.Text & Debug.Print Adodc1.Rec56、ordSource Adodc1.Refresh Else MsgBox 请输入信息, vbInformation End If End If End If End If End SubPrivate Sub Form_Load()Combo1.Text = Combo2.Text = End Sub（3）库存信息类换取入库单录入源代码：Private Sub Command1_Click()Dim SQL1 As StringDim SQL2 As String If Len(Text1.Text) = 0 Then MsgBox 数据不全请重新输入, vbInformation, 提示 E57、xit Sub End If adocn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & 刀具管理信息系统.mdb adors.Open 换取入库单, adocn, adOpenKeyset, adLockOptimistic, adCmdTable SQL1 = INSERT INTO 换取入库单 VALUES( & Text1.Text & , & Text4.Text & , & Text5.Text & , & Text6.Text & , & Text2.Text & , & Text9.Text & ,58、 & Text34.Text & , & Text38.Text & ) adocn.Execute SQL1 adocn.Close adocn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & 刀具管理信息系统.mdb adors.Open 入库统计表, adocn, adOpenKeyset, adLockOptimistic, adCmdTable SQL2 = update 入库统计表 set 入库单号= ( & Text1.Text & ),刀具名称=( & Text5.Text & ),数量=(数量+ 59、& Text6.Text & ),入库日期=( & Text2.Text & ),入库类型=( & Text34.Text & ) where 刀具规格型号= & Text4.Text & adocn.Execute SQL2 adocn.Close QK MsgBox 添加成功, vbInformation, 提示End SubPrivate Sub QK()Text1.Text = Text2.Text = Text4.Text = Text5.Text = Text6.Text = Text7.Text = Text9.Text = Text11.Text = Text12.Text =60、 Text13.Text = Text15.Text = Text16.Text = Text17.Text = Text18.Text = Text19.Text = Text20.Text = Text21.Text = Text22.Text = Text23.Text = Text24.Text = Text25.Text = Text26.Text = End Sub（4）换取入库单查询源代码：Private Sub Command1_Click()If Len(Text1.Text) 0 Then Adodc1.RecordSource = select * from 换取入库单 61、where 入库单号= & Text1.Text & Debug.Print Adodc1.RecordSource Adodc1.RefreshElseIf Len(Text2.Text) 0 Then Adodc1.RecordSource = select * from 换取入库单 where 入库日期= & Text2.Text & Debug.Print Adodc1.RecordSource Adodc1.Refresh Else If Len(Text39.Text) 0 Then Adodc1.RecordSource = select * from 换取入库单 where 部62、门编号= & Text39.Text & Debug.Print Adodc1.RecordSource Adodc1.Refresh Else MsgBox 请输入信息, vbInformation End If End If End If End Sub（5）入库单统计源代码：Private Sub Command1_Click()If Len(Text1.Text) 0 Then Adodc1.RecordSource = select * from 入库统计表 where 入库单号= & Text1.Text & Debug.Print Adodc1.RecordSource Adod63、c1.RefreshElseIf Len(Text2.Text) 0 Then Adodc1.RecordSource = select * from 入库统计表 where 入库日期= & Text2.Text & Debug.Print Adodc1.RecordSource Adodc1.Refresh Else MsgBox 请输入信息, vbInformation End If End If End Sub（6）采购信息类采购单录入源代码：Private Sub Command1_Click()Dim SQL1 As String If Len(Text1.Text) = 0 The64、n MsgBox 数据不全请重新输入, vbInformation, 提示 Exit Sub End If adocn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & 刀具管理信息系统.mdb adors.Open 采购单, adocn, adOpenKeyset, adLockOptimistic, adCmdTable SQL1 = INSERT INTO 采购单 VALUES( & Text1.Text & , & Text4.Text & , & Text5.Text & , & Text2.Text & 65、, & Text9.Text & , & Text23.Text & , & Text14.Text & , & Text6.Text & , & Text38.Text & ) adocn.Execute SQL1 adocn.Close QK MsgBox 添加成功, vbInformation, 提示End SubPrivate Sub QK()Text1.Text = Text2.Text = Text4.Text = Text5.Text = Text6.Text = Text7.Text = End Sub（7）采购单查询源代码：Private Sub Command2_Click66、()If Len(Text1.Text) 0 Then Adodc1.RecordSource = select * from 采购单 where 采购单号= & Text1.Text & Debug.Print Adodc1.RecordSource Adodc1.RefreshElseIf Len(Text2.Text) 0 Then Adodc1.RecordSource = select * from 采购单 where 采购日期= & Text2.Text & Debug.Print Adodc1.RecordSource Adodc1.Refresh Else If Len(Tex67、t31.Text) 0 Then Adodc1.RecordSource = select * from 采购单 where 供应商编号= & Text31.Text & Debug.Print Adodc1.RecordSource Adodc1.Refresh Else MsgBox 请输入信息, vbInformation End If End If End If End Sub（8）系统管理类用户管理源代码：Private Sub Command1_Click()Dim SQL1 As String If Len(Text1.Text) = 0 Then MsgBox 数据不全请重新输68、入, vbInformation, 提示 Exit Sub End If adocn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & 刀具管理信息系统.mdb adors.Open 用户管理, adocn, adOpenKeyset, adLockOptimistic, adCmdTable SQL1 = INSERT INTO 用户管理 VALUES( & Text1.Text & , & Text4.Text & , & Text5.Text & ) adocn.Execute SQL1 adocn.Close69、 QK MsgBox 添加成功, vbInformation, 提示End Sub（9）权限管理源代码：Private Sub Command1_Click()Dim SQL1 As String If Len(Text1.Text) = 0 Then MsgBox 数据不全请重新输入, vbInformation, 提示 Exit Sub End If adocn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= & App.Path & 刀具管理信息系统.mdb adors.Open 权限管理, adocn, adOpenKeyset, 70、adLockOptimistic, adCmdTable SQL1 = INSERT INTO 权限管理 VALUES( & Text1.Text & , & Text4.Text & , & Combo1.Text & ) adocn.Execute SQL1 adocn.Close QK MsgBox 添加成功, vbInformation, 提示End Su5系统开发总结 本次短学期实践中，我们小组主要分析和设计的是刀具管理信息系统。众所周知，刀具对于所有制造企业的来说都是非常重要的固定资产，对于刀具的合理的管理和优化配置能大幅度的降低企业的生产成本，其中包括减少初期投资，工作人员，库存71、资金以及采购管理成本。初步统计实施刀具管理系统可以在刀具计划环节上节约费用约25%，在制造环节因减少设置和停顿时间而节约费用约10%，因减少刀具调整节约费用约15%，除此之外通过刀具管理信息系统我们还可以更好的了解刀具的品种，规格，数量等详细信息。还可以生成刀具成本评估清单和刀具利用情况统计表，来优化刀具使用成本及使用频率。如果能加入条码识别或无线射频识别等技术，还能更方便的监测刀具的入口和流出，精确地管理刀具及其参数，大大提高刀具的管理效率。由此可以发现刀具管理信息系统对于大量使用刀具的企业的重要性，如果能设计和制作出优秀的刀具管理信息系统将会为企业带来巨大的经济效益。而通过我们的观察我们发现秉信纸业有限公司，并没有一套完整的刀具管理信息系统，尽管他们企业也有一套比较成熟的业务流程，但是却很繁琐，许多重复动作，这不仅增加了人力，也使得企业的成本变得更大，而且如果整个过程中有一个环节出现错误，很难进行查询，这就不如管理信息系统带来的了更大的便利。所以这套系统的建立，对于杭州秉信纸业有限公司有着重大的意义。致谢附录参考文献