毕业设计论文千叶管理信息系统批发销售管理

《毕业设计论文千叶管理信息系统批发销售管理》由会员分享，可在线阅读，更多相关《毕业设计论文千叶管理信息系统批发销售管理（141页珍藏版）》请在装配图网上搜索。

1、重庆理工大学毕业论文(设计) （千叶管理信息系统批发销售管理） 编号 毕业设计（论文）题目千叶管理信息系统批发销售管理 二级学院 应用技术学院 专 业 会计学 班 级 107216201 学生姓名 冉黎黎 学号10721620151 指导教师 陈 旭 评阅教师 时 间 2011年5月 毕业论文写作声明毕业论文题目： 千叶管理信息系统批发销售管理 本人声明所呈交的毕业论文是本人在导师指导下进行的。据我所知，除了文中特别加以标注和致谢的地方外，论文中不包含其他人已经发表或撰写过的研究成果，也不包含为获得重庆理工大学或其他教育机构的学位或证书而使用过的材料。与我一同工作的同志对本研究所做的任何贡献均

2、已在论文中作了明确的说明并表示谢意。毕业论文作者： 签字日期： 年 月 日目 录摘 要5ABSTRACT61引言71.1 研究背景71.2 研究的目的和意义71.3 本人在课题中的主要工作72 系统分析92.1可行性分析92.2业务流程分析92.3系统的功能112.3.1系统总体功能112.3.2 批发单管理功能112.3.3批发收款单管理功能112.3.4 账表管理122.4 系统数据处理流程122.5数据字典132.5.1 实体的描述132.5.2 数据存储的描述132.5.3 数据流的描述142.5.4处理的描述142.6概念设计模型153系统设计163.1数据库设计163.1.1物理模

3、型163.1.2数据库表结构173.2界面设计233.2.1.输入界面设计233.2.2输出设计234 程序设计244.1 全局变量说明244.2自定义结构244.3 PBL库说明245 系统实现265.1主要窗口设计265.2主要全局函数说明645.3主要数据窗口设计786 操作说明837 千叶管理信息系统批发销售管理937.1业务流程分析937.2功能分析957.3数据库设计967.3.1物理模型967.3.2系统所涉及的表1007.4 操作说明书1098 在测试中发现的主要问题1379 结论1379.1主要完成的工作1389.2 尚未解决的问题13810 运行环境13810.1硬件环境1

4、3910.2软件环境139参考文献139致 谢140摘 要随着信息化发展的日新月异，计算机在企业管理中应用的普及空前，利用计算机实现批发销售信息管理不再是纸上谈兵，同时软件开发技术日趋成熟，对于批发销售管理功能已经不是难题。批发销售管理系统在企业的产品开发、质量保证、供应链管理及经营管理中起着极其重要的作用。千叶眼镜连锁有限公司作为重庆最大的眼镜销售连锁企业，同样也面临着巨大的挑战。如何做好大批量的销售业务批发销售，就成为了我们的研究重点。这次以千叶管理信息系统为基础，对批发销售模块进行了分析设计，编写了操作说明书，方便了员工熟悉批发管理系统。并针对软件在功能设计、数据处理完整性及安全性方面进

5、行了系统测试，提出了有意义的解决方案，使系统得到进一步完善，提高了公司的管理效率，节约了企业资源。最后根据千叶管理信息系统开发了一个批发管理系统，系统包括批发单和批发收款单，批发应收账款等几个功能模块。在批发模块中实现了批发单和批发收款单的输入、查询、修改、记账、冲销功能和批发应收账款的查询等功能。本系统基于Windows 平台，数据库采用SQL Server 2000，利用 Power Designer建模，前台由Power Builder10.0进行开发。关键词： 千叶眼镜公司 批发销售 管理信息系统AbstractFollowing the development of the mark

6、et economy,progress on technique and increasingly fierce competition, management information has become an irresistible world trend, which fundamentally changed peoples lives in the past years. Besides, purchasing has bloomed into a cost-effective and profitable function, which can get the access to

