生产管理系统

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

1、吉林省明日科技有限公司监制生产管理系统–27–吉林省明日科技有限公司监制–27–吉林省明日科技有限公司监制–27–吉林省明日科技有限公司监制1系统分析1.1需求分析通过调查，要求本系统需要有以下功能：q由于操作人员的计算机操作能力普遍较差，因此要求系统具有良好的人机交互界面。q由于本系统的使用对象较多，因此要有完备的权限管理功能。q完全人性化设计，无需专业人士指导，即可操作本系统。q系统具有数据备份及数据还原功能，能够保证系统数据的安全性。q方便的、全方位的数据查询功能。q自动完成数据计算，尽量减少人工干预。q强大的报表打印功能。1.2可行性分析生产管理系统后

2、台数据库采用SQLServer2000数据库，以保证数据的安全、高效和稳定。前台采用Microsoft公司的VisualBasic6.0作为主要的开发工具，该工具可与SQLServer2000数据库无缝链接。2总体设计2.1项目规划生产管理系统是一个典型的数据库开发应用程序，由基础信息管理模块、计划信息管理模块、生产设备管理模块、产品库存管理模块、辅助功能模块、系统维护模块、帮助信息模块7个功能模块组成，规划系统功能模块如下：q基础信息管理模块该模块主要包括产品基础信息、物料基本信息、设备状态设置、设备类型设置、设备摊销时间设置、车间部门设置6部分组成。q计划

3、信息管理模块该模块主要包括生产计划单管理、生产计划单查询、物料需求计划、物料需求查询4部分。q生产设备管理模块该模块主要由生产设备档案、生产设备查询、生产设备报废、生产设备报废查询、生产设备维修、生产设备维修查询6部分组成。q产品库存管理模块该模块主要由产品完工入库、产品入库查询、物料入库、物料入库查询、生产领料、生产领料查询、物料库存信息查询7部分组成。q辅助功能模块该模块主要包括调用Word、调用Excel、调用计算器、登录Internet、工作备忘5部分。q系统维护模块该模块主要由操作员设置、密码修改、操作权限设置、数据清理、数据备份与恢复、设置主窗口图

4、片6部分组成。q帮助信息模块–27–吉林省明日科技有限公司监制该模块主要有：本单位信息、关于、帮助。2.2系统功能架构图图1生产管理系统功能架构图3系统设计3.1设计目标本系统属于典型的数据库管理系统，是针对中小型企业生产管理开发设计的，实现进一步的计算机化的管理。通过本系统可以达到以下目标：q灵活的运用表格批量输入数据，使信息传递更快捷。q系统采用良好的人机对话模式，界面设计美观友好，信息查询灵活、方便、快捷、准确，数据存储安全可靠。q键盘操作，快速响应。q实现各种查询及打印功能。q操作员可以随时修改自己的口令。q管理员可以设置操作员的权限。q对用户输入的数

5、据，系统进行严格的数据检验，尽可能排除人为的错误。q数据保密性强，为每个用户设置权限级别。q系统运行稳定、安全可靠。–27–吉林省明日科技有限公司监制3.2开发及运行环境系统开发平台：VisualBasic6.0。数据库管理系统软件：SQLServer2000。运行平台：Windowsxp/Windows2000。分辨率：最佳效果800*600。3.3数据库设计本系统数据库采用SQLServer2000数据库，系统数据库名称为db_SCGL。数据库db_SCGL中包含19张数据表。下面分别给出数据表概要说明和数据表的结构。1．数据表概要说明如图2所示的即为本系

6、统中数据库中的数据表的树形结构图，该数据表树型结构图包含系统所有数据表。可以清晰地反应数据库信息。图2数据表树型结构图2．数据表的结构由于篇幅所限，关于数据库中的数据表请参见附录二。4主要功能模块设计4.1公共模块设计为了节省系统资源，实现代码重用，可以在系统中创建一个Modulel模块。就本系统而言，该模块主要用于共享数据库连接。在公共模块中定义了一些公共的变量、数据连接以及Toolbar–27–吉林省明日科技有限公司监制控件中的相关设置。由于本系统中的大部分窗体都采用Toolbar控件的风格模式，因此，在这里出模块中关于Toolbar控件中按钮设置的代码。

7、其他相关代码请参见源程序。'定义设置Toolbar控件上按钮状态的函数PublicFunctiontlbState(tlbAsToolbar,stateAsBoolean)WithtlbIfstate=TrueThen'如果状态变量为True.Buttons(1).Enabled=False:.Buttons(2).Enabled=False:.Buttons(3).Enabled=False.Buttons(6).Enabled=False:.Buttons(4).Enabled=True:.Buttons(5).Enabled=TrueElse'如果状态变

8、量为False.Buttons(1).