作业：仓库管理信息系统

1、仓库管理信息系统一、现行系统的调查与可行性分析1、初步调查企业的物资供应管理往往是很复杂的，烦琐的。由于所掌握的物资种类众多， 订货，管理，发放的渠道各有差异，各个企业之间的管理体制不尽相同，各类统 计计划报表繁多，因此物资管理必须实现计算机化，而且必须根据企业的具体情 况制定相应的方案。根据当前的企业管理体制，一般物资供应管理系统，总是根据所掌握的物资 类别，相应分成几个科室来进行物资的计划，订货，核销托收，验收入库，根据 企业各个部门的需要来发放物资设备， 并随时按期进行库存盘点，作台帐，根据 企业领导和自身管理的需要按月，季度，年来进行统计分析，产生相应报表。为 了加强关键物资，设备的管

2、理，要定期掌握其储备，消耗情况，根据计划定额和 实际消耗定额的比较，进行定额的管理，使得资金使用合理，物资设备的储备最 佳。所以一个完整的企业物资供应管理系统应该包括计划管理，合同托收管理， 仓库管理，定额管理，统计管理，财务管理等模块。其中仓库管理是整个物资供 应管理系统的核心。2、系统目标和开发的可行性1）系统目标本系统运用结构化系统开发方法进行系统开发本系统计划实现后，仓库管理的物资从企业生产所需要的各种设备开始，系统将全面管理与物资入库有关的信息，具体可完成以下功能：仓库管理各种信息的输入，包括入库、出库、还库、需求信息的输入等。仓库管理各种信息的查询、修改和维护。设备采购报表的生成。

3、在库存管理中加入最高储备和最低储备字段，对仓库中的物资设备实现监控和报警。企业各个部门的物资需求的管理。操作日志的管理。仓库管理的使用帮助。2）系统开发的可行性随着计算机的不断深入与普及， Win dows操作系统的普及率越来越高，在 软件的平台上，开发仓库管理信息系统是可行的，开发的工具用的是VisualFoxPro 6.0。起初在不同的环境下已经用 Visual FoxPro 6.0 开发过数据库应 用系统，因此，比较熟悉 Visual FoxPro 6.0，在技术准备上开发仓库管理信息系统是完全可行的，所以仓库管理信息系统的开发是可行的。二、系统分析1业务处理工作方式分析为了建立一个完整

4、的实用的系统，本系统实行专业基本信息、仓库管理基本 信息嵌套管理，库存信息从两者中调用，这样既方便了对专业信息的管理， 又可 以充分了解库存的具体情况。仓库管理的物资是指企业生产所需要的各种设备。进货时经检查合同确认认 为有效托收以后，进行验货入库，填写入库单，进行入库登记。企业各个部分根 据所需要的物资设备总额和部门生产活动需要提出物资需求申请。计划员根据整个企业的需求开出物资设备出库单， 仓库管理员根据出库单核对发放设备。 设备 使用完毕需要及时归还入库，填写入库单。根据需要按照月，季，年进行统计分 析，产生相应报表。2、组织结构分析在系统功能分析的基础上，考虑 vfp程序编制的特点，得到

5、如图所示的系统功能模块图：3、新系统业务流程在仔细调查企业仓库物资设备管理过程的基础上，得到本系统所处理的时间流程如图所示：仓库现荊库苻各部C需求I仆册盜悴生产计划+1采购k4f设番4r1T设备入阵设角还库在本设计中，通过对企业仓库管理的内容和数据流程分析， 设计的数据项和 数据结构如下：设备代码信息。包括的数据项有设备号、设备名称。现有库存信息。包括的数据项有现有设备、现有数目、总数目、最大库存、最 小库存等。设备使用信息。包括的数据项有使用的设备、使用部门、数目、使用时间、出库时状态。设备米购信息。包括的数据项有米购的设备、米购员、供应商、米购数目、采购时间等。设备归还信息。包括的数据项有

6、归还设备、归还部门、归还数目、归还时 间、经手人等。设备需求信息。包括的数据项有需求的部门、需求设备、需求数目、需求 时间等。有了上面的数据结构、数据项和数据流程，就能进行下面的数据库设计。4、数据库逻辑结构设计在上面的实体以及实体之间的关系的基础上， 形成数据库中的表格以及各个 表格之间的关系。仓库管理系统数据库中的各个表格的设计结果如下面的几个表格所示。每个 表格表示在数据库中的一个表（1）设备代码表：列名数据类型可否为空设备号（主键）数值型（20）不能为空设备名称字符型（50）可为空（2）设备入库表:列名数据类型可否为空设备号数值型（20）不能为空入库时间（主键）日期型（8）可为空供应商