7、 service, from the simple buying and selling of commodities. And it plays an important role in the process of the product development, quality assurance, supply chain management and operations management.As far as we are concerned, Qianye Glasses Corporation is the biggest Chongqing glasses retail c

8、hain enterprise, at the same time, it is faced with huge challenges. As a result, the starting workpurchasing，consequently became the hotspot of our research. Based on the Qianye management information system, we have analyzed and designed the purchasing module and written operating instructions, wh

9、ich will bring benefits to the stuff so that they can be more familiar with the purchasing management system. Whats more, we have conducted system tests pointing at the software function design and the data processing integrity. And weve come up with a meaningful solution, which will make the furthe

10、r improvement of the system; improve the efficiency of management of the company and save the enterprise resources. Finally, according to the Qianye management information system, we developed a purchasing management system; including the purchasing order and payment single several functional module

11、s. And weve brought out the functions of purchase orders input, queries, modification and bookkeeping, sterilization function in the purchasing module.Keywords: Qianye Glasses Corporation, wholesale, management information system1引言1.1 研究背景“批发销售管理信息系统”项目的研制开发是基于重庆千叶眼镜连锁有限公司的业务处理流程与管理模式。重庆千叶眼镜连锁有限公司是

12、全国知名的眼镜连锁企业，60多家分店遍及重庆，年营业额已过亿元。公司实力超强、设备先进、服务专业，多次被国家各级相关部门授予奖项和称号。管理工作中的决策的正确与否在很大程度上取决于信息的质量，随着市场经济的不断发展，各企业间的竞争日趋激烈，信息管理的水平越来越成为衡量一个企业公司综合实力的重要标志，我国眼镜零售行业信息化起步晚，但是发展速度快，不少眼镜连锁企业自己设计开发了适合本公司的管理信息系统，但是这些软件还不算成熟，还需要不断地改进，需要在参考这些软件的基础上，开发出适合千叶自身的系统出来。“批发销售管理信息系统”立足于千叶眼镜管理信息系统，通过实现对千叶眼镜管理信息系统的批发销售管理，

13、提高了企业的现代化管理水平。1.2 研究的目的和意义眼镜行业的批发销售管理流程比较复杂，批发销售的处理也非常具有行业特点。随着公司规模的不断展壮大，提高信息化的管理水平日显重要，本项目的研制开发对于提高重庆千叶眼镜连锁有限公司的批发销售管理水平有着极其重要的意义，同时本项目的分析设计着眼于连锁经营模式与整个眼镜行业，项目的成功研发有推广作用。重庆千叶眼镜有限公司的信息化程度较高，为了方便员工熟悉千叶批发管理信息系统，能较快的熟练操作，特编写了此说明书。 此说明书以简明扼要、易学、易懂、易掌握为原则，通过实例循序渐进地全面介绍批发管理系统的操作。还重点介绍了批发的设计思路、流程功能、实现目标和注

14、意事项，力求让操作员迅速掌握使用批发销售管理系统。1.3 本人在课题中的主要工作在课题的开发与研究过程中，主要完成的工作如下： （1）深入千叶企业进行调查，查阅收集相关资料。 （2）分析批发销售管理模块的业务流程。 （3）分析批发销售管理模块的功能。 （4）对批发销售管理模块的各个板块进行了解。 （5）在批发销售管理模块中实行输入，并进行测试和修改。 （6）写出批发销售管理模块的使用说明书。 （7）分析批发销售和批发退货的单据管理业务流程，并画出其业务流程图。 （8）编写批发销售管理模块的数据字典。 （9）对千叶眼镜管理信息系统进行分析，自己对批发单据管理模块进行程序设计。 （10）对批发单据

