生产管理系统的设计与实现-产品库存管理模块

摘要随着我国改革开放的不断深入，企业发展已经从面向区域市场转向面向对国内外广阔的市场，过去长期采用的传统手工或手工加微机的管理方式已无法对经营过程中多层次、多品种、多批量的生产计划进行管理，也无法对任何一种产品生产过程的动态信息进行管理。生产管理系统正是在这种背景之下，以信息技术为基础，以基本MRP理论为指导，通过对主生产计划（MPS）、物料清单（BOM）、库存信息的协调管理来实现对企业生产经营诸因素进行优化组合和合理配置，提高企业的经营质量和效率，降低企业生产成本，优化生产管理，全面增强企业的生存竞争能力。本系统以灯饰产品的生产管理为例进行设计编写，后台数据库采用SQLServer2000，以保证数据的安全、高效和稳定；前台采用MicrosoftVisualBasic6.0作为主要的开发工具，它可与SQLServer2000数据库无缝链接。主要实现企业生产的基础信息管理、计划信息管理、生产设备管理、物料库存管理和用户管理以及打印相关报表等。关键词:生产管理系统；VisualBasic；SQLServer2000

AbstractWithourreformandopeningupunceasingdevelopingandconsummating,theenterprisedevelopmenthasbetransformedfromcateringfortheregionalmarkettothevastmarketofdomesticandoverseas.Thepastlong-termuseoftraditionalmanualorhandplusmanagementofcomputeroperationshasbeenunabletoadministratethemulti-level,numerousinvarietyandthemassdistributionofproductionplanadministrationduringoperatingprocess,norcanmanagethedynamicinformationinanyformofaproductoftheproductionprocess.Productionmanagementsystemisinthiscontext,basedoninformationtechnology,whichdirectedbybasicMRPtheory,throughthemasterproductionschedule,billofmaterialandinventoryinformationmanagementtoachievethecoordinationofproductionmanagementandtooptimizethecombinationofvariousfactorsandrationalallocation.Anditcanalsoimprovethequalityandefficiencyofenterprisemanagement,reduceproductioncosts,optimizeproductionmanagement,andenhancetheoverallcompetitivenesstosurvive.Thissystemisdesignedbythesampleoflightingproductsandaccessoriesproductionmanagement.ThebackgroundpartitiondatabaseuseSQLServer2000,toensurethedatasecurity,efficientandstable.Fortheforegroundpartition,whichadoptMicrosoftVisualBasic6.0asamajordevelopmenttool,canbelinkedwithSQLServer2000databaseseamlessly.ThemainintentionoftheProductionManagementSystemistoachievebasedinformationmanagement,planninginformationmanagement,productionequipmentmanagement,productinventorymanagementandusermanagement,andprintoutrelatedreport,etc.Keywords:ProductionManagementSystem;VisualBasic；SQLServer20001.绪论1.1研究生产管理系统的重要意义当今时代，在全球竞争激烈的大市场中，无论是流程式还是离散式的制造业，无论是单件生产、多品种小批量生产、少品种重复生产还是标准产品大量生产的制造，制造业内部管理都会遇到以下问题：企业可能拥有卓越的销售人员推销产品，但是生产线上的工人却无法如期交货，车间管理人员则抱怨说采购部门没有及时供应他们所需要的原料；实际上，如果采购部门的效率过高，仓库里囤积的某些材料很长时间都用不完，仓库库位饱和，资金周转很慢；许多公司要用6~13个星期的时间，才能计算出所需要的物料数量，所以订货周期只能为6~13个星期；订货单和采购单上的日期和缺料清单上的日期都不同，没有一个是肯定的；财务部门不信赖仓库部门的数据，不以它来计算制造成本。不能否认，以上这些情况正是大多数企业目前所面临的一个严峻的问题，然而针对这一现象，又能有什么有效的办法来解决它呢？为了解决这些问题，生产管理系统应运而生，解决了在生产线上各个环结互不相通所造成的各种问题，显著提高了企业的经营质量和效率；降低了生产成本，增强了市场竞争力；强化了企业资金流管理，提高了资金利用率；优化了生产管理，疏通了生产渠道；提高了生产效率。1.2生产管理系统的现状分析1.2.1生产管理系统的国外发展现状生产管理系统随着产品复杂性的增加、市场竞争的加剧以及信息全球化而不断更新进化。本系统的指导思想MRP理论较为先进和实用，解决了企业物料供需信息集成的问题，对生产计划的控制也比较完善。但是其运行过程主要是物流的过程，并没有说明企业的经济效益，而生产的运作过程，产品从原材料的投入到成品的产出过程都伴随着企业资金的运动。针对上述问题的提出，1977年美国注明生产管理专家奥列弗·怀特（OliverWight）提出了一个新概念——制造资源计划（ManufacturingResourcesPlanning），被称为MRPⅡ。MRPⅡ以MRP为核心，与MRP的主要区别就是MRPⅡ运用管理会计的概念，用货币形式说明了执行企业“物料计划”带来的效益，实现物料信息同资金信息的集成。20世纪90年代以来，由于经济全球化和市场国际化的发展，企业所面临的竞争更趋激烈。以客户为中心、基于时间、面向整个供应链的管理成为在新的形势下企业发展的基本动向。企业资源计划（ERP，EnterpriseResourcePlanning）理论与系统在MRPⅡ的基础上发展而生。ERP中的企业资源包括企业的“三流”资源，即物流资源、资金流资源和信息流资源，ERP实质上就是对着“三流”资源进行全面集成管理的管理信息系统。从国际的情况来看，据美国权威市场预测研究机构AMRResearch宣布，2008年全球ERP市场总、收入达148亿美元，全球ERP市场在近5年内将以年综合增幅37%的速度发展，到2012年这一数字将增至520亿，并且ERP的应用范围将从制造业扩展到零售业、服务业、公共事业、医疗行业等。1.2.2销售管理信息系统的国内发展现状进入2000年以来，随着中央提出“以信息化带动工业化”战略，我国企业信息化与现代化发展步伐明显加快。特别是科技部提出的“制造业信息化工程”、经贸委提出的“企业信息化”行动，带动和掀起了我国企业应用ERP的高潮。近两年，我国众多企业在积极实施ERP系统，现已有数千家企业应用ERP系统。有些早期实施MRPⅡ的企业在使其系统升级为ERP系统，并在不断深化应用，功能更加强大，集成化程度越来越高。先进的ERP管理系统提高了企业的市场竞争力，获得显著经济效益。巨大的ERP市场也刺激了国产化ERP产品应用的不断深入和我国ERP软件产业的迅速发展，现已有国产化ERP软件商数十家之多。“十五”863计划也在大力支持和推动ERP管理系统的研究，并重点支持了10个ERP软件产品的研发，对ERP应用实施和产业发展产生了较大的影响和推动作用。ERP系统应用实施的热潮正在全国各省市全面铺开，并在制造业信息化工程中发挥着积极推动作用。1.3本系统研究内容本系统属于典型的数据库管理系统，是针对中小型企业的生产管理而开发设计的，可实现进一步的计算机化管理。本系统的基本研究对象：主生产计划主生产计划是确定每一具体的最终产品在每一具体时间段内生产数量的计划。这里的最终产品是指对于企业来说最终完成、要出场的完成品、它要具体到产品的品种、型号。它是物料需求计划制订的一个最重要的数据来源。产品结构与物料清单生产管理系统要正确计算出物料需求的时间和数量，特别是相关物料需求的数量和时间，首先要使系统能够知道企业所制造的产品结构和所有要使用到的物料。产品结构列出构成成品或装配件的所有部件、组件、零件等的组成、装配关系和数量要求。它是生产管理系统产品拆零的基础。举例来说，一个大大简化了的台灯的产品结构如图1-1所示，它大体反映了台灯的构成。台灯台灯灯座（1）灯泡（1）电线（1）插头（1）灯罩（1）图1-1简化了的台灯产品结构图库存信息库存信息是保存企业所有产品、零部件、在制品、原材料等存在状态的数据库。在生产管理系统中，将产品、零部件、在制品、原材料甚至工装工具等统称为“物料”或“项目”。为便于计算机识别，必须对物料进行编码，物料编码是生产管理系统识别物料的唯一标识。本系统的研究内容主要有：能够控制物料的基本信息及物料的出/入库操作，能查询出任何时间的物料出/入库情况。生产过程中能够对生产订单进行管理，随时掌握生产的进度情况。能够计算生产产品所需各种物料的数量，控制物料库存。能够设置生产设备的基本信息及摊销期限，能查询每样生产设备的所属车间部门。能够对生产设备进行报废、维修的管理，能查询每样生产设备的类型和状态以上所有的功能模块都需要打印出各种各样的报表，用于会计查账或审核。1.4系统分工本系统由区思恩、刘伟仙、林炽坚3人分工完成，系统由基础信息管理、计划信息管理、生产设备管理、产品库存管理、系统维护5个模块组成。系统详细分工如下：区思恩负责基础信息管理模块和生产设备管理模块的窗体设计和代码设计。刘伟仙负责产品库存管理功能模块和系统主界面、登录模块的窗体设计和代码设计。林炽坚负责计划信息管理模块和系统维护模块的窗体设计和代码设计。

