mis_服装销售库存管理系统

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