7、字符型（50）可为空供应商电话字符型（15）可为空入库数量数值型（20）可为空价格字符型（10）可为空采购员字符型（20）可为空（3）设备出库表:列名数据类型可否为空设备号数值型（20）不能为空出库时间（主键）日期型（8）可为空使用部门字符型（50）可为空出库状况数值型（20）可为空经手人字符型（20）可为空出库数量数值型（10）不能为空领取人字符型（50）可为空用途字符型（50）可为空（4）现有库存表:列名数据类型可否为空设备号（主键）数值型（20）不能为空现有库存数值型（20）可为空最大库存数值型（20）可为空最小库存数值型（20）可为空总数数值型（20）可为空（5）部门需求表:列名数据类

8、型可否为空设备号（主键）数值型（20）不能为空部门名称字符型（20）不能为空需要数量数值型（20）可为空需求开始时间日期型（8）可为空需求结束时间日期型（8）可为空（6）设备还库表:列名数据类型可否为空设备号（主键）数值型 （ 20）不能为空还库时间日期型（8）不能为空仓库管理员数值型（20）可为空归还数量数值型（20）可为空归还人字符型（10）可为空（7）操作日志表:列名数据类型可否为空操作员字符型（50）不能为空操作内容字符型（50）不能为空操作时间日期型（8）可为空（8）设备米购计划表:列名数据类型可否为空设备号数值型（20）不能为空现有库存数值型（20）可为空总库存数值型（20）可为空

9、最大库存数值型（20）可为空购头数量数值型（20）可为空供应商字符型（20）不能为空价格字符型（10）可为空计划采购时间（主键）日期型（8）可为空三、总体设计切按面板F面对各模块的作用进行说明:设备入库模块：添加设备到库存中（2）设备出库模块：将设备从库存取出并记录。（3）设备还库模块：将归并到库存的设备保存到数据库（4）设备需求模块：记录各部门的设备需求。(5) 设备米购模块：记录要米购的设备。(6) 切换面板：用于切换到不同的操作，如设备入库、设备出库等。(7) 显示报表：显示库存过多、库存不足等信息。下面就按照功能模块图来设计该仓库管理系统。首先在 Visual FoxPro6.0 中建

10、立一个项目管理器，以便管理本系统中所有的数据，命名为 仓库管理”- 下操作均在该项目管理器中进行。 以下所有表单的desktop ”属性全部设为 T-2、系统运行环境配置 系统硬件平台：系统需要一台PC机，标准为：采用迅驰及以上级别 CPU至少120GB 硬盘，主频1.66GHz，支持SVGA或分辨率更高的显示器。操作系统：Win dows 2000/XP/Vista 等。3、计算机处理流程图计算机处理流程图如图6图6计算机处理流程图四、系统功能结构设计4.1功能选择界面的设计这一模块的主要功能是作为系统主界面为进入本系统不同功能界面选择提 供一个接口，使用一个窗口来实现这一功能。首先建立一个

11、表单，设取 “aption ”属性为仓库管理”。在该表单上添加 6个按钮”控件，它们的caption ”属性分别为 设备入库”,设备出库”,设备还设其 stretch ”属性为 2-strech库”，部门需求”，设备采购”，显示报表”。然后在表单上添加 图象控件”，并 （扩展）”，pictrue ”属性为图片所在的位置, 本例中为c:仓库管理O1.jpg在comm.and, caption ”属性为设备入库”）控件的click ”事件中添加如下代码：do form设备入库表thisform.release在comm.and2（ caption ”属性为设备出库”）控件的click ”事件中添加

12、如 下代码：do form设备出库表thisform.release在comm.and3（ caption ”属性为设备还库”）控件的click ”事件中添加如下代码：do form 设备还库表thisform.release在comm.and4（ caption ”属性为部门需求”）控件的click ”事件中添加如下代码：do form部门需求表thisform.release在comm.and5（ caption ”属性为 设备采购”）控件的click ”事件中添加如下代码：do form设备采购表click ”事件中添加如thisform.release在comm.and6（ capti

13、on ”属性为显示报表”）控件的下代码:do form 显示报表thisform.release在“0rm1 ”的属性里选择autocenter ”设置为.T.-真”，同时将backcolor ” 设置为 255,255,255 ”，windowstate ”设置为 0-普通”添加form1 ”的init ”事件的代码如下：set directory to c:仓库管理*将程序的默认的路径指向资源所在的文件夹4.2设备入库模块的设计在设备入库模块中将实现设备数据的添加和入库等功能。本模块设计采用先 用向导生成表单，然后修改的方法实现。首先在项目管理器的文档视图下单击新建”按钮，在接下来的向导中