2.总体设计2.1系统总体功能生产管理系统是一个典型的数据库开发应用程序，由基础信息管理模块、计划信息管理模块、生产设备管理模块、产品库存管理模块、系统维护模块等5个功能模块组成，规划系统功能模块如下：基础信息管理模块该模块主要包括产品基础信息、物料基本信息、设备状态设置、设备类型设置、设备摊销时间设置、车间部门设置6部分组成。计划信息管理模块该模块主要包括生产计划单管理、生产计划单查询、物料需求计划、物料需求查询4部分。生产设备管理模块该模块主要由生产设备档案、生产设备查询、生产设备报废、生产设备报废查询、生产设备维修、生产设备维修查询6部分组成。产品库存管理模块该模块主要由产品完工入库、产品入库查询、物料入库、物料入库查询、生产领料、生产领料查询、物料库存信息查询7部分组成。系统维护模块该模块主要由操作员设置、密码修改、操作权限设置、数据清理、数据备份与恢复、设置主窗口图片6部分组成。

生产管理系统生产管理系统基础信息管理计划信息管理生产设备管理产品库存管理系统维护产品基础信息物料基本信息设备状态设置设备摊销时间设置车间部门设置生产计划单管理生产计划单查询物料需求计划物料需求查询生产设备档案生产设备查询生产设备报废生产设备报废查询生产设备维修生产设备维修查询产品完工入库产品入库查询物料入库物料入库查询生产领料生产领料查询物料库存信息查询操作员设查询密码修改操作权限设置图2-1生产管理系统功能架构图2.2系统流程图本系统主要有两大管理功能，分别是生产设备管理和生产计划单管理。系统流程图分别独立介绍这两大管理功能的操作流程。图2-2生产设备管理系统流程图图2-3生产计划单管理系统流程图2.3系统数据流程图配料配料生产管理生产车间系统维护计划管理计划部门仓库部门设备管理成品设备档案文件设备报废文件设备维修文件参数设置文件操作权限设置入库文件生产计划单物料需求计划单领料文件图2-2生产管理系统数据流程图2.4编码设计本系统的内部信息编码采用了统一的编码方式。产品编码产品编号为英文字母“CP”和3位数字编码的组合。例如：CP001。物料编号物料编号为英文字母“WL”和3位数字编码的组合。例如：WL001。设备状态编号设备状态编号为英文字母“ZT”和3位数字编码的组合。例如：ZT001。生产计划单编号生产计划单编号为英文字母“JH”加系统日期加3位数字编码的组合。例如：JH20110417001。物料需求计划单编号物料需求计划单编号为英文字母“WLXQ”加系统日期加3位数字编码的组合。例如：WLXQ20110417001。设备档案编号设备档案编号为英文字母“Sb”加系统日期加英文字母“D”加3位数字编码的组合。例如：Sb20110417D001。物料入库单编号物料入库单编号为英文字母“WLRK”加系统日期加英文字母“D”加3位数字编码的组合。例如：WLRK20110417D001。生产领料单编号生产领料单编号为英文字母“SCLL”加系统日期加英文字母“d”加3位数字编码的组合。例如：SCLL20110417d001。

