《mis服装销售库存管理系统》由会员分享，可在线阅读，更多相关《mis服装销售库存管理系统（25页珍藏版）》请在金锄头文库上搜索。
1、服装销售库存管理系统一 系统设计1项目开发背景某公司是专营家电的中型企业，该公司经营 10 大类几十个品种的家电产品。管理工作主要是进货商品的入库管理和销售商品的出库管理及库存商品的保管管理。现有的管理工作主要依靠手工完成，工作量大，且效率不高。为了能更好地利用现代信息技术的成果，提高管理工作的效率和水平，以适应企业发展的需要，决定开发库存管理系统。2系统分析可行性研究根据调查，商品入库的过程是当购入商品到货后，负责进货的人员首先填写入库单，然后经仓库管理人员对商品的质量及数量进行核查后方可入库，并更新商品入库流水帐，另外如果是新产品，则还要在库存台账中建立新账页。商品出库管理过程是管理人员根
2、据销售人员提供的商品出库单，经核查后付货，同时登记商品销售流水帐，累计汇总出各种商品当日的累计购入入库量、累计销售出库量和库存结余量等数据，并将这些数据填入库存台账。原有的手工操作方式存在的主要问题：A手工模式下的工作劳动强度高、效率低、错误多、处理速度慢，不适应企业发展的需要。B在具体工作中，存在着大量数据的保存、汇总、查询等工作，手工模式速度慢而且不利于数据的分析，已不适应现代管理模式。本系统开发的目的，就是通过系统开发，实现库存管理工作计算机化，提高业务的处理速度和规范化程度，并对有关的工作进行集成和重组，进一步通过计算机网络系统实现整个企业管理信息化。该系统可以提高管理工作的质量和效率
3、，主要表现在以下几个方面： A实现库存管理的“动态”化，能及时地提供库存商品动态信息，配以库存报警功能，在库存过高或过低时，都给予提示。B强大的统计分析功能，利用计算机工具以各种方式统计出销售等情况，以便于整体营销策略的调整。C方便的查询功能，能快速实现对各种商品的入库、销售及库存情况的查询。从技术上讲，现行的网络技术和计算机技术完全能完成本系统的功能要求。经济方面，该企业用于系统开发的预算基本可满足设备的投入和人力投入。就收益而言，系统投入使用后能加快资金的周转，提高资金的利用率，而且可以提高管理效率，减少人力资源的浪费。在社会可行性方面，系统的开发与使用与现行的管理制度没有冲突，而且现在员
4、工通过培训可以很容易掌握和使用系统。综上所述，该系统具备可开发的条件，项目可行，建议开始开发。我们做的这个系统，只是抛砖引玉，通过开发一个简化的服装销售库存管理系统，展示 Visual FoxPro 的强大功能。同时，希望有兴趣的读者在本章学习的基础上设计开发出功能更加强大的销售库存管理系统。3.设计思想本系统开发设计思想尽量采用学校现有的软硬件设施，以及先进的管理系统开发方案，从而达到充分利用学校现有资源，提高系统开发水平和应用效果的目的。系统应符合企业销售库存管理的要求，满足企业对库存日常管理的需要，并达到操作过程中的直观、方便、实用、安全等要求。系统采用模块化程序设计方法，既便于系统功能
5、的各种组合和修改，又便于未参与开发的技术维护人员补充、维护。系统应具备数据库的修改功能，即使根据库存状况进行数据的修改，添加，删除，备份等操作。4.开发和运行环境开发工具：Visual FoxPro6.0 中文版运行环境：Windows20003 操作系统5.系统功能模块设计本系统的功能分为如下几大模块：欢迎界面模块该模块给用户一个直观的感受，了解本系统的主要功能，提供进入系统的途径。登录界面模块用户想进入系统，必须输入用户名、密码及用户的权限。该模块检验用户的合法性，如果正确，则显示系统的主界面。权限的不同，则限制了使用者对系统的使用权限，决定了用户对系统的修改等信息。系统主界面主界面提供了
6、服装的信息，库存信息，对服装的检索统计，用户管理，系统管理，帮助信息等操作。采用模块化设计思想，可以大大提高设计的效率，并且可以最大限度的减少不必要的错误。系统结构框架图如图 1-1 所示图 1-1二 数据库设计根据企业的运行现状，结合库存管理的信息，我们经过分析，确定了要制作的表及表中各字段名称，字段类型，字段宽度。仓库信息表服装出库表服装入库表人员信息表现有库存表用户列表分析完成后，我们可以得到数据库的逻辑结构，接着就可以在 Visual FoxPro6.0 中实现该结构。数据库的逻辑结构可以直接用 Visual FoxPro 的项目管理器。以下是具体步骤：1.创建项目先在电脑中创建一个名
7、为“服装销售库存管理系统”的项目，保存在电脑中。2.创建项目的数据库选中数据库，单击右侧新建按钮，在数据库中添加数据表，根据上述的各个表的字段内容进行表的编辑。图 2-1 人员信息表的设计内容图 2-2 所有表添加后结果三各大功能模块设计1.欢迎界面图 3-1 欢迎界面效果图表单主要界面如上图所示：Command1”进入系统” 按钮的 click 代码：do form 用户登录界面THISFORM.RELEASE()2.登陆界面图 3-2 登录界面效果图表单界面如上图：双击“登陆”按钮，编写其 Click 事件代码：SELECT 用户列表*改为精确比较SET EXACT ON * 试图登录次数
8、自动加 1 i=i+1 IF EMPTY(ALLTRIM(THISFORM.text1.Value)MESSAGEBOX(请输入用户名,48,服装库存管理与检索系统)THISFORM.text1.SetFocusELSESELECT 用户列表LOCATE FOR ALLTRIM(用户名)=ALLTRIM(THISFORM.text1.VALUE)&.AND.ALLTRIM(密码)=ALLTRIM(THISFORM.text2.VALUE)&;&.AND.用户权限=THISFORM.COMBO1.VALUE &查找用户*用户名和密码正确IF FOUND() .AND.ALLTRIM(密码)=AL
9、LTRIM(THISFORM.text2.VALUE).AND.ALLTRIM(用户权限)=ALLTRIM(THISFORM.COMBO1.VALUE)CUser=用户名 &bSAdmin=用户权限 &将登录用户的用户名及用户权限存储到全局变量中 IF 用户权限= 高bSAdmin=sysELSEIF 用户权限=低bSAdmin=ENDIF ENDIF*保存账号到全局变量中& cUser=ALLTRIM(THISFORM.text1.VALUE)DO FORM 系统主表单&界面THISFORM.RELEASE()ELSE*用户名和密码或权限错误IF i1skip-1else go botten
10、difcase this.value=3if recn()0if found() repl 现有库存 with 现有库存+thisform.txt 数量.valuerepl 编号 with thisform.txt 编号.valuerepl 品牌 with thisform.txt 品牌.valuerepl 产品名称 with thisform.txt 产品名称.valueelseinsert into 现有库存表( 编号, 品牌,库号,产品名称 ,现有库存);values(thisform.txt 编号.value,thisform.txt 品牌.value,thisform.txt入库库号
11、.value,;thisform.txt 产品名称.value,thisform.txt 数量.value) endifelse messagebox(数量不能为负值,请重新输入,并删除已输入的数据,48,警告！) endif select 服装入库表replace 总额 with thisform.txt 数量.value*thisform.txt 单价.valueendifendif图 3-6 服装出库界面效果图图 3-7 仓库转存界面效果图该模块主要是用于服装的转存操作，可以通过浏览按钮查看各仓库的库存状况，然后做出合适的调整。图 3-8 仓库维护界面效果图该模块用于仓库库存信息的维护，
12、只有高权限的管理员登录才可以根据库存状况做出合适的修改，低权限用户只能浏览。图 3-9 现有库存查询效果图“查询”按钮的 click 事件代码：*查询条件默认为“.T.SearchFilter=.T.*如果“txt 编号”非空IF NOT EMPTY(ALLTRIM(THISFORM.txt 编号.Value)SearchFilter=SearchFilter + AND + ALLTRIM(THISFORM.txt 编号.Value) + $ 编号ENDIF*如果“txt 品牌”非空IF NOT EMPTY(ALLTRIM(THISFORM.txt 品牌.Value)SearchFilter
13、=SearchFilter + AND + ALLTRIM(THISFORM.txt 品牌.Value) + $ 品牌ENDIF*如果“txt 产品名称”非空IF NOT EMPTY(THISFORM.txt 产品名称.Value)SearchFilter=SearchFilter + AND + ALLTRIM(THISFORM.txt 产品名称.Value) + $ 产品名称ENDIF*设置过滤条件SELECT 现有库存视图SET FILTER TOSET FILTER TO &SearchFilter*刷新表单THISFORM.Refresh图 3-10 统计界面效果图该模块中可以根据不
14、同的要求来统计库存状况，对库存有一个宏观的了解。其中添加了 3 个 optiongroup 按钮，其代码分别如下：1do case case this.value=1select 编号 ,产品名称 ,品牌,单价, 数量,总额 from 服装入库表 case this.value=2select sum(总额)as 入库总额 from 服装入库表endcase 2：do case case this.value=1select 编号, 产品名称 ,品牌,出库单价,出库数量,出库总额 from 服装出库表 case this.value=2select sum(出库总额)as 出库总额 from
15、服装出库表endcase3：do case case this.value=1select 编号 ,产品名称 ,品牌,现有库存 from 现有库存表 endcase 图 3-11 数据备份效果图“备份到”按钮 click 代码：*让用户选择一个备份的目录*m.dir=GETDIR(,请输入文件要备份到的目录：)*确认选择了目录*DO WHILE EMPTY(m.dir)IF MESSAGEBOX(您没有选择要备份的目录。+CHR(13)+是否要取消备份？,4+32+256,取消 )=7m.dir=GETDIR(,请输入文件要备份到的目录：)ELSERETURN ENDIFENDDOthisform.text1.value=m.dir“开始备份”按钮 click 代码：if empty(alltrim(thisform.text1.value) thenMESSAGEBOX(没有选择目标路径!)elseCLOSE ALL*自定义系统窗口 *DEFINE WINDOWS wi
