进销存信息管理系统设计报告.doc

1、 进销存管理系统一 项目说明进销存管理系统的开发。利用计算机系统运行速度快，数据存储大，传递信息快,便于修改和查询的特点，将进销存管理系统计算机化，可及时给决策机构准确，全面提供市场信息和商品资料，这正是进销存管理系统的目标。进销存管理系统是为了适应现代销售可库存管理要求，推动进销存管理走向科学化，规范化，减轻单位销售和库存管理的劳动强度，提供人员的工作效率，质量和管理水平的管理软件系统,使得通过信息化管理，销售，库存，采购变得快捷方便。二系统调查（一）系统目标企业进销存管理系统的目标是：按照现代物流要求构建一个全新的现代化的物资管理系统，通过计算机、网络等现代科学技术,实现进货、在库管理、配

2、送管理等物资活动的自动化、数字化和智能化。 要实现该目标，就需要在按照现代物流的要求对企业的经营战略,组织战略,生产经营等管理模组织结构等进行精心规划与设计的基础上,建设符合现代企业要求的的物流基础设施并配置先进的物流设备， 如自动化，数字化，智能化的现代化仓库，自动备货生产线等,并且要建立一个支持企业生产经营管理模式和组织结构并适应未来发展的现代进销存管理系统。现代进销存管理概念最主要体现在以实现企业资源高效整合为第一目标，帮助企业降低物资成本,通过提升物资价值从而实现企业价值最大化。本系统开发混合采用结构化系统开发方法与面向对象的开发方法，结合两种开发方法各自的优势进行系统开发。 通过对实

3、际需求分析,本系统主要面向特定管理人员,对各种物资进行电子化管理,所以系统包括以下功能：信息管理功能、日常操作功能、信息查询功能、信息统计功能、系统管理功能。（二)系统开发计划1主表单 2“信息管理”模块。商品信息管理功能。3“日常操作”模块。商品进货操作功能，商品出货操作功能。4“信息查询“模块。进货记录查询功能,出货记录查询功能，库存信息查询功能。5“系统管理"模块。修改密码功能，关于系统功能,退出系统功能.三系统分析（一）系统分析定义所谓系统分析，就是指在整个系统开发工程中，解决“做什么”的问题，把要解决哪些问题，满足用户哪些具体的信息需求调查分析清楚,从逻辑上或说从信息处理的

4、功能需求本论文上提出系统的方案，即逻辑模型，为下一阶段进行物理方案设计，解决怎么办提供依据。它是信息开发系统中的一个重要阶段，是建立系统模型的第一步。其核心是目标分析与需求分析,最后提出系统的逻辑方案。进销存管理信息系统的详细调研 在实际调研中，我们主要通过座谈、询问及发放征询意见表等方法来了解他们对信息系统的需求情况。 主要了解的用户有：企业各管理负责人，使用企业进销存管理系统的各职能部门的负责人，各信息管理的高层负责人，供应站负责运行维护管理信息系统的管理人员、技术人员和操作人员。     通过对以上人员的需求调查得知，以前的物资管理办法，工作繁琐，

5、工作量大，效率低。因而，建立一套企业进销存管理系统势在必行。各单位的需求虽然不尽相同，但大体上可分为如下几个方面：  1.用户的信息要求。随时查询库存物资状况，进行库存物资汇总，对记录能随时删除、插入及恢复。 2。用户的处理要求.能随时增加、删除，修改每一个库存物资记录。 3.对数据的安全性、完整性的要求。要保证每个记录必须完整，不能被他人非法窃去. 本系统的逻辑模型主要是以系统的数据流程图和数据字典为主要描述工具,以信息系统 中应有的数据流程和数据结构来描述系统。 个人收集整理，勿做商业用途文档为个人收集整理，来源于网络(二）企业进销存管理的业务流程分析 进销存管理系统是一项复杂而

6、特殊的物流，资金流和信息处理系统，系统的业务处理特点是实现以物资计划为基础，以物资收发存为中心,以财务核算为核心而进行的物资计划，采购，存储,销售，查询统计一体化的管理过程，包括计划管理、合同管理、物资收发存管理、仓储管理、财务稽核、查询统计等功能，同时兼顾企业的经营和管理职能,充分满足企业及基层单位物资管理的基本要求。物资的管理是一个相对复杂的系统工程，同一般进、销、存系统相比，本质上有很大的不同，在物资管理中，虽然中心的数据是物流,但它体现的更是一种管理的过程,从物资需求的产生、平衡立库以及对整个物资数量、资金数据的分析,都体现了物资管理在这方面的特殊性及复杂性，其业务流程图如图1所示：

7、（三）企业进销存管理的数据流程图分析 用户的需求具体体现在各种信息的提供、保存、更新和查询等方面。仔细分析有关部门的基础上,得出本系统的数据流程图如图所示： (四)企业进销存管理系统的系统流程图分析系统流程图如图所示: 企业进销存管理系统系统流程图（五)系统总体结构分析 该企业的总体结构如图所示 四. 系统环境以及工具A。 软件环境: 用户端：Windows2000，Windows2003，Windows XP 服务器端:WindowsNT/Windows2000及以上操作系统 编程语言:VFP B.硬件环境： 有高性能的电子计算机、大容量的存贮装置，个人电脑（终端）以及联结起来的网线等,组成