3.具体系统实现功能介绍3.1系统登录系统登录主要用于对登录生产管理系统的用户进行安全性检查，以防非法用户进入该系统。只有合法的用户才可以登录系统，同时根据操作员的不同给予其相应的操作权限。3.2主窗体主窗口模块是程序被刚启动时出现的菜单选择页面，其中包括:基础信息管理、计划信息管理、生产设备管理、产品库存管理、系统维护、退出系统五个功能项的选择及其相关的快捷按钮的。用户可根据自己的需要进行相应功能的操作选择。主模块中能显示操作员的姓名及日期。3.3产品库存管理“产品库存管理”功能模块用于设置、管理产品、物料的基本信息。物料、产品的库存信息是生产计划能够完成的决定性依据。“产品库存管理”功能模块主要包括：产品完工入库、产品入库查询、物料入库、物料入库查询、生产领料、生产领料查询、物料库存信息查询7个部分。3.3.1产品完工入库产品完工入库包括产品入库编号、产品编号、产品名称、产品规格、计量单位、入库数量、入库日期、生产计划单、备注信息属性，能对产品完工入库信息进行增加、删除、修改、查询操作。窗体中有产品完工入库信息列表，显示系统已完工入库的产品信息。3.3.2产品入库查询产品入库查询可以按产品入库编号、产品编号、产品名称、产品规格、计量单位、入库数量、入库日期、生产计划单为查询条件，查询出相应的记录，并打印报表，显示打印时间，合计入库数量。3.3.3物料入库物料入库包括产品物料入库编号、物料编号、物料名称、物料规格、计量单位、入库数量、入库日期、备注信息属性，能对物料入库信息进行增加、删除、修改、查询操作。窗体中有物料入库信息列表，显示系统已入库的物料信息。3.3.4物料入库查询物料入库查询可以按物料入库编号、物料编号、物料名称、物料规格、计量单位、入库数量、入库日期、备注信息为查询条件，查询出相应的记录，并打印报表，显示打印时间，合计入库数量。3.3.5生产领料生产领料包括领料单编号、生产计划单、产品编号、产品名称、产品规格、产品单位、产品数量、物料编号、物料名称、物料规格、物料单位、物料数量/单位产品、物料数量、已领数量、领料数量、未领数量、领料日期、备注信息属性，能对物料入库信息进行增加、删除、修改、查询操作。窗体中有生产领料基本信息列表，显示系统已生产领料的基本信息。3.3.6生产领料查询生产领料查询可以按领料单编号、生产计划单、产品编号、产品名称、产品规格、产品单位、产品数量、物料编号、物料名称、物料规格、物料单位、物料数量/单位产品、物料数量、已领数量、领料数量、未领数量、领料日期、备注信息为查询条件，查询出相应的记录，并导出Word文档打印报表。3.3.7物料库存信息查询物料库存查询可以按物料编号、物料名称、物料规格、物料单位、库存数量为查询条件，查询出相应的记录，并导打印报表，显示日期、合计库存数量。