15、管理模块进行测试，修改。 （11）写出批发单据管理模块的说明书和数据字典，并画出其流程图。 （12）完善千叶企业管理系统和自己设计的程序的所有系统文档。8重庆理工大学毕业论文（设计） （千叶信息管理系统批发销售管理）2 系统分析2.1可行性分析 （1）操作可行性进过对千叶眼镜管理信息系统中的批发销售模块的深入了解后，又对软件的模拟操作后，对完成眼镜进销存系统中的批发销售管理模块的开发已经有能力和信心的完成这次开发。由于这个系统是为了给前台的销售人员，收银人员，以及后勤，管理人员等使用，所以系统的操作都简单易学，因此，只要有基本的操作电脑相关技能的人员都能使用。而使用人员方面没有问题，奠定了其操

16、作的可行性。 （2）经济可行性在现代电脑软件系统高速发展的年代，自主开发符合自身的管理系统更能规范企业的管理，促进企业的发展。它不但节约了购买其它系统的经费，更节约了手工操作的时间，避免了人为操作的漏洞，有利于管理者及时了解批发销售情况，及时作出相应的决策，调整战略方针，最大程度实现其经济效益，具有其经济上的可行性。 （3）技术可行性直接链接上SQL数据库，就可以在PB系统里用鼠标完成绝大部分的操作，在技术上来说，完全简单又方面，具有可行性。 （4）资源可行性学校提供了课题所需要的软件开发平台与分析设计工具，通过充分利用学校经济管理实验中心所提供的条件以及国家精品课程会计信息化网站中的实验原型

17、案例，在陈旭老师的指导以及同学们的帮助下，有信心、有条件、有能力完成任务书中下达的所有任务。 通过上面四个方面的可行性分析，再加上在陈旭老师的指导和同学们的帮助下，我有信心、有条件、有能力完成眼镜进销存系统中的批发销售管理模块的开发项目。2.2业务流程分析业务流程图符号说明：批发销售业务流程图，如图2-1所示：图2-1 批发销售业务流程批发销售流程说明：批发销售的产品都是已经入库产品，发货时需要填写批发销售单，是否有足够的货等。2.3系统的功能批发管理系统的目标决定了它不仅要有批发单管理，还要批发收款单管理。根据批发销售管理系统目标对系统功能进行分解。2.3.1系统总体功能 本人主要负责的系统

18、包含三个功能模块，分别为：批发单，批发收款单，账表管理，如下图2-2所示： 千叶眼镜商品管理信息系统批发单管理批发收款单管理账表管理图2-2 系统总功能图2.3.2 批发单管理功能 包括批发单输入、批发单查询、批发单修改、批发单记账和批发单冲销五个功能，具体如下图2-3所示：批发单管理批发单修改批发单冲销批发单记账批发单查询批发单输入 图2-3 批发单管理功能图2.3.3批发收款单管理功能批发收款单管理 包括批发收款单输入、批发收款单查询、批发收款单修改、批发收款单记账和批发收款单冲销五个功能，具体如图2-4所示：批发收款单修改批发收款单冲销批发收款单记账批发收款单查询批发收款单输入图2-4批

19、发收款单管理功能图2.3.4 账表管理 图2-5 账表管理功能图2.4 系统数据处理流程如图2-6数据流程图：图2-6数据流程图2.5数据字典2.5.1 实体的描述本方案中的实体，其描述如表2-1所示。表2-1数据流描述 编号实体名称简述实体组成输入的数据流输出的数据流E1批发部门主管产品的批发业务的部门，包括业务员、开票员和部门主管，业务员负责批发业务，主管负责审批，开票员负责批发开票。部门人员编号+姓名+密码+权限+备注批发资料、批发收款资料E2相关部门包括生产部门和信息使用的其他部门2.5.2 数据存储的描述本方案中的数据存储，其描述如表2-2所示。表2-2数据流描述数据存储编 号数据存

