四川奕新实业库存管理信息系统

1、西华大学毕业设计 目 录四川奕新实业库存管理信息系统3摘 要3Abstract41 前言51.1 选题背景51.2 国内外研究现状51.3 研究的意义62 系统开发介绍72.1 系统开发方法介绍72.2 系统开发工具介绍72.3 系统运行环境介绍83 系统规划93.1 项目名称93.2 项目背景93.2.1 公司简介93.2.2 项目背景93.3 项目目标103.4 可行性分析103.4.1 技术可行性103.4.2 经济可行性103.4.3 管理可行性104 系统分析114.1 系统初步分析114.2 系统需求分析114.3 业务流程分析125 系统设计135.1 系统总体结构设计135.1

2、.1 系统功能分析135.1.2 系统功能模块图135.2 详细设计145.2.1 代码设计145.2.2 数据库设计155.2.3 输入设计195.2.4 输出设计196 系统实施216.1 用户登陆216.2 主界面236.3 入库管理256.3.1 入库单信息填写256.3.2 入库316.4 出库管理346.4.1 出库单信息填写346.4.2 出库356.5 信息查询366.5.1 仓库信息查询376.5.2 库存查询396.5.3 库存报警汇总表406.5.4 原料计划采购表426.5.5 原料计划采购统计报表436.6 系统维护446.6.1 数据备份456.6.2添加用户496

3、.6.3密码修改526.7 系统集成546.7.1系统菜单546.7.2系统启动主程序557 结 论57总结与体会58谢 辞59【参考文献】60附 录61四川奕新实业库存管理信息系统摘 要随着技术的发展，电脑操作及管理日趋简化，电脑知识日趋普及，同时市场经济的快速多变，竞争激烈，采用计算机管理系统是现代化企业管理的必然趋势。先进的管理技术，很大程度上体现在管理系统的成熟完善上。本文以四川奕新实业成都新建生产基地为背景，建立了一套针对仓库的计算机管理系统，将公司仓库管理的复杂手工业务转化到计算机上操作，大大提高了工作的效率。借鉴了其他较为成功的仓库管理信息系统，通过对实际业务的分析，确定了本次库

4、存管理信息系统的开发方法、开发工具和运行流程：采用结构化生命周期法进行系统的开发，以Visual FoxPro为系统开发工具，用语言编程制作前台和Access数据库做后台相结合的方式，建立了一套计算机库存管理信息系统的模型，包括了入库管理、出库管理、信息查询、系统维护等部分。库存管理信息系统在运行阶段，效果好，数据准确性高，提高了工作效率，同时也实现了仓库管理计算机化。关键词：计算机，Visual FoxPro，库存管理信息系统Sichuan Yi-Xin group inventory management information systemAbstractWith the develop

5、ment of technology, computer operations and management of increasingly simplified, the increasingly popularization of computer knowledge, at the same time the rapid changing of market economy, competition is intense, using computer management system is the inevitable trend of modern enterprise manag

6、ement. Advanced management technology, much of the upper is now mature and perfect management system. In chengdu, sichuan yi new group newly built production base as the background, developed a computer management system for warehouse, warehouse management of the complex manual operations into compu

7、ter operation, greatly improving the work efficiency.Borrowed from other more successful warehouse management information system, through the analysis of the actual business, determines the inventory management information system development methods, development tools, and run the process: the struc

8、tured life cycle method is adopted in system development, system development tools for Visual FoxPro programming with language to make the front desk and a combination of Access database to do the background, and established a computer model of inventory management information system, including ware

9、house management, outbound management, information query, system maintenance, etc. Inventory management information system in operation stage, the effect is good, high data accuracy, improve the work efficiency, but also realize the computerized warehouse management.Key words：computer, Visual FoxPro

