大型机-COBOL大作业-COBOL练习汇总 - 图文

Cobol大作业

班级 姓名 学号 2011-4-25

实验目的

1. 学会编写COBOL程序对输入数据按指定的要求处理，得到符合要求的规范的报表。 2. 熟练掌握COBOL中文件处理的方式，使用READ和WRITE对文件中的记录进行读

取和处理。

3. 会使用SORT和MERGE对文件及其数据进行处理，实现文件中数据的排序以及多个

文件的合并操作。

4. 会使用TABLE对数据进行处理，掌握对TABLE中的数据的访问。 5. 掌握PERFORM语句的使用，包括对数据的访问核对循环的处理。

6. 了解系统函数的使用方法及其功能，在必要的时候调用系统函数，实现对应的功能。 7. 学会对数据进行正确处理，包括怎样定义数据及处理异常数据等。

实验内容

1. 编辑一个关于公司销售情况输入文件，输入文件包含的数据记录有分公司号、销售代表号、分公司名、当年销售情况、去年销售情况，将公司的销售情况按指定格式做一个统计然后输出到指定文件中。

2. 更新数据时，将原来的输入文件与更新的数据进行合并，得到一个新的输入文件，仍旧按指定的格式处理输入数据后输出到指定文件中。

3. 使用表处理，将文件中相似的记录用表实现，使处理的过程更加方便。 4. 处理数据的异常情况，包括数据错误、溢出的情况。

设计过程

1. 在编辑数据的过程，使用了READ和WRITE对文件进行了操作，读取输入文件中的数据并进行处理。

2. 编辑数据时，使用了表对文件中的记录进行存储和处理，并按指定格式输出编辑后的结果。

3. 在数据处理的过程中，会检测数据的合法性，对于不合法的数据报错或进行相应的其它处理。

4. 更新数据时，创建一个用于存放更新数据的文件COBOL.UPDATE、一个中间文件COBOL.MERGE和一个用于存放输出结果COBOL.UPINPUT的文件，将输入文件中的数据进行更新后结果存放在创建的新文件COBOL.UPINPUT中。

实验步骤

1. 编写代码，实现对输入文件COBOL.INPUT的处理，输入文件中的数据如下：

2. 程序的主要处理过程如下：

3.编译程序，运行成功后，在COBOL.OUTPUT中查看输出结果，得到处理后的报表，如下：

3. 创建数据集COBOL.UPDATE、COBOL.UPINPUT，分别存放需要更新的数据和更新后得到的数据，COBOL.UPDATE中的数据如下：

4. 将输入数据集更新后得到一个新的数据集，更新的数据存放在COBOL.UPINPUT中，在源程序中需要对输入数据集进行处理，以得到更新后的数据，处理的过程如下：

5. 更新后运行程序，在COBOL.UPINPUT中便得到了一个新的输入文件，内容如下，可以看到，输入数据中增加了更新后的内容。

6. 在原来的源程序中添加代码，实现对COBOL.UPINPUT中的数据进行处理的过程，处理后按报表的格式输出，添加的代码如下：

7. 编译程序，并运行编译后的JCL，在COBOL.OUTPUT中查看最终结果，如下，可以看到更新文件中的数据也显示在最终结果中了。

实验总结

本次实验共有三个输入文件，COBOL.INPUT、COBOL.UPDATE

和

COBOL.UPINPUT，其中COBOL.INPUT用于存放初始的输入数据，COBOL.UPDATE用于存放需要更新的数据的信息，而COBOL.UPINPUT则用于存放更新后的输入数据。为了完成对数据的更新，以完成更新后数据的合并，需

要创建一个中间文件，本程序中的COBOL.MERGE。另外，在对数据合并时，必须保证合并的输入文件必须是经过正确排序的，不然合并不会得到正确的结果。

在文件的处理过程中，必须保证创建的文件的纪录长与程序中定义的纪录长一致，不然程序将不会正常运行。输入文件中的数据备存放在定义的TABLE中，表的长度必须足够长，以至于能处理所有输入的数据。

本文来源：https://www.bwwdw.com/article/ig5g.html