14、，数据库和表”选择 仓库管理”以及 设备入库表”这是前面定义好的数据库和表。由于设备入库需要显示所有的字段，因此我们将可用字段全部移至选定字段，单击下一步”按钮，在表单样式中，选择 阴影式”以及图片按钮”如图所 示。左上角的窗口提供了表单样式的预览功能，图片按钮和文本按钮的区别在于显示的时候是以图片来表达功能还是文字来表达，实现功能的函数没有区别。选择 上一步”按钮可以跳回上一个界面对表单中显示的字段进行修改。单击 下一步”按钮后，向导进行到 步骤3-排序次序”，选择 设备号”为索引， 并选择升序排列。最后预览表单，核对每项的设置，完成表单向导。值得注意的是，在结束表单向导前，可选择保存表单以

15、备将来使用”，保存并运行表单”，或者保存表单并用表单设计器修改表单”。由于VisualFoxPro6.0向导生成的表单只具有普遍性，对于当前设计的仓库管理系统还需要 一定的改变，因此以我们选择保存表单并用表设计器修改表单”单击完成”按钮系统提示保存表单，将表单保存为设备入库表.scx ”，存于c:仓库管理目录下。然后打开表单修改器生成的表单。在修改BUTTONSET，可以通过属性窗口的下拉列表选定单个按钮，调整其位置和其它属性。根据功能需求，把cmdprint ”、 “ ”mdexit、 cmdDelete”和 cmdedit ”的Visible属性都设为.F.-假”添加2个命令按钮，Capt