20、储名称简述数据存储组成相关联的处理S1未记账批发单存储未记账的批发单据单据号+序号+眼睛编码+数量+单价+折扣+金额P1S2已记账批发单存储已记账的批发单据单据号+日期+制单人+金额+记账标记+记账人P2、P5、P8S3未记账批发收款单存储未记账的批发收款单据单据号+日期+制单人+批发单据号+金额P3S4已记账批发收款单存储已记账的批发收款单据单据号+日期+制单人+批发单据号+金额+记账标记+记账人P4S5批发应收账表存储应收的账表批发单据号+序号+日期+应收金额+收款金额+金额+收款单据号P2、P4S6流水账表存储日常进销存的账表日期+商品编码+序号+单据类型+单据号+增加数量+减少数量+单

21、价+折扣P2S7商品库存表存储商品的库存表商品编码+库存P2S8进销存数量报表存储进销存数量的报表起始日期+结束日期+商品编码+期初库存数量+采购数量+销售数量+批发数量+报损数量+期末库存账面数量+盈亏数量+期末实盘数量P52.5.3 数据流的描述 本方案中的数据流，其描述如表2-3所示。表2-3数据流描述数据流编号数据流名称简述数据流来源数据流去向数据流组成D1批发资料批发单据的资料E1P1单据号+序号+眼睛编码+数量+单价+折扣+金额D2批发收款资料批发收款单据的资料E1P3单据号+日期+制单人+批发收款单据号+金额2.5.4处理的描述本方案中的数据流，其描述如表2-4所示。表2-4数据

22、流描述处理逻辑编号处理逻辑名称输入的数据流处理逻辑的描述输出的数据流处理频率P1批发单录入批发资料根据批发资料进行批发单录入S1P2批发单记账 S1对未记账批发单进行批发单记账S2、S5、S6P3批发收款单录入 批发收款资料根据批发收款单资料进行批发收款单录入S3P4批发收款单记账S3对未记账批发收款单进行批发收款单记账S4、S5P5进销存数量报表计算S2根据已记账批发单对进销存数量报表进行计算S82.6概念设计模型概要设计是根据需求分析阶段所收集到的用户需求设计数据库的概念数据模型，它是从用户角度看到的数据库。本系统涉及到的外部实体有供应商、批发商、顾客、员工等，它们直接或间接都与系统内部实

23、体产生关系，在对它们之间的关系进行详细分析的基础上绘制出实体关系图，如图2-7所示。图例说明： 图2-7 E-R图3系统设计3.1数据库设计3.1.1物理模型图3-1 基本码表图3-2单据图3-3账表 图3-4视图3.1.2数据库表结构 基于上面实体之间的关系, 即可形成数据库中的表之间的关系。现在需要将上面的实体模型转换成为实际数据库内的表,也就是数据库逻辑结构。通过对实体的表设计，方便了系统的开发，以下是每个实体的表设计，它们相对应数据库中的一个表。 (1) 表中文名称：操作员信息表，见表3-1。表 名： c_operator关 键 字：oper_code备 注：记录操作员的基本信息。表3

24、-1 操作员信息表列名中文名称类型与长度空否 说明oper_code操作员编码char(10)否操作员编码必须唯一，编码长度为10位，操作员编码必须输入，如1,、2等oper_name操作员姓名char(20)是操作员的姓名password密码char(10)是密码区分大小写dept_code部门char(10)是部门编码，以部门名称形式显示power权限char(100)是权限，如系统主管、采购等(2) 表中文名称：部门信息表，见表3-2。表 名：c_dept关 键 字：dept_code备 注：表示部门的信息。表3-2 部门信息表列名中文名称类型与长度空否 说明dept_code部门编码c

25、har(10)否部门编码必须唯一，编码长度为10位，部门编码必须输入，初始化取值为：01、02、03、04、05dept_name部门名称char(50)是初始化取值为：采购部、销售部、批发部、加盟部、库房(3) 表中文名称：往来单位信息表，见表3-3。表 名：c_supp关 键 字：supp_code，supp_name备 注：表示往来单位的基本信息。表3-3 往来单位信息表列名中文名称类型与长度空否 说明supp_code往来单位编码char(10)否往来单位编码必须唯一，编码长度为十位，往来单位编码必须输入supp_name往来单位名称char(100)否往来单位名称不能为空zip邮编c