10、, Inventory management information system 1 前言1.1 选题背景中国正在大步跨入信息化社会，人们的生活工作与通信、信息的关系日益紧密，信息化社会在改变着我们的生活方式与工作习惯，同时，也对传统的物流提出了新的挑战。在我国，很多的企业的仓库作业还没有达到信息化。没有一个符合本企业仓库的仓库管理信息系统，造成很多业务处理很繁琐，工作效率低下。当今社会是一个高速发展的社会，企业对仓储管理要求不断提高，希望高效率、低成本的完成仓储作业。信息化仓库管理正在企业中蓬勃发展，也将是未来物流业的发展主流，人机结合的方式也将是工作方式的主流。2010年底，四川弈新实业

11、成都生产基地建成投产，随着公司和乐们的畅销以及基地产能升级，基地仓库管理采用公司以前的半计算机、半人工的管理方式工作效率低、容易出错、查找不便，已经不能适应现在的生产规模和高效率的生产步伐，因此开发一套符合基地实际情况的库存管理信息系统是很有必要的。1.2 国内外研究现状国内外现状分开写，具体到库存管理信息系统20世纪，随着全球经济的蓬勃发展，众多经济学家纷纷提出了新的管理理论。20世纪50年代，西蒙提出管理依赖于信息和决策的思想。同时期的维纳发表了控制论，他认为管理是一个控制过程。1958年，盖尔写到：“管理将以较低的成本得到及时准确的信息，做到较好的控制。”这个时期，计算机开始用于会计工作

12、，出现数据处理一词。1970年，Walter T.Kennevan给刚刚出现的管理信息系统一词下了一个定义：“以口头或书面的形式，在合适的时间向经理、职员以及外界人员提供过去的、现在的、预测未来的有关企业内部及其环境的信息，以帮助他们进行决策。”在这个定义里强调了用信息支持决策，但并没有强调应用模型，没有提到计算机的应用。1985年，管理信息系统的创始人，明尼苏达大学的管理学教授Gordon B.Davis给了管理信息系统一个较完整的定义，即“管理信息系统是一个利用计算机软硬件资源，手工作业，分析、计划、控制和决策模型以及数据库的人-机系统。它能提供信息支持企业或组织的运行、管理和决策功能。”

13、这个定义全面地说明了管理信息系统的目标、功能和组成，而且反映了管理信息系统在当时达到的水平。目前，西方发达国家绝大部分企业的仓库都已经实现了无纸化的信息系统管理，有效的降低了仓库管理成本，提高了仓库作业效率。虽然我国物流管理信息系统起步较晚，但近几年发展却较快，特别是微型计算机的出现和普及为信息处理提供了物美价廉的手段，对于推动我国管理信息处理的现代化起了重要的作用。 1.3 研究的意义企业的库存物资管理往往是很复杂、很繁琐的。由于所掌握的物资种类众多，订货、管理、发放的渠道各有差异以及各类统计报表繁多，若仍然采用传统人工管理的方式，必然不能满足企业的需求，影响企业正常生产，跟市场脱

14、节，影响企业的长期发展。因此构造一个库存管理信息系统来进行管理，利用计算机来进行库存管理，可以大大提高仓库管理的效率，降低管理成本，提高管理水平和仓库作业效率，从而提高企业的综合竞争力和企业利润。结合到四川奕新公司来写2 系统开发介绍2.1 系统开发方法介绍管理信息系统开发方法主要有：结构化生命周期法、原型法、面向对象的开发方法和计算机辅助开发方法等。本系统采用结构化生命周期法进行开发。用结构化生命周期开发方法开发一个系统，将整个开发过程划分为4个依次连接的阶段：l 系统规划阶段：主要任务是明确系统开发的请求，并进行初步的调查，通过可行性研究确定下一阶段的实施。系统规划方法有战略目标集转化法（

15、SST，Strategy Set Transformation）、关键成功因素法（CSF，Critical Success Factors）和企业规划法（BSP，Business System Planning）。l 系统分析阶段：主要任务是对组织结构与功能进行分析，理清企业业务流程和数据流程的处理，并且将企业业务流程与数据流程抽象化，通过对功能数据的分析，提出新系统的逻辑方案。l 系统设计阶段：主要任务是确定系统的总体设计方案、划分子系统功能、确定共享数据的组织，然后进行详细设计，如处理模块的设计、数据库系统的设计、输入输出界面的设计和编码的设计等。l 系统实施阶段：主要任务是讨论确定设计方