4.数据库各库、表及其作用4.1库的建立图4-1生产管理系统概念模型数据库是管理系统的核心内容，数据表结构设计是否合理将直接影响到能否正确存取数据。本数据库在SQLserver2000中创建。创建过程如下：打开SQLserver2000企业管理器，新建一个新的数据库。为数据库取名db_SCGL，然后保存。右键点击“数据库”出来一个菜单，再右键“新建表”就可以了。使用相同的方法再创建其他表，这里不再赘述。以后可以直接对数据库进行修改或删除。4.2库介绍生产管理系统数据库由16个数据库表组成，分别是：车间部门信息表、产品入库信息表、产品信息表、设备报废信息表、设备类型信息表、设备摊销时间表、设备维修信息表、设备状态信息表、生产计划单信息表、生产领料信息表、生产设备信息表、物料库存信息表、物料需求信息表、物料需求信息表、物料信息表、用户信息表。图4-2数据表树型结构图4.3表的设计表4-1产品入库表字段名数据类型长度描述备注允许为空cprk_idvarchar20入库编号主键Ncprk_cpbhvarchar50产品编号Ncprk_cpmcvarchar50产品名称Ncprk_cpggvarchar50产品规格Ncprk_jldwvarchar50计量单位Ncprk_rkslnumeric9入库数量Ncprk_rkrqvarchar50入库日期Ncprk_ddbhvarchar30订单编号Ncprk_bzvarchar100备注信息Y

表4-2产品信息表字段名数据类型长度描述备注允许为空cpxx_idvarchar30产品编号主键Ncpxx_cpmcvarchar50产品名称Ncpxx_cpggvarchar50产品规格Ncpxx_jldwvarchar50产品计量单位Ncpxx_bzvarchar50备注信息Y表4-3生产计划单表字段名数据类型长度描述备注允许为空scjhd_idvarchar30生产计划单编号主键Nscjhd_cpbhvarchar50产品编号Nscjhd_cpmcvarchar50产品名称Nscjhd_cpggvarchar50产品规格Nscjhd_jldwvarchar50计量单位Nscjhd_jhslnumeric9计划数量Nscjhd_tcrqvarchar50计划投产日期Nscjhd_wgrqvarchar50完工日期Nscjhd_wcfvarchar10是否完成Nscjhd_bztext16备注信息Y表4-4生产领料表字段名数据类型长度描述备注允许为空scll_idvarchar50领料单号主键Nscll_scjhdvarchar50生产计划单Yscll_cpbhvarchar50产品编号Yscll_cpmcvarchar50产品名称Yscll_cpggvarchar50产品规格Yscll_cpdwvarchar50产品单位Yscll_cpslnumeric9产品数量Yscll_wlbhvarchar50物料编号Yscll_wlmcvarchar50物料名称Yscll_wlggvarchar50物料规格Yscll_wldwvarchar50物料单位Yscll_dwslnumeric9每单位产品所需的物料数量Yscll_wlslnumeric9物料数量Yscll_ylslnumeric9已领数量Yscll_llslnumeric9领料数量Yscll_syslnumeric9剩余未领数量Yscll_llrqvarchar50领料日期Yscll_bzvarchar50备注信息Y表4-5生产设备表字段名数据类型长度描述备注允许为空scsb_sbbhvarchar50设备编号主键Nscsb_sbmcvarchar50设备名称Nscsb_sybmvarchar50使用部门Nscsb_sblxvarchar50设备类型Nscsb_sbztvarchar50设备状态Nscsb_syrqvarchar50启用日期Nscsb_gmjznumeric9设备购买价值Nscsb_txsjnumeric9摊销时间Nscsb_bztext16备注信息Y表4-6物料库存表字段名数据类型长度描述备注允许为空wlkc_wlbhvarchar50物料编号主键Nwlkc_wlmcvarchar50物料名称Ywlkc_wlggvarchar50物料规格Ywlkc_wldwvarchar50物料单位Ywlkc_kcslnumeric9库存数量Y表4-7物料入库表字段名数据类型长度描述备注允许为空wlrk_rkidvarchar30入库编号主键Nwlrk_wlbhvarchar50物料编号Nwlrk_wlmcvarchar50物料名称Ywlrk_wlggvarchar50物料规格Ywlrk_jldwvarchar50物料单位Ywlrk_rkslvarchar50入库数量Ywlrk_rkrqvarchar50入库时间Nwrk_bztext16备注信息Y