26、har(6)是往来单位的邮编addr地址char(100)是往来单位的地址tel电话char(20)是往来单位的电话fax传真char(20)否往来单位的传真email电子邮箱char(100)是往来单位的电子邮箱web网址char(100)是往来单位的网址account账号char(30)是往来单位的账号bank开户行char(100)是往来单位的开户行(4) 表中文名称：产地信息表，见表3-4。表 名：c_aero关 键 字：aero_code备 注：表示产地的信息。表3-4 产地信息表列名中文名称类型与长度空否 说明aero_code产地编码char(10)否商品产地编码必须唯一，编码长

27、度为10位，商品产地编码必须输入aero_name产地名称char(100)是产地的名称(5) 表中文名称：商品信息表，见表3-5。表 名：c_goods关 键 字：goods_code备 注：表示商品的基本信息。表3-5 商品信息表列名中文名称类型与长度空否 说明goods_code商品编码char(13)否商品编码必须唯一，编码长度为13位，商品编码必须输入，编码第一位显示商品种类goods_name商品名称char(60)是商品的名称sort_code商品种类char(2)是商品种类编码，以商品种类名称形式显示Model规格型号char(50)是商品的规格型号unit_code记量单位c

28、har(2)否计量单位编码，以计量单位名称形式显示unit_code零售价decimal(8,2)是默认为采购与销售时的单价price_plan计划价decimal(8,2)是企业计划采购价格aero_code产地char(10)是商品产地编码，以商品产地名称形式显示supp_code供应商char(10)是供应商编码， 以供应商名称形式显示note备注varchar(200)否对商品属性的解释说明photofile图片char(100)是商品的图片(6) 表中文名称：商品种类表，见表3-6。表 名：c_sort关 键 字：sort_code备 注：表示商品种类的信息。表3-6 商品种类表列名

29、中文名称类型与长度空否 说明sort_code商品种类编号char(2)否商品种类编码必须唯一，编码长度为2位，商品种类编码必须输入。sort_name商品种类名称char(50)是商品种类的名称(7) 表中文名称：计量单位表，见表3-7。表 名：c_unit关 键 字：unit_code 备 注：表示计量单位的信息。表3-7 计量单位表列名中文名称类型与长度空否 说明unit_code计量单位编码Char(2)否商品计量单位编码必须唯一，编码长度为2位，商品计量单位编码必须输入unit_name计量单位名称Char(20)是计量单位的名称（8）表中文名称：批发单，见表3-8。 表 名：SHE

30、ET_PF_MAIN，SHEET_PF_ITEM 关 键 字：SHEETID，SHEETID，ITEMNO 备 注：包括批发单主项、批发单明细项信息表。用于在批发销售过程中，根据批发商购买商品的信息，进行全面详细记载的单据。将会对流水账表、商品库存表的增减变动状况产生影响。 表3-8-1 批发单主项 列名列名称数据类型关键字不为空说明SHEETID单据号char(13)单据号必须唯一，编码长度为13位，单据号必须输入，批发单据号由系统自动增加，格式为三位字符，如001SHEETDATE日期datetime批发业务发生的日期OPER_CODE制单人char(10)默认为登入系统的操作员编码MON

31、E金额decimal(10,2)批发商品的总金额FLAG_JZ记账标记char(2)取值为：是、否MAN_JZ记账人char(10)默认为登入系统的操作员编码NOTE备注varchar(200)对批发业务进行解释说明表3-8-2 批发单明细项列名列名称数据类型关键字不为空说明SHEETID单据号char(13)单据号必须唯一，编码长度为13位，单据号必须输入，批发单据号由系统自动增加，格式为三位字符，如001ITEMNO序号int序号必须唯一，必须输入，序号用以记录同一单据号的多项商品明细GOODS_CODE商品编码char(13)商品的编码AMOUNT数量int商品购买数量PRICE单价de

