商场服装销售管理系统.docxVIP

商场服装销售管理系统 课程设计目的： 随着我国市场经济蓬勃发展，计算机在各个行业的应用越 来越广，而在销售行业的应用就更能提高工作效率， 于是就编制了这个 商场服装 销售管理系统? 系统结构图： 本系统共6个部分，5个完整的功能模块。 系统设计： 1）数据库设计: 目客尸罔字段: r客戶吕客户名称客户地址 —联丟人目巌装 目客尸 罔字段: r 客戶吕 客户名称 客户地址 — 联丟人 目巌装 目销售 囲字段: 冒字段： r 商品编号 客户号 商品名称 — 商品編号 - 卡肖隹H期 ▼ 2）菜单设计: 3）表单设计： 验证的表单check -]□! x| 二用户貫录 登录中的程序是： locate for 用户名 =alltrim(thisform.text1.value) if not eof() if thisform.text2.value=密码 thisform.release DO 商场服装销售管理系统\mai n. mpr 商场服装销售管理系统 \9f9367f88ccbba25 else messagebox（密码错误,0,） en dif else messagebox（用户名错误,0,） en dif 程序中主表单 I / li crosoft Vi suaJL FoxFro 销售管理库房管理基础信息首理账务管理系统管理退岀系纸菜单 □■BlMiH HSISIBIEI !讎1 叵壘|鑑隨 修改客户的表单: 打印报表的表单:  介绍系统的表单 用户操作的表单 销售的表单 Text3 的 in teractive 中的程序 SELECT Yp.药品名称，Yp.单价； FROM yp!kh INNER JOIN yp!xs; INNER JOIN yp!yp ; ON Yp.药品编号=Xs.药品编号； ON Kh.客户号=Xs.客户号； WHERE Yp.药品编号 =this.value into array b a(i,1)=thisform.text1.value a(i,2)=thisform.text3.value a(i,6)=date() for j=1 to 2 a(i,3+j)=b(j) en dfor 确定按钮中的程序 in sert into xs from array a select * from xs into cursor temp select temp zap in sert into temp from array a do while not eof() update yp set库存=库存-temp.数量 where yp.药品编号 =temp.药品编号 skip en ddo 销售查询表单 查询中的程序： a=alltrim(thisform.pageframe1.page1.text1.value) if not empty(a) cap=ctod(a) thisform.grid1.recordsource=select * from xs where en dif b=alltrim(thisform.pageframe1.page2.text1.value) if not empty(b) cap=b thisform.grid1.recordsource=select * from xs where en dif c=alltrim(thisform.pageframe1.page3.text1.value) if not empty(c) cap=c thisform.grid1.recordsource=select * from xs where en dif 销售日期=cap 药品编号=cap 客户编号=cap 进货表单 添加中的程序 select yp locate for药品编号 =药品编号l.value if not eof() replace库存量 with 库存量+库存量l.value ,入库日期 with date() else insert into yp values (药品编号 l.value，药品名称 l.value，简称 l.value,产地 l.value，库存量 l.value，单价 1.value,操作员.value,date()) en dif 药品操作表单 设计心得： 在我的指导老师的悉心指导下，我才能完成如此宏大的工程，在设计的过 程中才发现我在 VFP的许多方面还不是很理解，在我遇到困难时，我的老师都 给了我耐心而细致的讲解，有时老师不顾休息时间，帮助我查资料，可以说没有 老师的帮助，就没有这个系统。 通过这个设计，使我们更好的理解了 VFP在解决现实生活中的作用。 最后再次感谢我们的老师。 课程设计教材及主要参考资