16、案、对系统模块进行调试、进行系统运行所需数据的准备、对相关人员进行培训等。这四个阶段共同构成了系统开发的生命周期。结构化生命周期开发方法严格区分了开发阶段，非常重视文档工作，对于开发过程中出现的问题可以得到及时的纠正，避免了出现混乱状态。但是，该方法不可避免地出现开发周期过长、系统预算超支的情况，而且在开发过程中用户的需求一旦发生变化，系统将很难作出调整。2.2 系统开发工具介绍本次系统采用Visual FoxPro6.0进行开发。Visual FoxPro 6.0简称VFP，Visual FoxPro 6.0是Microsoft公司推出的32位数据库开发软件，用它来开发数据库，既简单又方便。

17、Visual FoxPro具有以下特点4：1、 支持面向对象的程序设计2、 可视化的程序设计方法3、 良好的用户界面4、 强大的查询与管理功能5、 增加了数据类型和函数6、 采用了OLE技术：OLE（Object Linking Embedding）即对象的链接和嵌入。Visual FoxPro可使用该技术来共享其他Windows应用程序的数据，这些数据可以是文本、声音和图像。7、 开发和维护更加方便8、 客户机服务器功能2.3 系统运行环境介绍软件环境：Windows XP/Windows 2000/Windows Server 2003等Windows操作系统。硬件环境：CPU：2.11G

18、HZ内存：512以上硬盘空间：250G此配置以上的计算机都可以。613 系统规划3.1 项目名称四川奕新实业库存管理信息系统设计3.2 项目背景3.2.1 公司简介四川弈新实业集团是一家产业多元化、战略多元化集团化企业，广泛涉足于门类产品、电子产品、电动车产品、电动车配件产品、钢结构产品、化工产品、新能源、建筑工程、电子商务、物流运输等领域产业。集团在四川成都、湖北武汉、山东德州等地区建有六大生产基地、物流基地、销售基地以及人才培养基地，基地总占地面积1500余亩，员工近10000人，总资产近100亿。作为集团化、专业化的投资集团，弈新集团旗下拥有成都共功人力资源、四川金网通电子科技、成都新和

19、特科技、成都和乐门业、四川航舰钢建、四川禾邦涂料、武汉科林门业、山东齐河门业、山东德州弈新科海电子科技等十余家控股公司，分别占领着市场的多个行业领域。2010年底，总投资7.1亿人民币、占地面积400余亩的成都和乐门业生产基地在成都青白江区正式投产，它是一家集生态木门、模压室内门、防盗门、防火门、钢质门、非标门、智能门等多种门类产品专业研发、生产、物流、销售和服务于一体的现代化企业，该生产基地拥有专业生产线六条，日产高、中、低档门10000余樘。其中，专业非标线年产可达500万樘，是行业内规模最大的企业之一。所有参考引用内容都做好标注3.2.2 项目背景2010年3月，和乐门成功进入中国门业著

20、名品牌行列，畅销国内。面对日益提高的市场需求，和乐门业的传统库存管理运作已经不能满足市场的大量需求，所以和乐门业的管理层向母公司四川奕新集团提出想要开发新的库存管理信息系统来辅助库存管理和决策，提高库存利用率，降低库存量，降低库存成本，提高企业竞争力，满足不断扩大的市场需求，提高公司的市场占有率，促进公司的长远发展。3.3 项目目标通过开发新的库存管理信息系统，建立更加完整的库存管理体系，使库存运作更加便捷，从而给企业带来更高收益。具体目标如下：建立库存管理系统，降低库存量，降低库存成本，规范原材料的入库和产品的出库程序；使用库存管理信息系统可以方便统计原材料、货物进出数量以及查找各种货品的库