8、信息资源共享的计算机网络.五系统设计及程序设计（一）项目管理器的设置在Visual FoxPro的菜单栏中，选择“文件”菜单中的“新建"选项，选定文件类型为“项目"，并选中“新建文件”按钮,在“项目文件"栏中填入所建项目名如“进销存"。（二） 数据库设计 1。数据库需求分析由于本系统的数据量比较小,数据的复杂程度也比较低，所以使用visual foxpro 系统完全可以处理，同时visual foxpro 由于便于学习 ，也方便用户的进行二次开发，所以该系统比较符合使用 visual foxpro 这种简单的小型数据库技术来实现2。ER 图分析本系统设计

9、的数据比较简单，通过对现实世界进行抽象，该系统主要涉及物资和人员两个实体，两个实体直接的联系是“操作“。系统ER图如图所示（1） 实体物资：具有的属性有物资号、物资名、购置日期、购置价格等,它是该系统数据 的重要组成部分（2） 实体人员:具有的属性有账户、密码,它实体是物质的操作者（3） 联系“操作“：包括对商品进货,商品出货,商品退货等。系统ER3.数据表设计 由于本系统设计的数据种类单一，所以只有个数据表，其详细信息如下（1）用户信息表： “用户信息"表中包含“用户名”和“密码"两个字段：字段名类型字段宽度小数位数说明用户名字符型20主索引字段密码字符型20（2）商品信