5.详细设计5.1设计工具选取数据库管理系统软件采用SQLServer2000，以保证数据的安全、高效和稳定。开发工具采用MicrosoftVisualBasic6.0，它能与SQLServer2000数据库无缝链接，且界面亲切，语法简单直观，容易掌握。5.2窗体设计和代码设计5.2.1系统登录系统登录主要用于对登录生产管理系统的用户进行安全性检查，以防止非法用户进入该系统。只有合法的用户，才可以登录本系统，同时系统根据操作员的不同，给予这个操作员相应的操作权限。验证操作员及其密码，主要通过对数据表tb_user的查询，结合If语句判断用户选定的操作员及其输入的密码是否符合数据库中的操作员和密码，如果符合则允许登录，并给予相应的权限，否则提示错误信息。如果错误超过3次，则强行退出系统。生产管理系统登录界面如图5-1所示。图5-1“生产管理系统登录”窗体运行结果在窗体加载时，向ListView控件中添加所有的操作员信息，并将显示在前面的操作员头像、操作员编号、操作员姓名显示在操作员信息中，其实现的代码如下：PrivateSubForm_Load()rs.Open"select*fromtb_user",cnn,adOpenKeyset'打开对象Ifrs.RecordCount>0Thenrs.MoveFirst'移至第一条记录'将第一条记录的信息显示在相应的控件中Lbl_Czyid.Caption=rs.Fields("user_id")Lbl_Name.Caption=rs.Fields("user_name")MyIcon=Val(Right(rs.Fields("user_tx"),Val(Len(rs.Fields("user_tx"))-2)))SetImg_Tx.Picture=Imt_Tx.ListImages(MyIcon).Picture'向ListView中添加图片DoWhilers.EOF=FalseMystr=rs.Fields("user_name")MyIcon=Val(Right(rs.Fields("user_tx"),Val(Len(rs.Fields("user_tx"))-2)))SetitmX=ListView1.ListItems.Add(,,Mystr,MyIcon)rs.MoveNextLoopEndIfrs.Close'关闭对象Txt_mm.Text=""EndSub当用户单击ListView控件中操作员列表项时，系统会自动将用户所选择的操作员的头像、操作员编号、操作员姓名显示在相应的位置，以便用户确认该信息是否正确。其实现的代码如下：PrivateSubListView1_Click()IfListView1.ListItems.Count>0Then'查询操作员信息rs.Open"select*fromtb_userwhereuser_Name='"+ListView1.SelectedItem+"'",cnn,adOpenKeysetIfrs.RecordCount>0Then'如果记录数大于零'显示操作员信息Lbl_Czyid.Caption=rs.Fields("user_id"):Lbl_Name.Caption=rs.Fields("user_Name")MyIcon=Val(Right(rs.Fields("user_tx"),Val(Len(rs.Fields("user_tx"))-2)))'将所选择的操作员头像添加到Image控件中SetImg_Tx.Picture=Imt_Tx.ListImages(MyIcon).PictureEndIfrs.Close'关闭数据集对象EndIfEndSub当用户选定相应的操作员，并在文本框中输入密码，单击【确定】按钮或在Txt_mm文本框中按〈Enter〉键，系统会核实其输入的密码是否正确，如果正确即进入到生产管理系统内部，否则提示用户输入错误。如果用户输入的错误密码超过3次，系统将强行退出。其实现代码如下：PrivateSubLabel7_Click()rs.Open"select*fromtb_userwhereuser_name='"+Trim(Lbl_Name.Caption)+"'",cnn,adOpenKeysetIfrs.RecordCount>0Then'如果记录数大于零'验证操作员及密码IfTxt_mm.Text=rs.Fields("user_mm")Then'如果输入密码正确LoadFrm_Main'加载窗体Frm_Main.ShowFrm_Main.StatusBar1.Panels(2).Text=Lbl_Name.Caption'设置状态栏信息UnloadMe'关闭本窗体Else'否则IfLbl_Name.Caption=""Then'如果操作员姓名为空MsgBox"请选择操作员！",,"信息提示"ListView1.SetFocus'设置焦点ElseIfTxt_mm.Text<>rs.Fields("user_mm")Then'如果密码输入错误MsgBox"密码错误,请重新输入密码！",,"信息提示"Txt_Time.Text=Val(Txt_Time.Text)+1'计数文本框中的数量加一Txt_mm.SetFocus'将焦点设置在密码文本框中EndIfEndIfIfTxt_Time.Text="3"Then'密码错误3次，退出系统MyMsg=MsgBox("密码输入错误,请向系统管理员查询！",,"信息提示")IfMyMsg=vbOKThenEndEndIfEndIfEndIfrs.CloseEndSub5.2.2主窗体主窗体主要是对生产管理系统的各个子功能模块进行调用，并在主窗体中显示操作员的姓名及日期，“生产管理系统主窗体”窗口运行结果如图5-2所示。图5-2“生产管理系统主窗体”窗口运行结果该界面设计中一个重要的环节是利用VB提供的菜单编辑器设计窗体菜单。如图5-3所示。图5-3生产管理系统菜单设计在窗体加载时，调用自定义过程Tree_Change，设置TreeView控件中的数据信息。其设计思路是：首先将菜单中的项目存储到数据表tb_SCGL_menu中，在窗体启动时，利用嵌套循环向TreeView控件中添加数据信息。其实现的代码如下：'自定义一个过程，用于显示TreeView控件中的数据PublicSubTree_change()Dimkey,Text,BH,StrTempAsStringDimNodAsNode'定义一个节点变量rs1.Open"selectdistinctmenu_menu,menu_menuidfromtb_SCGL_menuorderbymenu_menuid",cnn,adOpenKeysetIfrs1.RecordCount>0Then'如果记录数大于零rs1.MoveFirst'移至第一条记录集DoWhilers1.EOF=False'循环读取第1层节点中的数据信息key=Trim(rs1.Fields("menu_menu"))Text=rs1.Fields("menu_menu")StrTemp=rs1.Fields("menu_menu")Setnode1=TreeView1.Nodes.Add(,tvwChild,key,Text,1)'给第1层节点赋与数值rs2.Open"select*fromtb_SCGL_menuwheremenu_menu='"+StrTemp+"'",cnn,adOpenKeysetIfrs2.RecordCount>0Thenrs2.MoveFirstDoWhilers2.EOF=False'循环读取第2层节点中的数据信息key=Trim(rs2.Fields("menu_submenu"))Text=rs2.Fields("menu_submenu")'给第2层节点赋与数值SetNode2=TreeView1.Nodes.Add(node1.Index,tvwChild,key,Text,2)rs2.MoveNextLoopEndIfrs2.Closers1.MoveNextLoopEndIfrs1.CloseEndSub5.2.3物料入库当某种物料库存不足或增加一种新物料的时候，就要进行物料入库的操作，使生产能够顺利进行。“物料入库”窗体实现的主要功能是对物料入库单进行增加、删除、修改、查找等操作。5.2.4生产领料生产领料管理是生产管理中重要的一环，它决定着产品生产是否能正常地进行下去。“生产领料”窗体实现的主要功能是对生产领料单行增加、删除、修改、查找等操作。“生产领料”窗体的运行结果如图5-4所示。图5-4“生产领料”窗口运行结果在向生产领料单中添加信息的过程中，当用户选中相应的生产计划单后，就可以在相应的文本框中显示该计划单所需的产品编号、产品名称、产品规格、产品单位以及该计划单所需的产品数量了，同时在物料编号组合框中显示该产品所需的物料信息。其实现的关键代码如下：PrivateSubCbx_Scjhd_LostFocus()Cbx_Scjhd.BackColor=&HFFFFFF'设置背景色'查询相应的计划单信息rs3.Open"select*fromtb_SCGL_scjhdwherescjhd_id='"+Cbx_Scjhd.Text+"'",cnn,adOpenKeysetIfrs3.RecordCount>0Then'如果记录大于零查询所选的生产计划单的相关信息'设置相应文本框中的内容查询所选的生产计划单的相关信息Text1(1).Text=rs3.Fields("scjhd_cpbh")Text1(2).Text=rs3.Fields("scjhd_cpmc")Text1(3).Text=rs3.Fields("scjhd_cpgg")Text1(4).Text=rs3.Fields("scjhd_jldw")Text1(5).Text=rs3.Fields("scjhd_jhsl")rs4.Open"select*fromtb_SCGL_wlxxwherewlxx_cpbh='"+rs3.Fields("scjhd_cpbh")+"'",cnn,adOpenKeysetIfrs4.RecordCount>0Then查询所选的生产计划单所需产品的物料信息Cbx_wlbh.Clear'清除物料组合框中的内容查询所选的生产计划单所需产品的物料信息Fori=0Tors4.RecordCount-1'向物料文本框中添加数据项Cbx_wlbh.AddItemTrim(rs4.Fields("wlxx_id"))rs4.MoveNextNextiCbx_wlbh.ListIndex=0ElseCbx_wlbh.ClearMsgBox"该产品没有相应的物料信息！",,"信息提示"ExitSubEndIfrs4.CloseEndIfrs3.Close'查询计划单表中是否有该计划单Myrs.Open"select*fromtb_SCGL_scjhdwherescjhd_id='"+Cbx_Scjhd.Text+"'",cnn,adOpenKeysetIfMyrs.RecordCount<=0ThenMsgBox"请在下拉列表中选择正确的生产计划单！",,"信息提示"查询选择或输入的是否是正确的生产计划单编号信息Cbx_Scjhd.ListIndex=0查询选择或输入的是否是正确的生产计划单编号信息Cbx_Scjhd.SetFocusMyrs.CloseExitSubEndIfMyrs.CloseEndSub5.2.5生产领料查询“生产领料查询”窗体可以用于对所有生产领料单按特定条件进行查询等操作，并可以通过下面的列表浏览对应的生产领料单信息。点击【打印】按钮即可显示并能打印相对应的生产领料清单。“生产领料查询”窗体及其打印预览的运行结果如图5-5和图5-6所示。图5-5“生产领料查询”窗口运行结果图5-6“生产领料查询”窗口的打印预览运行结果在程序运行时，打开“生产设备查询”窗口，点击【打印】按钮就能引用WORD应用程序进行打印预览并打印，该功能是通过“Cmd_DY”的Click事件来实现的。其实现的关键代码如下：PrivateSubCmd_DY_Click()'打印Frm_Main.ShowDimiAsInteger,jAsIntegerDimifieldcountAsInteger,irecordcountAsIntegerDimwdappAsWord.ApplicationDimwddocAsWord.DocumentDimatableAsWord.TableWithAdodc1.RecordsetAdodc1.Recordset.MoveLastAdodc1.Recordset.MoveFirstifieldcount=.Fields.Countirecordcount=.RecordCountEndWithOnErrorResumeNext'创建word应用程序，这一句话打开WordSetwdapp=CreateObject("Word.Application")'在word中添加一个新文档Setwddoc=wdapp.Documents.Addwddoc.PageSetup.Orientation=wdOrientLandscapeWithwdapp.Visible=True.Activate'在word中增加一个表格Setatable=.ActiveDocument.Tables.Add(.Selection.Range,irecordcount+1,ifieldcount)Fori=0Toifieldcount-1atable.Cell(1,i+1).Range.InsertAfterDgr_Scll.Columns(i).CaptionNexti'指定表格内容Fori=0Toirecordcount-1Forj=0Toifieldcount-1Dgr_Scll.Row=iDgr_Scll.Col=jatable.Cell(i+2,j+1).Range.InsertAfterDgr_Scll.TextNextjNextiEndWith'清除word对象Setwdapp=NothingSetwddoc=NothingFrm_Main.Enabled=TrueEndSub5.2.6产品完工入库产品生产完成后，应该进行产品完工入库操作。这是整个生产管理系统工作流程的最后一个环节。“产品完工入库”窗体实现的主要功能是对产品入库单行增加、删除、修改、查找等操作。5.3主要问题和解决方案如何动态设置主窗口图片在一般的程序中，都会在主窗体中设置一张能代表本系统特色的图片。那么，怎么样才能根据自己的喜好更换主窗体的图片呢？经过再三学习与查找资料，终于找到了解决的方案：首先，在应用程序所在的路径中新建一个名为picture.txt的文本文件，用于存储所选择图片的路径信息，并在窗体上添加“CommonDialog”控件，该控件是“ActiveX”控件，在使用之前必须从“部件”对话框中添加到工具箱中。然后，在窗体加载时，加入如下代码：'设置主窗口图片OnErrorGoToLoadErr'转出错处理Open(App.Path&"\picture.txt")ForInputAs#1LineInput#1,intexttemp=intextClose#1Image1.Picture=LoadPicture(intext)b=App.Path&"\Image\界面\VB生产管理系统第4套主界面.jpg"ExitSubLoadErr:'如果所设置的主窗体图片找不到，则赋给它一个固定路径的图片Image1.Picture=LoadPicture(App.Path&"\Image\界面\VB生产管理系统第4套主界面.jpg")在执行设置图片的操作时，如点击“点此换图”按钮，系统将执行如下代码：'设置主窗口图片Dimstr'定义变量CommonDialog1.Filter="BMP图片(*.BMP)|*.BMP|JPG图片(*.JPG)|*.JPG|GIF图片(*.GIF)|*.GIF|所有文件(*.*)|*.*"CommonDialog1.ShowOpenIfCommonDialog1.FileName<>""ThenImage1.Picture=LoadPicture(CommonDialog1.FileName)str=CommonDialog1.FileNameOpen(App.Path&"\picture.txt")ForOutputAs#1Print#1,strClose#1CommonDialog1.FileName=""ElseCommonDialog1.FileName=""EndIf