21、存量，便于管理。3.4 可行性分析3.4.1 技术可行性运用Visual FoxPro6.0语言完成系统，同时运用Microsoft Office实用软件完成文档工作。本公司为科技水平高的大型门业生产企业，具备国际先进水平的自动化生产流水线和领先于同行业的制造技术，为新的库存系统的开发提供了强大的硬件保证。本公司无论是技术水平还是设备的先进性都可以满足该项信息系统的开发。因此，在技术方面建立库存管理信息系统是可行的。3.4.2 经济可行性经济可行性分析结合到具体的数据，比如系统开发费用、设备采购费用等本公司产品畅销全国，销售连创新高，是行业内规模最大的企业之一。因此拥有雄厚的资金支持，能够支持

22、计算机外围设备费用、软件开发的费用、人员培训的费用、维护费用、管理费用。另外公司人员待遇优厚，聚集了大批高素质的研发、生产、销售和管理人才，可以为公司的库存管理信息系统的运行提供保证。3.4.3 管理可行性该项目最开始由公司管理层向母公司四川弈新实业集团申请提出，并得到了集团总部的肯定和大力支持；同时该项目的实现可以大大降低仓库人员的工作强度，因此该项目也得到了仓库一线员工的支持。该项目得到了上至集团总部，中至公司管理层，下至一线员工的大力支持，所以，在管理方面建立库存管理信息系统是可行的。4 系统分析4.1 系统初步分析在系统的初步调查的基础上，明确了公司存在的主要问题和建立管理信息系统的初

23、步设想，建设公司管理信息系统需要进一步对建设管理信息系统的目标、范围等因素进行分析研究。仓库是物流的集散地，存货过多会占用大量的企业资金，存货短缺则影响生产及准时交货，零库存管理如何合理管理库存是企业面临的重要问题之一。四川弈新实业仓库由于采用半人工、半计算机化的管理方式，库存信息不能及时更新和共享，经常造成原料库存过多，占用了公司大量的人力和物力，阻碍了企业的发展。通过建立库存管理信息系统，可以帮助公司对库存进行有效管理，确保库存处于经济合理的水平、降低库存成本、提高库存周转率。此外准确及时的库存信息可以使相关业务部门及时准确地了解库存情况，并作出科学决策，促进业务水平提高。本系统主要完成四

24、川弈新实业成都生产基地原料的入库管理、公司生产成品的出库管理以及库存相关信息的查询和管理。使用本系统使公司能够及时准确的掌握库存原料、产品的详细情况，并可以对原料进行库存量分析，达到科学的储备原料。4.2 系统需求分析库存管理是企业物流系统的重要环节，库存的主要作用和功能是在物料的供需之间建立有效的缓冲区，以减轻物料的供需矛盾。但保持库存又具有一定的损失，包括：库存物资的采购费用；库存系统的运行和存贮费用；订货费用或产品生产调整费用；库存损耗与资金占用。科学合理的库存管理，不仅可以促进销售，提高生产效率，而且可以降低产品成本，增加经济效益，反之则可能加剧供需矛盾，或造成大量的资金积压，影响企业

25、效益，造成重大的经济损失8。库存管理的特点信息处理量比较大，所管理的物品种类繁多，而且入库单、出库单、各类报表等单据的发生量特别大，关联信息多，查询和统计的方式各不行同。因此在管理上实现起来有一定的困难。在管理过程中经常出现信息的重复传递，单据、报表的种类繁多，各个部门管理规格不统一等问题。在本系统的设计过程中，为了克服这些困难，满足计算机管理的需要，根据四川弈新实业的实际情况，采取了下面的原则：(1) 统一各种原始单据的格式，统一账目和报表形式。(2) 删除不必要的管理冗余，实现管理规范化、科学化。(3) 程序代码标准化，软件统一化，确保软件的可维护性和应用性。(4) 界面尽量简单化，做到实

26、用、方便，尽量满足公司要求。通过分析根据四川弈新实业成都生产基地的实际情况，本次库存管理信息系统将包含4个功能模块，即：入库管理模块、出库管理模块、信息查询模块、系统维护模块。对于每一个功能模块，都包含了相应的数据信息处理或下一级从属模块。4.3 业务流程分析根据对公司的详细调查，对公司需求的详细分析，绘制公司库存管理业务流程图，如图1所示：仓库现有库存公司生产计划各部门需求产品生产原料采购产品出库原料入库汇总、处理图1 库存管理业务流程图5 系统设计5.1 系统总体结构设计5.1.1 系统功能分析系统开发的总体任务是实现公司原材料和产品管理的系统化、规范化和自动化，从而达到提高公司仓库库存管

