VFP课程设计--小型超市零售管理系统

东莞理工学院

课程设计报告

课程名称：FoxPro基础及应用

课程设计题目：小型超市零售管理系统

一、系统需求分析

1)进货管理：根据销售情况及库存情况，自动制定进货计划（亦可手工制定修改），

可以避免盲目进货造成商品积压。按计划单有选择性地进行自动入库登记。综

合查询打印计划进货与入库记录及金额。

2)销售管理：商品正常销售、促销与限量、限期及禁止销售控制。综合查询各种

销售明细记录、各地收银员收银记录以及交结帐情况等。按多种方式统计生成销

售排行榜，灵活察看和打印商品销售日、月、年报表。

3)库存管理：综合查询库存明细记录。库存状态自动告警提示。如库存过剩、少

货、缺货等。软件为您预警，避免库存商品积压损失和缺货。库存自动盘点计算。

4)人员管理：员工、会员、供货商、厂商等基本信息登记管理。员工操作权限管

理。客户销售权限管理。

二、系统设计

2.1、系统功能模块设计

该系统应包括如下几个功能模块，功能模块结构如下图所示

1）输入单据：出库、入库、产成品清单

2）查询：出库查询、入库查询、产成品查询

3）销售：销售费用、销售退款、进/退货

4）打印报表：入库报表、出库报表、产成品清单报表、销售退款单报表进/退货报表5）人员管理：员工、会员、供货商、厂商等基本信息登记管理。员工操作权限管理。客户销售权限管理。

2.2、数据库设计

3、数据库设计

本应用系统的数据库主要包括以下基本表，数据结构设计如下。

表1：厂商信息表

字段名数据类型长度（字节）备注

厂商编号文本20 主键

厂商名称文本50

厂商地址文本50

联系电话数字20

法人地表文本20

表2：员工信息表

字段名数据类型长度（字节）备注

员工编号文本20 主键

姓名文本20

性别文本20

年龄数字8

身高数字8

政治面貌文本20

家庭住址文本50

所属部门文本20

聘用日期日期16

编制日期日期16

表3：用户表

字段名数据类型长度(字节) 备注

用户名文本20

密码数字8

表4：销售单

字段名数据类型长度（字节）备注

单据编号文本20 主键

商品型号文本20

计量单位文本8

单价货币16

数量数字16

金额货币16

生产厂商文本50 外键

销售日期日期16

营业员文本20 外键

表5：入库单

字段名数据类型长度（字节）备注

入库编号文本20 主键

商品型号文本20

计量单位文本8

单价货币16

数量数字16

金额货币16

生产厂商文本50 外键

出厂日期日期16

仓管员文本20 外键

表6：进货单

字段名数据类型长度（字节）备注

单据编号文本20 主键

厂商编号文本20 外键

进货厂商文本50

商品型号文本20

计量单位文本8

单价货币16

数量数字16

金额货币16

进货日期日期16

采购员文本20 外键

备注备注20

三、系统实现

各模块界面设计与主要模块的程序代码

一、输入板块（周慧立、王亚、李倩恩）

1、表单（输入入库单据）

实现功能：可通过这个表单将商品的相关信息输入，例如编号、单价、数量等，起到一个存储信息的作用，方便以后查询、总结

等工作需要。

实现过程：实现过程：

①单击“文件”下拉菜单，再点击“新建”，选择“表

单”，再单击“新建文件”后开始表单输入入库单据

的设计。

设计界面如下：

②输入入库单据的设计的基本结构如下图：

“输入”按钮代码

e=ntom(val(alltrim(thisform.text5.value)))

f=alltrim(thisform.Text6.value)

g=alltrim(thisform.text7.value)

h=val(alltrim(thisform.text8.value))

i=ctod(alltrim(thisform.Text9.value))

if

empty(a).or.empty(b).or.empty(c).or.empty(d).or.empty(e).or.empty(f).or.empty(g).o r.empty(h).or.empty(i)

messagebox("请输入完整信息")

return

endif

insert into 表\入库单;

(入库编号,商品型号,计量单位,单价,金额,生产厂商,仓管员,数量,出厂日期) value(a,b,c,d,e,f,g,h,i)

z=0

scan for 商品库存表.商品型号=b

z=1

endscan

use

if z=1

update 商品库存表set 数量=数量+h where 商品型号=b

messagebox("输入入库单据成功！",64,"系统提示")

return

else

insert into 表\商品库存表;

(商品型号,数量) value (b,h)

insert into 表\商品资料单;

(商品型号) value (b)

messagebox("你所输入的是新商品,请输入商品名称")

use

do form 表单\输入新商品名

return

endif

“取消”按钮代码

Thisform.release

2、表单（输入出库单据）（萧巧谊、李喜仙、梁思音）

实现功能：可通过这个表单将出库的商品相关信息输入，例如编号、单价、数量等，起到一个存储信息的作用，方便以后查询，总结等工作需要。

实现过程：实现过程：

①单击“文件”下拉菜单，再点击“新建”，选择“表

单”，再单击“新建文件”后开始表单输入入库单

据的设计。