32、cimal(8,2)由系统根据商品编码自动填入入，金额为商品售价DISCOUNT折扣decimal(5,3)批发商品的折扣金额MONE金额decimal(10,2)计算方法：金额=数量*单价*折扣NOTE备注varchar(200)对每项商品的批发情况进行的解释说明（9）表中文名称：批发收款单，见表3-9。 表 名：SHEET_PFSK 关 键 字：SHEETID 备 注：用于收取批发商欠款所输入的单据，该单据记账可勾对批发商应收账表。 表3-9 批发收款单列名列名称数据类型关键字不为空说明SHEETID单据号char(13)单据号必须唯一，编码长度为13位。单据号必须输入SHEETDATE日

33、期datetime批发收款发生日期OPER_CODE制单人char(10)默认为登录系统的操作员编号SHEETID_XS销售单据号char(13)批发销售时的单据号MONE金额decimal(10,2)批发收款的金额FLAG_JZ记账标记char(2)取值为：是、否MAN_JZ记账人char(10)默认为登录系统的操作员编号NOTE备注varchar(200)对收款情况进行解释说明 （10）表中文名称：批发应收账表，见表3-10. 表 名：REPORT_PFYS_MONE 关 键 字：SHEETID_XS，ITEMNO 备 注：由批发单和批发收款单所影响。 表3-10 批发应收账表 列名列名称

34、数据类型关键字不为空说明SHEETID_XS销售单据号char(13)批发销售的单据号ITEMNO序号int序号必须唯一，序号必须输入SHEETDATE日期datetime批发收款时候的日期MONE_YS应收金额decimal(10,2)批发应收金额MONE_SK收款金额decimal(10,2)实收金额MONE_YE余额decimal(10,2)计算方法：余额=应收金额-实收金额SHEETID_SK收款单据号char(13)批发收款的单据号NOTE备注varchar(200)对单据进行解释说明 （2）表中文名称：流水账表，见表3-11. 表 名：GOODS_RECORD 关 键 字：SHEE

35、TDATE，GOODS_CODE，ITEMNO 备 注：表示商品库存数量和金额的账表。表3-11 流水账表列名名称数据类型关键字不为空说明SHEETDATE日期datetime日期必须唯一，表示经济业务发生的日期GOODS_CODE商品编码char(13)商品编码必须唯一，编码长度为13位，商品编码必须输入ITEMNO序号int对同一日期、同一商品编号的商品进销存情况进行排序SHEETTYPE单据类型char(10)取值为：采购、销售、报损、批发、加盟、盘存SHEETID单据号char(13)经济业务发生的单据号AMOUNT_ADD增加数量int经济业务发生后，导致商品增加数量AMOUNT_S

36、UB减少数量int经济业务发生后，导致商品减少数量PRICE单价decimal(8,2)商品单价DISCOUNT折扣decimal(5,3)商品折扣，与单据上折扣一致（3）表中文名称：商品库存表，见表3-12。 表 名：GOODS_AMOUNT 关 键 字：GOODS_CODE 备 注：表示商品及时库存数量账表。表3-12 商品库存表列名名称数据类型关键字不为空常用值GOODS_CODE商品编码char(13)商品编码必须唯一，编码长度为13位，必须输入AMOUNT库存int商品的账面库存数量3.2界面设计3.2.1.输入界面设计输入设计对系统的质量有着决定性的重要影响。输入数据的正确性直接决

37、定处理结果的正确性，如果输入数据有误，即使计算和处理十分正确，也无法获得可靠的输出信息。同时，输入设计是系统与用户之间交互的纽带，决定着人机交互的效率。在输入设计中，提高效率和减少错误是两个最根本的原则。批发销售管理系统的输入主要包括商品编码、数量、批发单据号，金额等主项和明细项的输入，批发单输入、批发收款单输入、操作员信息输入以及各单据修改、删除、记账、冲销。3.2.2输出设计批发销售管理系统的输出主要包括操作员信息查询、批发单查询、批发收款单查询、批发应收账表查询、流水账查询及商品库存表查询等等。4 程序设计4.1 全局变量说明变量名数据类型作用g_oper_codestring操作员编码