27、理效率的目的。系统功能分析是在系统开发总体任务的基础上完成的。本库存管理信息系统需要完成的功能有：（1）入库管理，包括原材料入库信息填写和入库作业。 （2）出库管理，包括产品出库信息填写和出库作业。 （3）信息查询，包括仓库信息查询、库存查询、库存报警汇总表、原料计划采购表以及原料计划采购报表。（4）系统维护，包括数据备份、添加用户、密码修改。5.1.2 系统功能模块图根据系统功能分析，画出系统功能模块图如图2所示：入库管理出库管理信息查询四川奕新实业库存管理信息系统退出系统仓库信息查询库存查询数据备份添加用户入库单填写入库出库单填写出库系统维护库存报警汇总表原料计划采购表密码修改原料计划采购

28、统计报表图2 系统功能模块图5.2 详细设计5.2.1 代码设计1、仓库人员代码设计系统管理员设置为admin，仓库操作人员代码采用由位三位整数组成的顺序码，如：001，002。2、原料编号方案设计 原材料编号由三部分组成，第一部分为区分原材料种类，第二部分默认为0，第三部分为区分原材料质量级别。由于生产防盗门的材料只有钢板、不锈钢、铝合金、铜板、木材五种，所以从原材料属性上将钢板、不锈钢、铝合金、铜板、木材分别编号为1、2、3、4、5加以区别原材料种类。每种材料有一般、中等、好等分类，也分别用数字1、2、3、4等加以区别，数字越来则代表原材料质量越好。按照以上原则，原料编码设计如下：

29、5; × × 。例如：101，则表示一般的普通钢板。3、产品编号方案设计产品编号由俩部分组成，第一部分为区分产品种类，第二部分为区分产品。由于公司生产的门分为防盗门、防火门、钢木门、铜质门四种，所以从产品种类上将防盗门、防火门、钢木门、铜质门分别编号为1、2、3、4加以区别产品种类。每类产品有许多产品，也分别用三位数字001、002、003、004等加以区别，按照以上原则，原料编码设计如下：× × 。例如：6001，则表示1号防盗门。5.2.2 数据库设计数据库在一个管理信息系统中占有非常重要的地位，数据库结构设计的好坏将直接对应用系统的效率以及实现的效

30、果产生影响。合理的数据库结构设计可以提高数据存储的效率，保证数据的完整和一致。同时，合理的数据库结构也将有利于程序的实现。设计数据库时应该首先充分了解用户各个方面的需求，包括现有的以及将来可能增加的需求9。1、数据库概念结构设计（E-R图）本设计根据设计规划出的实体用户实体、入库实体、出库实体、原料库存实体、成品库存实体、原料计划采购实体。各个实体的E-R图及其关系描述如下：（1）用户实体E-R图：用户用户名级别联系电话密码图3 用户实体E-R图（2）入库实体E-R图：入库货品号价格供应商电话入库时间供应商入库数量采购员图4 入库实体E-R图（3）出库实体E-R图：出库货品号出库状况单位电话出

31、库时间单位出库数量经手人图5 出库实体E-R图（4）原料库存实体E-R图：原料库存货品号最大库存现有库存最小库存图6 原料库存实体E-R图（5）成品库存实体E-R图：成品库存货品号最大库存现有库存最小库存图7 成品实体E-R图（6）原料计划采购实体E-R图：原料计划采购货品号计划采购时间采购数量货品名称目标供应商图8 原料计划采购实体E-R图2、数据库逻辑结构设计根据系统功能需求和上面的实体分析，本数据库管理信息系统需要6个数据表，分别是用户表、入库表、出库表、原料库存表、成品库存表、原料计划采购表。库存管理信息系统数据库中的各个表格的设计结果如表1表6所示：表1 用户表字段名数据类型宽度索引

