七匹狼实业股份有限公司生产过程智能监控系统-毕业论文

七匹狼实业股份有限公司生产过程智能监控系统本科毕业论文(科研训练、毕业设计)题 目：七匹狼实业股份有限公司生产过程智能监控系统姓 名：学 院：软件学院系：软件工程专 业：软件工程年 级： 学 号：指导教师（校内）： 职称： 年 月 日七匹狼实业股份有限公司生产过程智能监控系统摘要 七匹狼实业股份有限公司创立于1990年，主要从事男式休闲服装的生产与经营。经过15年的不懈努力，七匹狼成为一家以时尚制衣为核心的综合性企业，并在004年8月6日于深交所上市，成为中国服装制造业的前导。生产系统是ERP系统中难度最大的子系统，基于此，对国内知名品牌七匹狼实业股份有限公司的服装生产过程全程智能监控，定单自动排单及每个订单中对20多个工序作业进行自动分解，提醒班组长当日生产情况与所有统计工作自动进行。本文主要涉及系统的设计以及编程方面的具体优化。关键词 七匹狼 智能 监控 生产系统 优化MPR SYSTEM OF SEPTWOLVES GROUPAbstract SEPTWOLVES Group was established in 1990, the company is a high tech - enterprise which is primarily engaged in the making and marketing of SEPTWOLVES branded mens leisurewear. Through 14 years of strenuous efforts, the company has grown into a comprehensive enterprise with fashion as its core business. SEPTWOLVES was published in Shenzhen Stock Exchange at August 6th , 2004, the bellwether in China Garment line.MPR system is the most difficult sub system of ERP, basic on this, we separate about 20 working procedures from the each order and account the data automatic daily. This article is focused on the optimization of the system and the coding.Key Word Septwolves Intelligent control system optimization目录1.引言52.MRP简介53.系统流程处理设计73.1系统业务处理流程设计73.2 系统数据库设计93.3 系统功能模块设计194.优化过程描述214.1系统架构优化设计214.2 用户权限设置优化224.3 优化显示速度244.4 优化操作界面244.5其他优化255.结论266.致谢语26参考文献271. 引言由于生产过程以及企业发展的需要，七匹狼集团准备引入生产过程智能监控系统（MRP），对其生产过程进行全程监控。根据制衣行业以及七匹狼集团自身的特殊生产流程进行自动排单，并对每个订单中的20多道工序进行自动分解。本系统采用C/S架构，编程语言为VB.NET，后台数据库采用SQLServer2000。根据七匹狼方面提供的生产流程图以及生产相关表单进行数据库的设计、建立以及程序界面的设计，从而实现工序表单的自动化生成以及相关数据的统计和分析。本论文主要从优化的角度出发，从系统的详细设计阶段开始一直延续到具体的代码编写阶段，对本软件开发过程中的各个方面进行优化。2.MRP简介物料需求计划(简称为MRP)与主生产计划一样属于ERP计划管理体系，它主要解决企业生产中的物料需求与供给之间的关系，即无论是对独立需求的物料，还是相关需求的物料，物料需求计划都要解决“需求什么?现有什么?还缺什么?什么时候需要?”等几个问题。它是一个时段优先计划系统，其主要对象是决定制造与采购的净需求计划。它是由主生产计划推动运行的，但反过来，它又是主生产计划的具体化和实现主生产计划的保证计划。 由于物料需求计划是把主生产计划排产的产品分解为各个零部件的生产计划和采购件的采购计划，因此，制订物料需求计划前就必须具备以下的基本数据：第一项数据是主生产计划，它指明在某一计划时间段内应生产出的各种产品和备件，它是物料需求计划制订的一个最重要的数据来源。第二项数据是物料清单(BOM)，它指明了物料之间的结构关系，以及每种物料需求的数量，它是物料需求计划系统中最为基础的数据。第三项数据是库存记录，它把每个物料品目的现有库存量和计划接受量的实际状态反映出来。第四项数据是提前期，决定着每种物料何时开工、何时完工。应该说，这四项数据都是至关重要、缺一不可的。缺少其中任何一项或任何一项中的数据不完整，物料需求计划的制订都将是不准确的。因此，在制订物料需求计划之前，这四项数据都必须先完整地建立好，而且保证是绝对可靠的、可执行的数据。 一般来说，物料需求计划的制订是遵照先通过主生产计划导出有关物料的需求量与需求时间，然后，再根据物料的提前期确定投产或订货时间的计算思路。其基本计算步骤如下： 1.计算物料的毛需求量。即根据主生产计划、物料清单得到第一层级物料品目的毛需求量，再通过第一层级物料品目计算出下一层级物料品目的毛需求量，依次一直往下展开计算，直到最低层级原材料毛坯或采购件为止。 2.净需求量计算。即根据毛需求量、可用库存量、已分配量等计算出每种物料的净需求量，即净需求量=毛需求量+已分配量-可用库存量-在途量。 3.批量计算。即由相关计划人员对物料生产做出批量策略决定，不管采用何种批量规则或不采用批量规则，净需求量计算后都应该表明有否批量要求。 4.安全库存量、废品率和损耗率等的计算。即由相关计划人员来规划是否要对每个物料的净需求量作这三项计算。 5.下达计划订单。即指通过以上计算后，根据提前期生成计划订单。物料需求计划所生成的计划订单，要通过能力资源平衡确认后，才能开始正式下达计划订单。 6.再一次计算。物料需求计划的再次生成大致有两种方式，第一种方式会对库存信息重新计算，同时覆盖原来计算的数据，生成的是全新的物料需求计划；第二种方式则只是在制定、生成物料需求计划的条件发生变化时，才相应地更新物料需求计划有关部分的记录。这两种生成方式都有实际应用的案例，至于选择哪一种要看企业实际的条件和状况。 总之，物料需求计划模块是企业生产管理的核心部分，该模块制订的准确与否将直接关系到企业生产计划是否切实可行。MRP是一种保证既不出 现短缺，又不积压库存的计划方法，解决了制造业所 关心的缺件与超储的矛盾。所有ERP软件都把MRP作为其 生产计划与控制模块，MRP是ERP系统不可缺少的核心功能。只要是“制造业”，就必然要从供应方买来原材料，经过加工或装配，制造出 产品，销售给需求方，这也是制造业区别于金融业、商业、 采掘业（石油、矿产）、服务业的主要特点。任何制造业的经营生产活动都是围绕其产品开展的，制造业 的信息系统也不例外，MRP就是从产品的结构或物料清单（对食品、医药、化工行 业则为“配方”）出发，实现了物料信息的集成一个上小下宽的锥状产品结构：其顶层是出厂产品，是属于企业市场销售部门的业务；底层是采购的原材料或 配套件，是企业物资供应部门的业务；介乎其间的是制造件，是生产部门的业务。 如果要根据需求的优先顺序，在统一的计划指导下， 把企业的“销产供”信息集成起来，就离不开产品结构（或物料清单）这个基础文件。在产品结构上，反映了各个物料之间的从属关系和数量关系，它们之间的连线反映了工艺流程和时间周期；换句话说，通过 一个产品结构就能够说明制造业生产管理常用的“期量标准”。MRP主要用于生产“组装”型产品的制造业， 如果把工艺流程（工序、设备或装置）同产品结构集 成在一起，就可以把流程工业的特点融合进来。3.系统流程处理设计3.1系统业务处理流程设计根据实际调研结果，本系统的业务处理流程如下所示：1） 客户下订单2） 做出样衣的款式待客户确定（套料单）3） 确定后估计生产用料消耗（面辅料用单，耗量生产通知单），并根据工资（可能由下面的工序单工序综合记录表来确定）和物料来确定成本4） 从客户订单中罗列处订单明细和交货汇总，再由交货汇总得到总汇总5） 若客户有取消某款式订单的意思，可以在这里通过取消款单取消6） 由生产指令单和套料单得到汇总表，其中包括面料汇总 里料及衬纸需求表等7张需求表7） 接着根据需求和库存情况物料申购部门来确定物料申购的多少（物料申购单）8） 根据申购单来确定采购进度确定缝制部的生产工序安排9） 记录缝制小组月生产进度期间包括可能有补换片通知单，缝制小组交货一览，生产报表产品检验记录10）每个小组产量合格汇总（有些由生产进度汇总表来）11）装箱如图1所示。车间小组机台设备排列平面图装箱单产品成本预算月份产量、合格率汇总表工厂生产进度汇总表缝制部月生产进度表缝制部工序安排名单采购进度表物料申购单面料汇总表里料（含罗纹）及衬纸需求表拉链类需求表钮扣类需求表洗水唛需求表棉绳、魔术贴需求表包装类需求表通用物料需求表汇总表透视表面辅料用量单耗量生产通知单生产指令单（订单）套料单订单明细交货汇总表总汇总表取消款面料采购进度表里料（含罗纹）采购进度表衬料/棉采购进度表图1 系统业务处理流程3.2 系统数据库设计根据生产过程的分析以及数据库设计的基本原则，本系统设计了如下的基础数据表，相关的汇总表和透视表则在这些数据表的基础上用视图建立，同样的部分功能模块涉及到不同的数据表时，也将通过对视图的操作而修改相关数据表的数据。表1客户资料表：CustomerInformation字段编码字段说明字段属性CustomerID自动编号Bigint，8,(PK),NNCustomerName客户公司名称C,10,NNCustomerTel客户公司电话C,40,NNCustomerAdd客户公司地址Nvarchar,100CustomerLinkman联系人C，20,NNCustomerFAX客户公司传真C,40,CustomerEmail客户公司电子信箱C,50,CustomerZipCode客户公司邮政编码C，30Remark备注Nvarchar,200表2库存资料表：StorageInformation字段编码字段说明字段属性CustomerInformationID自动编号Bigint，8,(PK),NNMaterialName物料名称Nvarchar,100MaterialNum物料编号Bigint，8,NNStyleNum规格型号C,20ColorID颜色Bigint，8，NNSupplyAgent供应商C,10Remark备注Nvarchar,200表3颜色编码表ColorCode字段编码字段说明字段属性ColorcodeID自动编号Bigint，8,(PK),NNColorName颜色名称C，10,(PK),NNColorcode颜色代码Bigint，8，NN表4生产厂资料表：ManufactoryInformation字段编码字段说明字段属性FactoryID自动编号Bigint，8,(PK),NNManufactoryName生产厂名称C,10,NNManufactoryTel生产厂电话C,40,NNManufactoryAdd生产厂地址Nvarchar,100ManufactoryLinkman联系人C，20,NNManufactoryFAX生产厂传真C,40,ManufactoryEmail生产厂电子信箱C,50,ManufactoryZipCode生产厂邮政编码C，30Remark备注Nvarchar,200表5用户资料表:UserInformation字段编码字段说明字段属性UserID用户编号Bigint，8,(PK),NNUserName用户名C,10,NNUserRight用户权限C,40,NNUserpassword用户密码C,8,NNEmployeeID用户的员工号Char，10Remark备注Nvarchar,200表6生产指令单主表：ProductMadeMain字段编码字段说明字段属性P_MadeMainID自动编号Bigint，8,(PK),NNCustomerID客户编号Bigint，8,(PK),NNBillCode订单编号Bigint，8,(PK),NNBillDate下单日期Datetime,NNRemark备注Nvarchar,200表7生产指令单第一子表：ProductMadeSub1字段编码字段说明字段属性P_MadeSub1ID自动编号Bigint，8,（PK）,NNBillCode订单编号Bigint，8,(PK),NNStyleID款号C,10ColorID颜色代号C,10,NNQuantity产品数量Float,NNOrderTime订单交期Datetime,NN表8生产指令单第二子表：ProductMadeSub2字段编码字段说明字段属性P_MadeSub2ID自动编号Bigint，8,(PK),NNP_MadeSub1ID自动编号Bigint，8, NNSpecID规格型号C，20 ,NNSpecUnit规格数量Bigint，8,NN表9套料单主表：MaterialMain字段编码字段说明字段属性MaterialMainID自动编号Bigint，8,NN(pk)ManufactoryFactory生产厂编号C,10,NNStyleNum款号C,10BillCode订单编号Bigint，8, NNStyleName款式名称C,10Checker审核人姓名C,10Authorizer批准人姓名C,10表10套料单副表:MaterialSub字段编码字段说明字段属性MaterialSubID自动编号Bigint，8,NN(PK)StyleNum款号C,10MaterialMainID自动编号Bigint，8,NNMaterialNum物料编号Bigint，8,NNColor颜色名称及编号Nvarchar,20First第一次FloatDate1第一次的日期DatetimeSecond第二次FloatDate2第二次的日期DatetimeThird第三次FloatDate3第三次的日期DatetimeFourth第四次FloatData4第四次的日期DatetimeRemark备注Nvarchar,100表11出货记录表：Shipment字段编码字段说明字段属性MaterialSubID自动编号Bigint，8,NN(PK)ShipmentDate出货日期DatetimeRemark备注Nvarchar,100表12表物料表:Material字段编码字段说明字段属性MaterialID自动编号Bigint，8,NN(PK)MaterialNum物料编号Bigint，8,NNMaterialSubID上表自动编号Bigint，8,NN(PK)MaterialName物料名称Nvarchar,100MaterialType物料类型C,10(面料,里料)MaterialStyle规格型号C,10(通用可以设置为c)CostNum单耗FloatStyleUnit单位C,10表13透视表-取消款(其四):Cancel字段编码字段说明字段属性CancelIDIDBigint，8,NN(PK)ProjectName项目Nvarchar,100P_MadeSub1ID自动编号Bigint，8,（PK）,NNFactoryTime厂家回复DatetimeFactTime实际交期DatetimeRemark备注Nvarchar,200表14生产制造单之四-面辅料用量单:SurAuxDosage字段编码字段说明字段属性SurAuxDosageIDIDBigint，8,NN(PK)StyleName款式名称Nvarchar,100GoodsNum货号Bigint，8,NN表15耗量生产通知单: ProduceCostList字段编码字段说明字段属性ProduceCostListMainIDIDBigint，8,NN(PK)MaterialSubID子表IDBigint，8,NN(PK)CostNum单耗（实际单耗）FloatBreadth幅宽FloatCostPercent自然损耗百分比Bigint，8CostCount耗用量FloatRemark备注Nvarchar,100State状态Nvarchar,100表16公司产品下单面料汇总表：CostCollect字段编码字段说明字段属性CostCollectID自动编号Bigint，8,NN(PK)SampleCard实样卡C,10TechnicsDetail工艺单BoolenPaperBoard纸板BoolenWaterSign洗水麦BoolenRemark备注Nvarchar,200表17物料申购单MaterielPurchase字段编码字段说明字段属性MaterielPurchaseID自动编号Bigint，8, pkMaterialID自动编号Bigint，8,NN(PK)Unit单位C,10PurchaseDate采购交期DatetimeArriveDate到货日期DatetimeRemark备注Nvarchar,200表18面料采购进度表：CostPurchasePlanTable字段编码字段说明字段属性CostPurchasePlanTableID自动编号Bigint，8,(PK),NNDeliveryDateInFact实际交期DatetimeDeliverySum交货数量FloatPricePerUnit单价MoneySum总金额Money表19里料采购进度表：CostPurchasePlanTable字段编码字段说明字段属性INPurchasePlanTableID自动编号Bigint，8,(PK),NNDeliveryDateInFact实际交期DatetimeDeliverySum交货数量Bigint，8PricePerUnit单价MoneySum总金额Money表20衬料采购进度表：LiePurchasePlanTable字段编码字段说明字段属性LiePurchasePlanTableID自动编号Bigint,8,(PK),NNDeliveryDateInFact实际交期DatetimeDeliverySum交货数量Bigint，8PricePerUnit单价MoneySum总金额Money表21缝制部生产工序安排单主表:WorkProcedurePlanListMain字段编码字段说明字段属性WorkProcedurePlanListMainID自动编号Bigint,8,(PK),NNStyleID款号C,10表22缝制部生产工序安排单子表1:WorkProcedurePlanListSub1字段编码字段说明字段属性WorkProcedurePlanListSub1ID自动编号Bigint,8,(PK),NNWorkProcedurePlanListMainID编号Bigint,8, NNWorkProcedureName工序名称Nvarchar,100WorkerName1人员名单Nvarchar,100WorkerName2人员名单Nvarchar,100表23缝制部生产工序安排单子表2:WorkProcedurePlanListSub2字段编码字段说明字段属性WorkProcedurePlanListSub2ID自动编号Bigint，,(PK),NNWorkProcedurePlanListSub1ID编号Bigint，8, NNWorkProcedureName工序名称Nvarchar,100WorkerName人员名单Nvarchar,100表24缝纫部月生产进度表：SewPlanPerMonth字段编码字段说明字段属性StyleID款号Bigint，8,(PK),NNNumber件数Bigint，8, NNGroupID组别Bigint，8, NND11号DatetimeD22号Datetime.DatetimeD3030号DatetimeD3131号Datetime表25工厂生产进度汇总表：ProducePlanCollect字段编码字段说明字段属性ProducePlanCollectID自动编号Bigint，8,(PK),NNSerialNumber序号Bigint，8, NNStyleID款号Bigint，8, NNColor颜色Nvarchar,100Project项目Nvarchar,100StyleSize款式规格（包含合计项目）Nvarchar,100SSize款式数量FloatRemark备注Nvarchar,1003.3 系统功能模块设计根据具体的生产过程以及用户需求，本系统将系统用户设置成系统管理员以及表单操作员两种不同的权限。表单操作员没有用户设置、修改、删除的相关权限。而系统管理员则没有表单操作的权限。具体的权限设置方法将在优化过程中具体描述。针对不同的功能模块，设计了不同的功能界面，所有界面都继承了usercontrol类，类似的功能界面可以从同一个usercontrol类中继承。主要有以下几个功能模块：1.用户登陆模块：实现用户身份的检测、权限的获取。主界面模块：类似资源管理器界面，是所有功能模块显示的平台。系统模块：包含切换用户和退出的功能。用户管理模块：实现用户身份的添加、修改、删除、查询。客户管理模块：实现客户身份的添加、删除、查询。物料控制模块：实现对主要数据的录入，并通过其判断数据填写的正确性，如果错误，弹出窗口提示并重新填写，如正确则通过一些访问数据库的方法对基础表进行有效的填写。透视表模块：对订单和套料单进行汇总，并整理出直观数据。需求表模块：对订单和套料单及其他基础表单据进行汇总，并整理出直观数据。具体的功能模块设计如图2所示：删除用户查询用户添加用户修改密码生产指令单套料单面辅料用单生产耗量通知单物料申购单里料需求表拉链需求表纽扣需求表洗水唛需求表魔术贴需求表面料汇总表包装需求表通用物料需求表用户登陆主界面用户管理客户管理编辑客户添加客户需求表物料控制单透视表订单明细交货汇总总汇总图2 功能模块设计4.优化过程描述4.1系统架构优化设计本系统是基于后台数据库而建立的，在实际的操作过程中，几乎所有功能模块都需要对数据库进行频繁的读写、修改、删除等操作。因此在系统设计的时候，设计了公用的模块（MODULE1），将涉及到操作数据库的函数设计成public的函数，以便相关功能模块进行调用，从而减少了代码量，并且便于维护，修改。下面以读取数据库数据函数GetDataFromDB为例：Imports System.DataImports System.DBNullImports System.Data.SqlClientModule Module1 Public UserName As String Public pepdom As Integer Public objDataSet As DataSet 定义一个数据集对象 Public objDataView As DataView 定义一个数据视图对象 Public objDataAdpter As SqlDataAdapter 定义一个数据适配器对象 Public objSqlConnection As SqlConnection = New _ SqlConnection(datasource=jackael;initial catalog=StepWolvesDatabase;user id=sa;password=sa) 定义一个数据连接对象，并初始化 Public objCurrencyMannager As CurrencyManager 定义一个当前的绑定管理对象 Public UserSqlstr As String = SELECT * FROM UserInformationPublic Function GetDataFromDB(ByVal sqlstr As String) As DataSet objDataSet = New DataSet objDataSet.Clear() 实例化一个数据集对象 Try objSqlConnection.Open() 打开数据库连接 objDataAdpter = New SqlDataAdapter(sqlstr, objSqlConnection) 将数据库的数据映射到数据适配器 objDataAdpter.Fill(objDataSet) 填充数据集的数据 objSqlConnection.Close() 关闭数据连接， Catch MsgBox(错误号： & Err.Number & 错误描述： & Err.Description) End Try Return objDataSet objDataSet = Nothing End Function功能模块在读取数据库数据时，将SQL语句作为参数传递至GetDataFromDB函数，GetDataFromDB将根据SQL语句对相关的数据表进行读取操作，将得到的结果以DataSet返回。在得到出错信息的时候也可以根据错误号准确的得知出错的原因。通过设置SqlConnection变量中的datasource值可以改变系统所绑定的局域网服务器名称。设置Module1模块的还可以在用户登陆后及时的得到用户的权限，并针对不同的用户权限进行模块操作的限制。4.2 用户权限设置优化针对用户权限的设置部分，根据不同的权限开放不同的功能模块。在本系统中，将不同的用户权限与功能模块设置成一张hash表，通过不同的pepdom值划分hash表中的不同模块，从而实现权限的划分。具体的代码如下：Private Sub MyInit() ctrlList = New Hashtable If pepdom = 0 Then ctrlList.Add(生产指令单/订单, ProMade1) ctrlList.Add(套料单, Material1). Else ctrlList.Add(添加用户, Adduser1)ctrlList.Add(修改用户, Edituser1)ctrlList.Add(删除用户, Deluser1)End If End Sub如果以上MyInit函数所示，当pepdom为不同值的时候，ctrlList所对应的功能模块各不相同。当用户单击treeview控件的不同节点的时候，通过下列代码即可实现对权限的判断。Dim usrCtrl As System.Windows.Forms.UserControl usrCtrl = ctrlList.Item(e.Node.Text) If usrCtrl Is Nothing Then MsgBox(对不起，你没有这个权限管理该模块。, MsgBoxStyle.OKOnly + _ MsgBoxStyle.Exclamation, 无权限访问) Else usrCtrl.Show() currentUserCtrl = usrCtrl End If设置ctrlList这么一个hash表的好处在于，可以通过对不同pepdom值下ctrlList所包含的对象的设置，自由的改变权限的内容，而无需逐个treeview节点的修改代码，使得代码的修改更加容易，便于功能模块的扩展。4.3 优化显示速度在本系统中，为了减少用户在切换不同功能模块之间的等待时间，在系统启动的时候，将所有功能模块的窗体以及控件预先载入，并将它们隐藏起来。尽管载入这些窗体以及控件需要相同的时间，但减少了用户需要看到它们时的等待时间。当然，这一优化可能会带来内存的消耗。通过对系统在一次性载入所有窗体与只载入初始界窗体的比较可知，在内存消耗上的差别为1M，对于目前电脑的主流配置一般为256M以上内存来说，影响是微乎其微的。因此，本系统采用了一次性载入所有窗体的作法，将所有窗体在运行时早绑定。由于Visual Basic编译器在编译时就作一定的优化，例如类型检查和成员查看表。当在运行时访问早绑定对象的成员时，编译器就已经完成了大量的管理工作了，从而提高用户在切换功能模块界面时的等待时间。4.4 优化操作界面针对操作界面，由于采取了一次性读入所有窗体的做法，因此在界面的设计上采用了类似资源管理器的做法，通过操作界面左边的树形选择所要操作的功能模块，并将该功能模块的操作界面显示在操作界面的右边。这样的既可以避免弹出过多的窗口影响美观，也避免了更多的出错可能，兼顾了美观与效率。如图3所示。采用了这一方法后，必然涉及在每次切换功能模块时大量窗体的隐藏。本系统使用了FormHide函数，将所有的窗体的隐藏用该函数统一调用，当功能模块进行扩展的时候，免去了逐个模块修改代码的问题。将不必要的窗体隐藏还可以描绘的必要。如下代码所示： Private Sub FormHide() ProMade1.Hide() Material1.Hide() SurAuxDosage1.Hide() ProduceCostList2.Hide() MaterielPurchase1.Hide() OrderDetail1.Hide(). End Sub图3 操作系统界面4.5其他优化在系统的编程过程中，避免使用传统Visual Basic的On Error和On Error Resume Next语句处理错误，而采用了Visual Basic .NET提供的Try.Catch.