6.系统评价6.1系统特点由于操作人员的计算机操作能力普遍较差，因此本系统具有良好的人机交互界面。由于本系统的使用对象较多，因此具有完备的权限管理功能。完全人性化设计，无须专业人士指导，即可操作本系统。方便的、全方位的数据查询功能。自动完成数据计算，尽量减少人工干预。强大的报表打印功能。6.2存在问题和改进意见由于技术水平和知识面有限，我们完成的系统仍存在着一些不尽完美的问题，以下列出几点：制定物料需求计划一次只能新增一种物料的需求，不能形成一个快捷的制定过程，如批量制定计划，从而大大减少工作量。对记录进行删除时只能单一删除，这样会造成一定的时间浪费。系统其实是没有一个让人一目了然的物料清单，即一种产品需要哪些物料没有一个很直观的界面显示出来。面对以上问题，我们需要从技术上做更大的改进。如果，在设计的前期就有个清楚而全面的计划，我想，我们的系统会做得更好。6.3系统扩展生产管理系统可以作为一个独立的系统运行，也可以和其他的应用系统结合起来，实现数据的共享。另外，一个ERP系统实际上是由生产管理、财务管理、供应管理（进销存管理）几大子系统构成的，随着计算机技术的应用，人力资源管理、客户关系管理等子系统也逐渐被纳入ERP系统的范畴。6.4心得体会经过努力，我的毕业设计终于告一段落了,但是现在回想起来做毕业设计的整个过程，颇有心得，其中有苦也有甜，艰辛同时又充满乐趣,不过乐趣尽在其中！没有接受任务以前，觉得毕业设计只是对这几年来所学知识的单纯总结，但是通过这次做毕业设计发现毕业设计不仅是对前面所学知识的一种检验，而且也是对自己能力的一种提高。这次我们毕业设计的题目是生产管理系统的设计与实现。这是我对自己的考验，我希望通过自己的努力完成设计并希望有所突破。于是本次设计过程中我完全按照软件设计步骤的要求来进行，从课题分析开始，再进行总体设计、详细设计,最后到系统实现。每一步都让我将理论学习的知识应用到实践中去。也使我掌握了一整套规范的设计操作流程。通过这次做毕业设计发现自己的看法有点太片面。通过这次毕业设计使我明白了自己原来知识还比较欠缺。自己要学习的东西还太多，以前老是觉得自己什么东西都会，什么东西都懂，有点眼高手低。通过这次毕业设计，我明白了学习是一个长期积累的过程，在以后的工作、生活中都应该不断的学习，努力提高自己知识和综合素质。最重要的是，从这次的设计中，我体会到了团队合作精神。在计算机软件研发过程中，团队精神是必不可少，相信这次设计之后，我的团队合作能力也得到了很大程度的飞跃。在整个设计中我树立了对自己工作能力的信心，大大提高了动手的能力，使我充分体会到了在创造过程中探索的艰难和成功时的喜悦。虽然这个设计做的也不太好，但是在设计过程中所学到的东西是这次毕业设计的最大收获和财富，使我终身受益。