32、可否为空用户名字符型10不可为空密码字符型6不可为空级别字符型6不可为空联系电话字符型11可为空表2 入库表字段名数据类型宽度索引可否为空货品号字符型6升序不可为空入库时间日期型8升序不可为空供应商字符型10不可为空供应商电话字符型11可为空入库数量数值型9不可为空价格数值型9不可为空采购员字符型10不可为空表3 出库表字段名数据类型宽度索引可否为空货品号字符型6升序不可为空出库时间日期型8升序不可为空单位字符型20不可为空单位电话字符型11可为空出库数量数值型9不可为空出库状况数值型6不可为空经手人字符型10不可为空表4 原料库存表字段名数据类型宽度索引可否为空货品号字符型6升序不可为空现有

33、库存数值型8不可为空最大库存数值型9不可为空最小库存数值型9不可为空表5 成品库存表字段名数据类型宽度索引可否为空货品号字符型6升序不可为空现有库存数值型8不可为空最大库存数值型9不可为空最小库存数值型9不可为空表6 原料计划采购表字段名数据类型宽度索引可否为空货品号字符型6升序不可为空货品名称字符型16不可为空采购数量数值型9不可为空目标供应商字符型16不可为空计划采购时间日期型8升序5.2.3 输入设计对系统需要的输入进行设计，本系统主要是查询四川奕新实业成都生产基地和乐门业仓库管理输入的相关设计。具体设计如下：（1）入库信息输入设计（2）出库信息输入设计（3）仓库信息查询输入设计（4）库

34、存信息查询输入设计（5）原料计划采购信息输入设计（6）添加用户信息输入设计（7）密码修改信息输入设计5.2.4 输出设计对系统需要的输出结果进行设计，本系统主要是查询四川奕新集团成都生产基地和乐门业仓库管理的相关信息。具体设计如下：（1）仓库信息查询输出设计（2）库存信息查询输出设计（3）库存报警汇总信息输出设计（4）原料计划采购汇总统计报表输出设计6 系统实施系统实现包括用户需求实现和数据库实现两方面，具体包括包含4个功能模块的实现，即：入库管理模块、出库管理模块、信息查询模块、系统维护模块，力求通过程序编码实现系统的运行。6.1 用户登陆新建一个表单，命名为“登录界面”。把表单Captio

35、n属性设置为“登录界面”；在“登录表单”表单上放置相应的控件，2个标签Label，1个组合框Combo，1个文本框Text,3个命令按钮Command，在表单属性“Picture”中为登陆界面插入一张登陆界面的图片，并在数据环境中添加库存管理信息系统数据库中的“用户表”。登陆界面运行如图9所示，用户通过该界面登录进入系统。在其输入用户名与密码之后，单击“确定”按钮登录数据库。此时系统将输入之信息与数据库中“用户表”中的信息进行验证，若用户名和密码都正确，则进入系统主菜单；若用户名和密码中有一项或全都不正确，则系统弹出提示框进行提醒。图9 系统登陆界面（1）“登录”按钮的Click事件代码set

36、 talk offset safe offlocate for alltrim(用户名)=alltrim(bo1.value) and alltrim(密码)=alltrim(thisform.text1.value) if !eof() if alltrim(级别)="管理员" public jb,用户表name jb=1 用户表name=alltrim(bo1.value) else public jb,用户表name jb=0 用户表name=alltrim(bo1.value) endif do 四川奕新集团库存管理信息系统.mpr thisform.release

37、 do form 四川奕新集团库存管理信息系统else#define missmatch_loc "用户名或密码错，请重新登录！"wait window missmatch_loc timeout 1bo1.value=''thisform.text1.value=''thisform.text1.setfocusnumcount=numcount+1 if numcount=4 numcount=0 mess =messagebox("三次口令错，将退出程序！",4+16+2,"退出") clear