38、g_datedate系统日期g_date_ini=2000-01-01date初始化日期4.2自定义结构结构名说明结构组成变量名定义类型s_strings用于修改单据时传递单据类型、单据号string1字符1stringstring2字符2string4.3 PBL库说明项 目说 明应 用数据窗口全局函 数菜 单结 构窗 口 批发应收账表查询窗口 批发单据（双表）修改窗口 批发单据（双表）输入窗口 批发单据（单表）修改窗口 批发单据（单表）输入窗口 批发单据记账窗口 批发单据修改窗口 批发单据查询窗口 批发单据冲销窗口5 系统实现5.1主要窗口设计5.1.1.系统登录窗口w_log设计说明项目

39、说明窗口名W_log所在PBL库jxc.pbl功能系统登录界 面设 计cb_closest_datest_passwordst_oper_codeW_logem_datesle_passwordsle_oper_codecb_ok 窗口控件说明 控件类型控件名控件名称说明命令按钮cb_ok确定登录系统命令按钮cb_close退出退出登录窗口单行编辑框sle_oper_code输入操作员编号单行编辑框sle_password输入操作员密码静态文本框st_oper_code操作员编号静态文本框st_password操作员密码事件 脚本w_logopen！integer r_countem_date

40、.text=string(today(),yyyy-mm-dd)/当系统中无操作员时，默认添加一个名称为“管理员”的操作员，便于启动系统select count(*) into :r_count from c_operator;if r_count=0 then insert into c_operator( oper_code, oper_name,password, dept_code,power) values(1, 管理员, 1, , 超级用户);end ifcb_okclicked!string r_passinteger r_count/用户合法性判断g_oper_code=sle

41、_oper_code.textr_pass=sle_password.textselect count(*) into :r_count from c_operator where oper_code=:g_oper_code and password=:r_pass ;if r_count0 theng_date=date(em_date.text)open(w_jxc) /进入进销存管理系统close(parent)elsemessagebox(提示,输入错误，请重新输入！)end ifcb_closeclicked!close(parent)5.1.2批发单窗口w_sheet_inser

42、t_pf的设计说明 项 目说明窗口名w_sheet_insert_pf所在的PBL库jxc.pbl功能实现批发单的输入dw_maindw_item 界 面 设 计cb_resetcb_closecb_updatecb_deletecb_insert窗口控件说明控件类型控件名控件名称说明命令按钮cb_insertH增加明细增加销售信息命令按钮cb_deleteS删除明细删除销售信息命令按钮cb_resetF复位明细恢复未输入前的信息命令按钮cb_updatB保存保存单据信息命令按钮cb_closeT退出退出单据系统数据窗口dw_main输入新增主项数据数据窗口dw_item显示新增明细项数据事件

43、脚本w_sheet_insert_pfopen!i_type=message.stringparmchoose case i_typecase sheet_cg_main /采购单dw_main.dataobject=dw_sheet_cg_main_freedw_item.dataobject=dw_sheet_cg_item_grid i_title=采购单case sheet_xs_main /销售单dw_main.dataobject=dw_sheet_xs_main_freedw_item.dataobject=dw_sheet_xs_item_grid i_title=销售单cas

44、e sheet_bs_main /报损单dw_main.dataobject=dw_sheet_bs_main_freedw_item.dataobject=dw_sheet_bs_item_grid i_title=报损单case sheet_pf_main /批发单dw_main.dataobject=dw_sheet_pf_main_freedw_item.dataobject=dw_sheet_pf_item_grid i_title=批发单 case sheet_jm_main /加盟销售单dw_main.dataobject=dw_sheet_jm_main_freedw_item