16、ion属性分别设为修改 库存”和回主界面”在回主界面”命令按钮的click事件中添加代码如下：thisform.releasedo form仓库管理在修改库存命令按钮的click事件中添加代码如下：select 现有库存表 getid=thisform. 设备号 l.textl.value set order to 设备号seek getidif fou nd()get num=thisform. 入库数量 1.text1.valueupdate 现有库存表 set 现有库存=(现有库存 +getnum) where ( 设备号 =getid)elseinsert into现有库存表(设备号,

17、现有库存,最大库存,最小库存);value (thisform. 设备号 1.text1.value,thisform. 入库数量 1.text1.value,1000,10)end ifinsert into 操作日志表(操作员,操作内容,操作时间);values (thisform. 采购员 1.text1.value,设备入库,date()保存后运行表单4.3设备出库模块的设计：在设备出库模块中将实现设备出库数据的添加和修改库存等功能。该模块的功能和设备入库的功能相似。具体操作可以参考设备入库模块的设计。在表单的左上角加上了显示当前时间的功能，添加标签Iabel2的caption属性设为

18、 当前时间”添加label3的caption属性设为空；为当前表单的 label3i nit事件添加如下代码：this.capti on=dtoc(date()该模块具体实现过程不再一一详细说明。 下面列出了表单中所用到控件的属 性值。Forml控件的主要属性:属性名称属性值Capti on设备出库表Autoce nter-真BackColor255.255.255(2) ButtonSetl控件的主要属性:控件名属性名称属性值cmdExitVisible.F.-假cmdDeleteVisible.F.-假cmdPri ntVisible.F.-假cmdEditVisible.F.-假Comm

19、a nd1Capti on修改库存Comma nd2Capti on回主界面下面时设备出库表单中修改库存”命令按钮的click事件的代码:select 现有库存表*先在该表单的数据环境中添加现有库存表getid=thisform. 设备号 l.textl.valueset order to 设备号seek getid*在现有库存表中查找设备号等于getid的纪录if fou nd()get num=thisform. 出库数量 1.text1.valueupdate现有库存表；set 现有库存=（现有库存-getnum） where （ 设备号=getid）*如果库存表中有该项设备，则更新库存

20、表insert into 操作日志表（操作员,操作内容,操作时间）;values （thisform. 领取人 l.textl.value,设备出库,date（）elsemessagebox（出错,1,错误的设备号）en dif4.4设备还库模块的设计按照前面在设备还库模块中将实现设备还库数据的添加和修改库存等功能, 介绍的步骤设计设备还库表。设备还库表所可能用到的控件的属性如表所示：（1）Form1控件的主要属性：称属性名属性值Capti on设备还库表Autoce n-真terBackCol255.255.25or5（2） ButtonSet1控件的主要属性:控件名属性名称属性值cmdEx

21、itVisible.F.-假cmdDeleteVisible.F.-假cmdPri ntVisible.F.-假cmdEditVisibl.F.-假eComma ndCaptio修改库存1nComma ndCaptio回主界面2n下面是设备还库表中修改库存”命令按钮的click事件的代码：select 现有库存表*先在该表单的数据环境中添加现有库存表getid=thisform. 设备号 l.textl.valueset order to 设备号seek getid*在现有库存表中查找设备号等于 getid的纪录if fou nd（）get num=thisform. 归还数量 l.textl

22、.valueupdate 现有库存表；set现有库存=（现有库存-getnum） where （ 设备号=getid）insert into操作日志表（操作员,操作内容,操作时间）;values （thisform. 归还人 1.text1.value, 设备还库,date（）*如果库存表中有该项设备，则更新库存表，同时更新操作日志elsemessagebox（出错,1,错误的设备号）*如果没有该设备号则报告出错信息end if保存后运行表单，可得到设备还库表。4.5设备需求模块的设计在设备需求模块中将实现设备需求数据的添加和保存日志等功能。首先通过Visual Foxpro的表单向导生成所需

23、的设备需求表单，选择部门需求表的所有可 用字段，然后为保持程序风格的一致，继续采用表单的阴影式和图片按钮的风格。 在步骤3-排序次序”时。选择设备号的升序排列。最后单击 完成”按钮，把表单保存在“:仓库管理”目录下，名为 设备需求.SCX ”。通过表单向导生成的表单，我们可以调节控件的位置，修改表单中控件的属 性。相关的属性设置如下表所示：(1) Forml控件的主要属性:属性名称属性值Capti on部门需求表Autoce nter-真BackColor255.255.255(2) ButtonSetl控件的主要属性:控件名属性名称属性值cmdExitVisible.F.-假cmdDel e

24、teVisible.F.-假cmdPrintVisible.F.-假cmdEditVisible.F.-假Commaid1iCaption保存日志Commaid2iCaption回主界面在表单设计器中，双击 保存日志”命令按钮。添加click事件代码如下：insert into 操作日志表(操作员,操作内容,操作时间)values(username,设备需求：date()双击回主界面命令按钮，添加 click事件代码如下：thisform.releasedo form仓库管理保存对表单所作的修改。4.6设备采购模块的设计在设备采购模块中将实现设备采购数据的添加和保存日志等功能。(1) 由数据表

25、生成表单通过Visual Foxpro的表单向导，生成设备采购计划表单。在选择数据库和 表时，选择仓库管理数据库和设备采购计划表。在选择字段时，选择所有可用字段，选择阴影式和图片按钮作为设备采购计划表的样式。选择计划采购时间的升序排列作为设备采购计划表的索引。(2) 为窗体修改和添加命令按钮添加2个命令按钮 保存日志”和回主界面”设置表单中控件的属性。下面 的表列出了需要修改的控件的名称以及属性值。(1) Form1控件的主要属性:属性名称属性值Capti on设备采购表Autoce nter-真BackColor255.255.255(2) ButtonSet1控件的主要属性:控件名属性名称

26、属性值cmdExitVisible.F.-假cmdDelVisibl.F.-假eteecmdPrintVisible F.-假cmdEditVisible F.-假Command1Caption保存日志Commard2iCaption回主界面(3) 为按钮添加click事件代码：在表单设计器中，双击保存日志命令按钮。添加click事件代码如下：insertinto 操作日志表(操作员,操作内容,操作时间)values(username,设备需求,date()*把设备需求写入操作日志表中双击回主界面按钮，添加click事件代码如下：thisform.release*释放本表单do form仓库管

27、理*运行仓库管理界面保存对表单所作的修改4.7显示报表模块的设计在该模块中，一共要显示3个报表，分别提供库存不足，库存过多和操作日 志等信息。1.设计显示报表表单在项目管理器的文档视图下选择 新建”然后选择新建表单。在的空白表单中添加一个页框控件， 并按照下表设置页框的属性，同时在数 据环境里添加现有库存表和操作日志表。控件名属性名称属性值FormlCapt显示报表ionPageframelCaption3Pageframel.PagelCaption库存不足表Pageframel.Page2Caption库存过多表Pageframel.Page3Caption操作日志分别为每个page添加一个表格gridl ： 库存过多表，库存不足表，操作日志表 设置表格控件的属性，如表所示： gridl控件的主要属性表：控件名属性名称属性值Pageframel.Pagel.gridlRead On lyT.-真Pageframel.Page