38、event release thisform endif endifset talk onset safe onthisform.refresh（2）“取消”按钮的Click事件代码bo1.value=""thisform.text1.value=""bo1.setfocus（3）“退出”按钮的Click事件代码thisform.release（4）表单“Form”的Activate事件代码set dele onbo1.rowsourcetype=3bo1.rowsource='sele 用户名 from 用户表 into cursor tmp&

39、#39;bo1.value=tmp.用户名public numcount numcount=06.2 主界面新建一个表单，命名为“四川奕新集团库存管理信息系统”。把表单Caption属性设置为“四川奕新集团库存管理信息系统”；在“四川奕新集团库存管理信息系统”表单上放置相应的控件，1个标签Label，1个计时器Tomer1，1个文本框Text,5个命令按钮Command，1个Image控件，在表单属性“Picture”中为主界面插入一张主界面图片。正确填写用户名和密码进入系统后，出现四川奕新集团成都生产基地和乐门业库存管理信息系统主界面，主界面有入库管理、出库管理、信息查询、系统维护和退出系统

40、，根据需求选择后，进入下一界面。系统主界面如图10所示：图10 系统主界面（1）“入库管理”按钮的Click事件代码do form 入库管理thisform.release（2）“出库管理”按钮的Click事件代码do form 出库管理thisform.release（3）“信息查询”按钮的Click事件代码do form 信息查询thisform.release（4）“系统维护”按钮的Click事件代码do form 系统维护thisform.release（5）“退出系统”按钮的Click事件代码a=messagebox("你确定要退出系统吗？",4+16+0,&qu

41、ot;对话窗口")if a=6 release thisformendif （6）“Tomer1”计时器的Tomer事件代码if thisform.label1.left<1 thisform.label1.left=thisform.width-8else thisform.label1.left=thisform.label1.left-6endif 6.3 入库管理6.3.1 入库单信息填写新建一个表单，命名为“入库管理”。在“入库管理”表单上放置相应的控件，1个表格Grid1，1容器Contianer1，在容器里放7个标签Label和7个文本框Text,1个命令按钮组C

42、ommandgroup1，并把命令按钮组的选址数目ButtonCount设置为“10”， 并在该表单的数据环境中添加库存管理信息系统数据库中的“入库表”。运行结果如图11所示：图11 入库信息管理 在这张表单中可以浏览、修改和删除以往所有的入库单信息，并且“添加”新的入库单信息，当添加新的入库信息后单击“入库”按钮，系统则执行“入库”表单。（1）“最首”按钮的Click事件代码go topthisform.grid1.setfocusthisform.grid1.refresh（2）“上一条”按钮的Click事件代码skip-1if bof()? chr(7) =messagebox(&quo

43、t;警告，这已经是第一条记录！",48,"信息窗口")go topendifthisform.grid1.setfocusthisform.grid1.refresh（3）“下一条”按钮的Click事件代码skipif eof()? chr(7) =messagebox("警告，这已经是最后一条记录！",48,"信息窗口")go bottomendifthisform.grid1.setfocusthisform.grid1.refresh（4）“最末”按钮的Click事件代码go bottomthisform.grid1.

44、setfocusthisform.grid1.refresh（5）“修改”按钮的Click事件代码if jb=0 thenmessagebox("你没有权限修改数据！",48,"警告！")elseif mand5.caption='修改'thisform.Text1.readonly=.f.thisform.Text2.readonly=.f.thisform.Text3.readonly=.f.thisform.Text4.readonly=.f.thisform.Text5.readonly=.f.thisform.Text6.rea

45、donly=.f. thisform.Text7.readonly=.f.mand5.caption='保存'mand1.enabled=.f.mand2.enabled=.f.mand3.enabled=.f.mand4.enabled=.f.mand6.enabled=.f.mand7.enabled=.f.mand8.enabled=.f.elsemand5.caption='修改'thisform.Text1.readonly=.t.thisform.Text2.readonly=.t.thisform.Text3.readonly=.t.thisfor

46、m.Text4.readonly=.t.thisform.Text5.readonly=.t.thisform.Text6.readonly=.t.thisform.Text7.readonly=.t.mand1.enabled=.t.mand2.enabled=.t.mand3.enabled=.t.mand4.enabled=.t.mand6.enabled=.t.mand7.enabled=.t.mand8.enabled=.t.endifthisform.grid1.setfocusthisform.grid1.refreshendif（6）“添加”按钮的Click事件代码if man

47、d6.caption='添加'thisform.Text1.readonly=.f.thisform.Text2.readonly=.f.thisform.Text3.readonly=.f.thisform.Text4.readonly=.f.thisform.Text5.readonly=.f.thisform.Text6.readonly=.f.thisform.Text7.readonly=.f.mand6.caption='保存'mand1.enabled=.f.mand2.enabled=.f.mand3.enabled=.f.mand4.enabl

48、ed=.f.mand5.enabled=.f.mand7.enabled=.f.mand8.enabled=.f.appe blan in 入库表elsemand6.caption='添加'thisform.Text1.readonly=.t.thisform.Text2.readonly=.t.thisform.Text3.readonly=.t.thisform.Text4.readonly=.t.thisform.Text5.readonly=.t.thisform.Text6.readonly=.t.thisform.Text7.readonly=.t.mand1.en

49、abled=.t.mand2.enabled=.t.mand3.enabled=.t.mand4.enabled=.t.mand5.enabled=.t.mand7.enabled=.t.mand8.enabled=.t.select 原料库存表locate for 设备号=thisform.txt设备号.valueif eof() thenappe blan repl 设备号 with thisform.txt设备号.valuerepl 现有库存 with thisform.txt入库数量.valueelserepl 现有库存 with 现有库存+thisform.txt入库数量.value

50、endifthisform.grid1.setfocusthisform.grid1.refresh（7）“删除”按钮的Click事件代码if jb=0 thenmessagebox("你没有权限删除数据！",48,"警告！")elsecMessageTitle='系统警告' cMessageText='确认要删除吗？' nDialogType=4+32 nanswer=messagebox(cMessageText,nDialogType,cMessageTitle)if nanswer=6delethisform.gr

51、id1.setfocusthisform.grid1.refreshendifendif（8）“入库”按钮的Click事件代码do form 入库thisform.release（9）“返回上级”按钮的Click事件代码do form 四川奕新集团库存管理信息系统thisform.release（10）“退出”按钮的Click事件代码thisform.release6.3.2 入库新建一个表单，命名为“入库”。在“入库”表单上放置相应的控件， 2容器Contianer，在第一个容器里放7个标签Label和7个文本框Text, 在第二个容器里放4个标签Label和4个文本框Text ，1个编辑框

52、Edit，5个命令按钮Command。 在该表单的数据环境中添加库存管理信息系统数据库中的“入库表”和“原料库存表”，并将入库表中的“货品号”和原料库存表中的“货品号”建立关联。当在入库管理界面中填写完新的入库单信息后，单击“入库”按钮则进入到入库界面，运行结果如图12所示：图12 入库界面在新填写的入库单信息进入入库界面时，单击入库界面的“入库”按钮，则原材料入库并且此次入库数量自动加到原料库存表中的现有库存中。运行结果如图13所示：图13 入库运行结果（1）“上一条”按钮的Click事件代码skip-1if bof()? chr(7) =messagebox("警告，这已经是第一

53、条记录！",48,"信息窗口")go topselect 入库表endifthisform.refresh （2）“下一条”按钮的Click事件代码skipif eof()? chr(7) =messagebox("警告，这已经是最后一条记录！",48,"信息窗口")go bottomselect 入库表endifthisform.refresh （3）“入库”按钮的Click事件代码set talk offset safe offthisform.Text9.value=thisform.Text9.value+thisform.Text5.valuethisform.Text5.value=" "set talk onset safe onthisform.refresh（4）“返回上级”按钮的Click事件代码do form 入库管理（5）“退出”按钮的Click事件代码thisform.release6.4 出库管理6.4.1 出库单信息填写新建一个表单，命名为“出库管理”。在“出库管理”表单上放置相应的控件，1个表格Grid1，1容器Contianer1，在容器里放7个标签Label和7个文本框Text,1个命令按钮组Commandgro