45、.dataobject=dw_sheet_jmxs_item_grid i_title=加盟销售单end choosedw_main.settransobject(sqlca)dw_item.settransobject(sqlca)this.title=i_title+输入/控制不能修改的列dw_main.SetTabOrder(flag_jz, 0)/记账标记dw_main.SetTabOrder(man_jz, 0)/记账人/新增单据cb_newsheet.triggerevent(clicked!)/将“新单据”按钮隐藏cb_newsheet.visible=falsecb_inser

46、tclicked!integer r_rowr_row=dw_item.insertrow(0)dw_item.scrolltorow(r_row)dw_item.selectrow(0,false)dw_item.selectrow(r_row,true)dw_item.setitem(r_row,sheetid,i_sheetid)/明细项单据号dw_item.setitem(r_row,itemno,r_row)/明细项序号dw_item.setitem(r_row,amount,0)/数量dw_item.setitem(r_row,price,0)/单价dw_item.setitem(

47、r_row,mone,0)/金额choose case i_typecase sheet_xs_main dw_item.setitem(r_row,discount,1) /只有销售单设置了折扣列case sheet_pf_main dw_item.setitem(r_row,discount,1) /只有批发单设置了折扣列end choose/聚焦商品编码列dw_item.setfocus()dw_item.SetColumn ( goods_code)cb_deleteclicked!/删除当前行integer r_yesno,r_rowr_row=dw_item.getrow()/当前

48、行if not r_row0 then returnr_yesno=messagebox(提示,是否真要删除第【+string(r_row)+】行？,exclamation!,yesno!,2)if r_yesno=2 then returndw_item.deleterow(r_row)wf_itemno()/明细项序号处理wf_mone()/主项中的金额处理cb_resetclicked!dw_item.reset()wf_mone()/主项中的金额处理cb_updateclicked!integer r_yesno,r_net1,r_net2,r_row,r_rowcountstring

49、 r_sheetiddw_main.accepttext()dw_item.accepttext()if not(dw_main.modifiedcount()0 or dw_main.deletedcount()0 &or dw_item.modifiedcount()0 or dw_item.deletedcount()0) then return/判断数据窗口中的数据是否被更改或删除r_yesno = MessageBox(提示, 是否真的保存？, Exclamation!, yesno!, 2)if r_yesno = 2 then returnr_rowcount=dw_item.r

50、owcount()/明细项单据号处理r_sheetid=dw_main.getitemstring(1,sheetid)for r_row=1 to r_rowcountdw_item.setitem(r_row,sheetid,r_sheetid)nextwf_itemno() /明细项序号处理wf_mone() /主项中的金额处理/更新r_net2=dw_item.update()r_net1= dw_main.update()if r_net10 and r_net20 thenmessagebox(提示,保存成功！)cb_newsheet.triggerevent(clicked!)e

51、lsemessagebox(提示,保存失败！)returnend ifcb_closeclickedclose(parent)cb_8clickedclose(parent)dw_mainitemchangedstring r_colname,r_sheetidinteger r_rowthis.accepttext()r_row=this.getrow()if not r_row0 then returnr_colname=this.getcolumnname()choose case r_colnamecase sheetid/判断单据号是否可用r_sheetid=this.getitem

52、string(r_row,sheetid)if gf_sheetid_check(i_type,r_sheetid) thenmessagebox(提示,单据号【+r_sheetid+】已经使用，建议使用单据号【+i_sheetid+】)this.setitem(r_row,sheetid,i_sheetid)return 1end ifcase elsereturnend choosedw_itemclickedif row0 thenthis.setrow(0)this.selectrow(0,false)this.selectrow(row,true)end if5.1.3.批发单、批发收款单查询窗口w_sheet_retrieve_pf的设计说明项目说明窗口名 w_sheet_retrieve_pf所在PBL库jxc.pbl功能实现批发单据，批发收款单据的查询功能sle_sheetid_minem_mone_maxem_mone_min界 面设 计sle_countdw_tablecb_retrievecb_closecb_resetdw_oper_codeem_date_minsle_sheetid_maxem_date_max窗口控件说明控件类型控件名控件名