文档介绍：一个 COBOL 的编程实例处理概要通常一个程序分为几个处理过程, 然后有序地组合起来使用, 以实现我们所希望的处理结果。这里,给出一个销售公司对销售数据处理的范例,通过实际的编程,掌握 COBOL 编程的技巧和步骤。销售数据处理系统简介?用户需求(1) 某销售公司有若干个销售商店, 公司想获得每个商品的销售去向和每个商店的销售额等信息。(2) 商品的库存管理在一个固定地方进行管理。经营者为掌握库存销售情况, 想及时获得有关定货信息。为满足上述( 1 )和( 2 )的需求,首先: 1 需要具体地确定什么样的信息,采用什么样的手段来获取。例如,定货信息包含什么内容、日处理做什么、月处理做什么等。 2 需要搞清为获取①中所需信息,什么样的数据适合作为输入数据来使用。 3 决定②中数据文件格式, 讨论处理顺序, 进而决定程序处理所用的文件。(过程设计、文件设计) 4 处理过程中,如果需要进行数据合并、排序的话,必须进行数据代码化处理(代码设计) 根据上述思考,决定编程的具体工作。此例题是一个批处理例题。既将每周一次从销售店收集到的销售数据进行汇总合计, 作成销售额统计表,然后根据销售额统计表获取库存主文件、供货商主文件信息后打印定货清单。注:此程序的部分编程技巧不是最优,但可以分为如下四个处理步骤来实现。?处理步骤 1 :数据合法性检查和排序处理从商店获取的数据可能有非法数据,所以必须进行数据合法性检查。对查出的错误数据,将其打印到“错误数据清单”上并要求修改这些错误数据。对检查无误(正确)的数据,按商品代码进行排序,以便进行后续处理。?处理步骤 2 :统计报表的制作将输入的销售信息作成统计表。统计表上要打印出各商店按商品代码汇总的销售额, 并把商店总销售额用”*”表示出来。?处理步骤 3 :更新处理库存主文件把按商品代码排序的销售文件作为交易,更新库存主文件的当前库存量。由于在销售文件中,可能存在同一商品代码的多条数据记录,所以需要做 N:1的数据合并处理。?处理步骤 4 :制作定货清单在处理步骤 3中, 当新库存主文件产生的同时, 要将当前库存量与最低库存量进行比较后,将需要定货的商品代码清单打印出来。程序框图(按商品代码排序) 处理步骤 1 (按商品代码排序) (按商店代码、商品代码的顺序排列) 处理步骤 3 (顺序文件) 处理步骤 2 分两步按各商店代码、各商品代码汇总销售额销售文件记录格式(供货商代码排序) 库存主文件记录格式(索引文件) 处理步骤 4 (随机处理) 供货商主文件记录格式销售数据数据合法性检查、排序销售文件错误数据清单库存主文件更新库存主文件定货信息文件新在库主文件定货信息文件供货商主文件销售文件销售文件排序(服务程序) 比较处理定货清单排序(服务程序) 编制统计表统计表商品代码销售金额销售数量商店代码 X (6) 9 (7) 9 (6) X (2) 商品代码当前库存最低库存供货商代码 X(6) 9 (8) 9 (8) X (6) 供货商代码开户银行代码供货商名其它 X(6) X (3) X (20) X (31) 数据合法性检查和排序处理处理步骤 1: 问题1 阅读如下处理内容,编制处理步骤 1 的流程图。[ 处理内容] 处理步骤 1 就是先前所述的一系列处理程序的入口, 它为后续处理提供必要的数据。具体说来,就是对输入文件的数据进行合法性检查和排序处理。?数据检查项有如下 3 种: 1 销售金额的数据合法性检查 2 销售数量的数据合法性检查 3 商店代码存在与否的检查对第③项加以说明, 如果在商店代码参数表中无法查到所读入的商店代码, 则认为所读入的商店代码无效。检查出的所有错误数据都要输出到“错误数据清单”上。一条数据记录有多个数据项出现错误时,要对每个数据项进行标识,并在其数据项后打印“*”。?处理步骤 1 的输入/ 输出数据格式如下所示, 输入文件的各记录上写明了每个商店的商店代码。销售文件的记录格式销售文件的记录格式商品代码销售金额销售数量商店代码 X (6) 9 (7) 9 (6) X (2) ★输出文件的格式与输入文件的格式相同?错误数据清单的输出格式如下所示,每页打印 15 条记录。错误数据打印格式标题空一行明细行错误标识行空一行 E R R O R C H E C K L I S T A