10、息表： “商品信息”表中包含商品编号、商品名称、商品单位、商品单价、库存下限、产地和说明等信息:字段名数据类型字段宽度小数位数商品编号字符型6商品名称字符型40商品类别字符型4 商品单位字符型6购置单价浮点型81库存下限浮点型80产地字符型40(3）分类信息表： “分类信息“表包含类别编号和类别名称等2个字段:字段名数据类型字段宽度类别编号字符型4类别名称字符型20（4）仓库信息表： “仓库信息”表包含仓库编号、仓库名称、仓库位置、仓库管理员和仓库电话等字段：字段名类型字段宽度小数位数说明仓库编号字符型4主索引字段仓库名称字符型30仓库位置字符型20仓库管理员字符型20仓库电话字符型13(5）

11、供货商信息表: “供货商信息”表包含供货商编号、供货商名称、联系人、电话、地址、邮编、类别和说明等字段： 字段名类型字段宽度小数位数说明供货商编号字符型8主索引字段供货商名称字符型30联系人字符型20地址字符型40邮编字符型6输入掩码：999999电话字符型13类别1字符型4普通索引字段类别2字符型4普通索引字段类别3字符型4普通索引字段说明字符型100(6）客户信息表: “客户信息“表包含客户编号、客户名称、联系人、地址、邮编、电话和说明等字段：字段名类型字段宽度小数位数说明客户编号字符型8主索引字段客户名称字符型40联系人字符型20地址字符型40邮编字符型20输入掩码:999999电话字符

12、型13说明字符型100（7）进货信息表： “进货信息“表包含进货编号、商品编号、进货单价、进货数量、进货单位、进货日期、存放位置和经手人等信息：字段名类型字段宽度小数位数说明进货编号字符型12主索引字段商品编号字符型6普通索引字段进货单价浮点型81进货数量浮点型81进货单位字符型8普通索引字段进货日期日期型8存放位置字符型4普通索引字段经手人字符型30（8)出货信息表： “出货信息"表包含出货编号、商品编号、出货单价、出货数量、出货单位、出货日期、出货仓库、客户编号和经手人等信息：字段名类型字段宽度小数位数说明出货编号字符型12主索引字段商品编号字符型6普通索引字段出货单价浮点型81

13、出货数量浮点型81出货日期日期型8普通索引字段出货仓库字符型8客户编号字符型4普通索引字段经手人字符型30(9）退货信息表： “退货信息”表包含退货编号、商品编号、退货数量、经手人、退货日期和退货原因等字段：字段名类型自身宽度小数位数说明退货编号字符型12主索引字段商品编号字符型6普通索引字段退货数量浮点型81经手人字符型20退货日期日期型8普通索引字段退货原因字符型8100(10)库存信息表： “库存信息”表包括商品编号、仓库编号、和库存数量等字段:字段名类型字段宽度小数位数说明商品编号字符型6普通索引字段仓库编号字符型4普通索引字段库存数量浮点型81（三）数据库表单的设计1.主表单 主表单

14、包括系统大部分功能。主表单包括操作中使用的主菜单，如下图所示 2.“信息管理”模块（1）商品信息管理功能: 该表单主要用来管理商品的信息，包括浏览、新增、修改和删除商品的信息。 (2）商品分类管理功能 该表单用来管理商品的分类，包括浏览、新增、修改和删除商品的信息（3）仓库信息管理功能 该表单用来管理仓库的信息，包括浏览、新增、修改和删除仓库的信息（4）.供货商信息管理功能该表单用来管理供货商的信息，包括浏览、新增、修改和删除供货商的信息 (5）。客户信息管理功能 该表单用来管理客户的信息，包括浏览、新增、修改和删除客户的信息.3。“日常操作"模块（1）。商品进货操作功能“商品进货操

15、作"表单用来进行商品的进货操作，使用该功能将产生1条进货记录，并且产生相应商品的库存记录由图可见，商品进货操作表单，由标签，文本框，复选框,命令按钮组成。”确定”代码为：InNo=ALLTRIM(THISFORM。txt进货编号.Value）PNo=THISFORM.cmb商品编号。ValueInCount=THISFORM。txt进货数量.ValueInPrice=THISFORM.txt进货单价。ValueInTime=THISFORM.txt进货时间.ValueInPerson=ALLTRIM(THISFORM.txt经手人.Value)InDanWei=ALLTRIM（THI

16、SFORM.txt供货单位.Value）InNote=THISFORM.edt说明。ValueIF PNo=""MESSAGEBOX("商品编号为空或者错误”,48,"进销存管理系统”)THISFORM。cmb商品编号.SetFocusReturnENDIFDIMENSION RecNum（1)RecNum=2SELECT COUNT（*) FROM 商品信息 WHERE 商品编号=PNo INTO ARRAY RecNumIF RecNum1MESSAGEBOX（”商品编号错误"，48,”进销存管理系统”）THISFORM。cmb商品编号。S

17、etFocusReturnENDIFIF InCount=0 MESSAGEBOX（”进货数量错误”,48，"进销存管理系统”)THISFORM.txt进货数量.SetFocusReturnENDIFIF InPrice=0MESSAGEBOX("进货单价错误”,48,"进销存管理系统"）THISFORM.txt进货单价。SetFocusReturnENDIFIF InPerson=”"MESSAGEBOX（”经手人不能为空",48，"进销存管理系统”)THISFORM。txt经手人。SetFocusReturnENDIFB

18、EGIN TRANSINSERT INTO 进货信息 VALUES(InNo,PNo，InCount,InPrice,InTime，InDanwei，InPerson,InNote)DIMENSION RecordNum(1）RecordNum（1)=2SELECT COUNT() FROM 库存信息 WHERE 商品编号=PNo INTO ARRAY RecordNumIF RecordNum（1）=0INSERT INTO 库存信息 VALUE(PNo，InCount,InNote)ELSEUPDATE 库存信息 SET 库存数量=库存数量+InCount WHERE 商品编号=PNoEN

19、DIFEND TRANSIF THISFORM。Check1。Value=1REPORT FORM InView FOR 进货编号=THISFORM。txt进货编号。Value PREVIEWENDIFMESSAGEBOX（"进货成功"，64，"进销存管理系统”)THISFORM。InitTHISFORM.Refresh（2)。商品出货操作功能“商品出货操作"表单用来进行商品的出货操作，使用该功能将产生1条出货记录，并且导致相应商品的库存发生变化由图可见，商品出货操作表单，由标签，文本框，复选框，命令按钮组成。”确定”代码为：OutNo=ALLTRIM(

20、THISFORM。txt出货编号。Value）PNo=THISFORM.cmb商品编号.ValueOutCount=THISFORM。txt出货数量.ValueOutPrice=THISFORM.txt出货单价。ValueOutTime=THISFORM。txt出货时间。ValueOutPerson=ALLTRIM（THISFORM.txt经手人.Value）OutDanWei=ALLTRIM(THISFORM.txt接收人.Value）OutNote=THISFORM。edt说明。ValueIF PNo=""MESSAGEBOX(”商品编号为空或者错误”,48，"

21、;进销存管理系统”）THISFORM。cmb商品编号.SetFocusReturnENDIFDIMENSION RecNum（1）RecNum=2SELECT COUNT（） FROM 商品信息 WHERE 商品编号=PNo INTO ARRAY RecNumIF RecNum<1MESSAGEBOX("商品编号错误",48，"进销存管理系统”)THISFORM。cmb商品编号。SetFocusReturnENDIFIF THISFORM.txt库存数量.Value=0MESSAGEBOX（”该商品没有库存",48，”进销存管理系统”)THISFO

22、RM.cmb商品编号.Value=”THISFORM。cmb商品编号.SetFocusReturnENDIFIF OutCount<=0 MESSAGEBOX（"出货数量错误”，48,"进销存管理系统")THISFORM.txt出货数量。SetFocusReturnENDIFIF OutPrice=0MESSAGEBOX("出货单价错误”，48,"进销存管理系统”）THISFORM。txt出货单价.SetFocusReturnENDIFIF OutPerson="”MESSAGEBOX(”经手人不能为空"，48，&qu

23、ot;进销存管理系统")THISFORM.txt经手人.SetFocusReturnENDIFBEGIN TRANSINSERT INTO 出货信息 VALUES（OutNo，PNo，OutCount,OutPrice,OutTime,OutDanwei,OutPerson,OutNote)UPDATE 库存信息 SET 库存数量=库存数量OutCount WHERE 商品编号=PNoEND TRANSIF THISFORM.Check1。Value=1REPORT FORM OutView FOR 出货编号=THISFORM.txt出货编号。Value PREVIEWENDIFME

24、SSAGEBOX（”出货成功”，64,"进销存管理系统"）THISFORM.InitTHISFORM.Refresh（3）.商品退货操作功能 “商品退货操作”表单用来进行商品的退货操作，使用该功能将产生1条退货记录（4）。仓库转存操作功能 “仓库转存操作”表单可以将一个仓库中的一项或者所有的商品转存到另一个仓库中，选择原仓库和目标仓库,并选择要转存的商品，并单击“确定”按钮即可完成转存操作. 由图可见，商品转存操作表单,由标签，文本框，复选框，命令按钮,组合框组成。”确定”代码为：set exact onif empty（thisform。combo1.value）mess

25、agebox（"源仓库错误",48,"进销存管理系统")thisform。combo1。setfocusreturnendifif empty（thisform。combo2.value）messagebox（"目标仓库错误”，48,"进销存管理系统")b2。setfocusreturnendifif thisform。cmbo1.value=thisform。combo2.valuemessagebox("源仓库与目标仓库相同"，48，"进销存管理系统")b2.setfocusret

26、urnendifif empty(thisform。combo3。value）。and.thisform.check1.value=0messagebox(”转存对象错误",48,"进销存管理系统”）thisform。combo3.setfocusreturnendifif thisform。check1。value=1select*from 库存信息表 where 仓库编号=bo1。value into cursor ttempdelete from 库存信息表 where 仓库编号=bo1。valueselect ttempgo topdo while.not.eof（

27、）dimension recnum(1)recnum=0tpno=ttemp。商品编号tdno=thisform。combo2.valueselect count(） from 库存信息表 where alltrim(商品编号)=tpno and 仓库编号=tdno into array recnumif recnum<1insert into 库存信息表 values (ttemp。商品编号 ,thisform。combo2。value，ttemp。库存数量)skipendifenddoselect ttempuseselect 库存信息表packmessagebox（"转存

28、完成",48，”进销存管理系统"） thisform.release else dimension recnum(1） recnum=0select count(*） from 库存信息表 where 商品编号=bo3.value and 仓库编号=bo2。value into array recnumif recnum<1tmpdp=bo2。valueupdate 库存信息表 set 仓库编号=tmpdp else select 库存信息表 locate for 商品编号=bo3.value and 仓库编号=thisform。combo1.value if fou

29、nd（) ndptno=库存信息表.库存数量 endif update 库存信息表 set 库存数量=库存数量+ndptno where 商品编号=bo2。value delete from 库存信息表 where 商品编号=bo3。value and 仓库编号=bo1.value pack endif messagebox（”转成完成”,48，"进销存管理系统”) thisform.release endif set exact off 4“信息查询“模块（1）.进货记录查询功能在“进货记录查询"表单中可以按照“商品编号”、“商品名称”、“供货单位"、“经手人”

30、和“进货日期"等字段组合查询商品的进货记录，并且可以查询某个月份的进货记录。(2）。出货记录查询功能“出货记录查询"表单可以按照多种查询方式来查询商品出货操作产生的出货记录（3）。退货记录查询功能 “退货记录查询”表单可以按照多种方式查询商品退货操作产生的退货记录（4）。商品库存查询功能 “商品库存查询”表单可以按照多种方式查询商品的库存信息5“信息统计”模块（1）。热销商品统计功能“热销商品统计"表单中显示了销售量居于前20位的商品的编号、商品单位、商品单价和销售量等信息 由图可见，热销商品统计表单,由标签,表格，命令按钮组成。“表格”的init事件代码为：th

31、isform。grid2.recordsource=select * from hotview'(2）。短缺商品统计功能“短缺商品统计“表单显示了有库存的商品中库存数量小于商品的库存下限的商品的信息。由图可见，短缺商品统计表单，由标签,表格，命令按钮组成。“表格”的init事件代码为：thisform。grid1。recordsource=select * from shortview where ；库存总量<库存下限thisform。refresh6“系统管理”模块系统只有使用合法的用户名与密码登录系统才能使用系统，同时使用错误的用户名和密码试图登录3次后，系统将自动退出，避免

32、有人使用程序来恶意地破解用户名和密码.（1).登录功能 由图可见，系统登录表单,由标签，文本框，命令按钮组成。“确定”的代码为：SET EXACT ONIF ALLTRIM（THISFORM.TextUser。VALUE）="”MESSAGEBOX（"请输入用户名"，48,"进销存管理系统”)THISFORM。TextUser。SetFocusReturnENDIFUSER_N=ALLTRIM(THISFORM。TextUser。VALUE）USER_P=ALLTRIM（THISFORM.TextPass.VALUE）LOCAL Is_UserIs_Us

33、er=.F.SELECT 用户信息GO TOPDO WHILE .NOT. EOF(）Is_User=(USER_N=用户信息.用户名）。AND.(USER_P=用户信息。密码)IF IS_USEREXITELSESKIPENDIFENDDOIF IS_USERcCurUser=ALLTRIM（THISFORM.TextUser.Value）DO FORM MainFormTHISFORM.RELEASEELSEMESSAGEBOX（”用户名或用户密码不正确！"，0+16，”进销存管理系统"）THISFORM。TextUser。Value=”"THISFORM。T

34、extPass.Value=”THISFORM.TextUser。SetFocusENDIFSET EXACT OFF（2）。修改密码功能由图可见，系统登录表单，由标签，文本框，命令按钮组成。“确定”的代码为：SET EXACT ONSELECT 用户信息LOCATE FOR ALLTRIM（用户名）=ALLTRIM（THISFORM。txt用户名。Value)； 。AND。 ALLTRIM（密码）=ALLTRIM(THISFORM.txt原密码。Value）IF .NOT. FOUND(）MESSAGEBOX("原密码错误,请重新输入"，48,”进销存管理系统”)THISFORM。txt原密码。SetFocusRETURNENDIFIF EMPTY(A