7.系统说明7.1开发工具和测试环境系统开发平台：VisualBasic6.0。数据库管理系统软件：SQLServer2000运行平台：Windowsxp/Windows20007.2系统安装及使用说明7.2.1安装本系统的数据库为SQLServer2000，在运行程序前需安装SQLServer2000。（数据库用户名为sa，密码为空）将本系拷贝到机器硬盘上，去除只读属性。SQLSever2000安装完成后，进入企业管理器，启动服务器。右键单击“数据库”，指向“所有任务”箭头，单击“附加数据库”。单击“…”，选择系统文件所在路径，双击“生产管理系统\Database\db_SCGL_Data.MDF”，显示验证成功，单击“确认”。进入已拷贝系统的硬盘，双击“生产管理系统\Program\窗体\生产管理系统.exe”即可运行本程序。首次运行由于系统连接数据库，启动时间可能会长，但也随机器的配置不同而不同。7.2.2用户使用说明用户在使用本系统时，请注意以下两点：系统自动生成单据编号，不可以更改。系统支持按〈Enter〉键跳到下一文本框的功能，用户无需通过鼠标定位光标位置。基本信息管理基本信息管理包括：产品基础信息、物料基本信息、设备状态设置、设备类型设置、设备摊销时间设置和车间部门设置。通过基本信息的设置可以对企业的产品、物料及设备进行集中的规范化管理。①产品基础信息添加：单击【添加】按钮，系统自动生成产品编号，单击“产品名称”、“产品规格”、“计量单位”及“备注信息”文本框，输入相关内容，最后单击【保存】按钮即完成产品的添加操作。修改：单击列表中要修改的产品信息，然后单击【修改】按钮即可在各文本框内进行修改，最后单击【保存】按钮即完成修改操作。删除：单击要删除的产品信息，单击【删除】按钮，系统弹出的提示框进行确认后即完成删除操作。查找：单击【查找】按钮，单击文本框，输入要查询的产品编号，然后单击【确定】按钮，列表中会自动显示相应的查询结果。物料基本信息、设备状态设置、设备类型设置、设备摊销时间设置和车间部门设置的操作方法同产品基础信息的操作方法相同，这里不作重复讲解。请参照产品基础信息。计划信息管理计划信息管理菜单主要包括：生产计划单管理、生产计划单查询、物料需求计划、物料需求查询。通过这四个模块的设置可以将企业的生产及物料的需求作成计划单，并配以查功能，提高企业的生产效率。①生产计划单管理增加：单击【增加】按钮，系统自动生成计划单编号，单击“产品编号”下拉按钮，选择相应的产品编号，系统随之自动生成产品名称、规格及产品单位，单击数量文本框，输入相应的数量，选择计划投产日期和计划完工日期，单击“完成否”选项，选择相应的选项，单击备注信息文本框，输入备注信息，最后单击【保存】按钮，即完成增加操作。查找：单击【查找】按钮，系统自动弹出界面，单击“字段名称”下拉按钮，选择相应的字段名称，单击“运算符”下拉按钮，选择运算符号，单击“关键字”文本框，输入与字段名称相匹配的内容，单击【查询】按钮，列表中自动产生相应的查询结果。修改：单击列表中要修改的计划单信息，然后单击【修改】按钮即可在各文本框内进行修改，最后单击【保存】按钮即完成修改操作。删除：单击要删除的计划单信息，单击【删除】按钮即完成删除操作。②生产计划单查询单击“查询条件”下面的第一个文本框的下拉按钮，选择相应的字段名称，单击其后文本框的下拉按钮，选择相应的运算符，单击最后一个文本框，输入与字段名称相匹配的内容，单击【确定】按钮，列表中即显示相应的查询结果。单击【打印】按钮，即可对生产计划单进行打印。物料需求计划的操作方法同生产计划单管理的操作方法相同，这里不作重复讲解，请参照生产计划单管理。物料需求查询的操作方法同生产计划单查询的操作方法相同，这里不作重复讲解，请参照生产计划单查询。注：这里介绍‘基本信息管理’和‘计划信息管理’的基本操作规程，其他功能的操作方法相同，这里不作重复讲解。请参照‘基本信息管理’和‘计划信息管理’。系统维护①操作员设置增加：单击【增加】按钮，系统自动产生操作员编号，单击操作员姓名、操作员密码、密码确认的文本框，输入姓名及密码，单击操作员头像的下拉按钮，选择相应的头像。最后单击【保存】按钮即完成添加操作。查找及删除：单击文本框，输入要查询的操作员编号，单击【确定】按钮，列表中自动显示相应的查询结果，如果单击【删除】按钮即可删除该操作员信息。②密码修改单击“操作员姓名”下拉按钮，选择相应的操作员，单击“操作员原密码”、“输入新密码”、“确认新密码”等文本框，输入相应的密码，单击“选择头像”下拉按钮，选择应的头像，最后单击【确定】按钮，即密码修改成功。③操作权限设置单击界面左侧“现有操作员信息”列表，选择相应的操作员，设置操作权限，最后单击【确定】按钮即设置成功。设置操作权限有三种方法：单击【会选】按钮，可将操作员权限全部设置。单击【全不选】按钮，操作员无任何操作权限。勾选权限设置的任意一项，可任意设置操作权限。目录TOC\o"1-2"\h\z\u第一章总论 1一、项目概况 1二、项目所在区域简介 1三、报告编制依据 2四、编制内容 3五、简要结论 3第二章项目建设背景及必要性 5一、项目建设背景 5二、项目建设必要性 5第三章服务对象与需求分析 8第四章建设内容及规模 9一、建设内容 9二、建设规模 9第五章项目选址及建设条件 10一、项目选址 10二、什邡市概况 10三、建设条件 11第六章项目建设规划和工程方案设计 15一、项目建设规划的指导思想、基本原则和重建目标 15二、项目建设规划实施的