COBOLⅠ-第3章 PROCEDURE DIVISION(中文翻译版)

《COBOLⅠ-第3章 PROCEDURE DIVISION(中文翻译版)》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第三章3．1例题1第二章，学习了DATADIVISION。这一章我们学习PROCEDUREDIVISION的写法。在这里，再一次认一下例题。⑴输入输出数据形式（a）输入数据形式(b)输出数据形式⑵处理标准②输入文件以50记录/存储块为单位输出③单价，采购数量，采购额以PACK形式输出④采购额用下列公式求出采购额=单价*采购数量3．2数据处理的流程和PAD刚开始，先考虑1条记录的处理问题。然后试着考虑让这个处理反复进行，直到全部记录处理完为止。433．2．11条记录的处理⑴1条记录处理的顺序在主存储器中，根据DATADIVISIO

2、N中的FILESECTION写的记录记述，设定为保存输入记录的输入区域，和为保存输出记录的输出区。记录处理，使用这些区域的数据，按下面的步骤进行作业。①采购数据输入②～⑤输入区域的商品编号，商品名，单价，进货数量等数据移动到输出区域。这时，将单价和进货数量的数据从ZONE形式转换成PACK形式⑥单价乘以采购数量，即采购额。⑦输出区域中的所有数据都备齐了之后，向采购文件进行输出。（2）处理1条记录的PAD在第一章我们已经学习过，PAD是用3种记录符号。使用这些符号，有下面3种处理的基本模式。处理在符号中表示处理　　　　　　　根据处

3、理的顺序，从上向下书写符号反复（循环）反复（循环）符号的中间记述着反复的条件反复处理写在右边43选择选择符号中写着选择的条件满足条件，按上方进行处理不满足条件，按下方进行处理用PAD表示例题的处理顺序①纪录的输入在表示输入记录时，标记READ及输入文件的名称②数据的移动表示数据移动时，指明移动项目和移动目的地项目。③记录的输出表示输出记录时，标明WRITE和输出文件名用PAD表示处理顺序时，从上到下画一条线，沿着条线从上到下的顺序就是处理的顺序，并写出基本的模式。43　　　像这样，一连串的处理以怎么样的顺序进行都可以的时候，可以

4、将它们都归纳成1个符号中。3．2．2记录处理的循环⑴循环处理在入力文件中的采购数据中，因为有很多条输入纪录，所以必须每个记录都以同样的顺序进行处理。同样的处理反复进行时，处理顺序只写1次，直接用循环符号来表示这一操作反复进行。反复处理，直到输入的记录全部处理完毕，在反复符号中写上“直到文件结束”这一条件。⑵第一件记录的输入，第二件以后记录的输入使用反复符号记述的反复处理，先检查条件，条件没满足之前、执行循环处理。在例题里，检查输入文件的记录是否都读完了（文件结束），没读完就进行一连串的处理。然后再检查，没读完再处理，循环往复。4

5、3①但是，输入数据是否读完，不试着输入记录是检查不出来的。为此在我们检查输入数据是否读完前，最开始需要先读入一条记录。②检查输入数据是否读完。③虽然正在循环中，但是因为第一件记录已经输入，所以处理顺序就变成了移动，计算，输出这样的顺序。④因为1个记录已经处理完成，输入下面的记录（输入二条以后的记录）在所有的数据被处理完之前，按②-③-④的顺序进行反复。第一件记录是在进行反复处理前输入，第二条以后的记录，在循环处理中的最后输入。3.2.3　数据的结束和エンドフラグ所谓的数据结束，是在输入文件的记录时，没有数据则被认定为结束。此时，

6、为了让循环处理可以结束时用了エンドフラグ这一项目。43⑴エンドフラグ事先定义エンドフラグ（Endflag）的标志位。根据输入数据的状态，在程序中采用以下值。エンドフラグ的内容输入记录未读完之前……0输入数据全部读完后……1数据是否读完，就可以根据エンドフラグ判断。エンドフラグ为1时表示数据全部结束，因此，循环操作一直进行到エンドフラグ为1。⑵PAD的写法（a）数据结束的判断对于数据结束来说，输入数据时，计算机能自动判断。在PAD中READ之后写选择的部分，条件中写上ATEND。选择的上侧，是数据完了后的处理，下侧是数据未完时的处

7、理。在COBOL中，READ以及ATEND在一起配套来进行一连串的处理。（b）エンドフラグ处理的PAD在3、2、2的PAD中追加エンドフラグ处理。最开始的一件记录输入之前，エンドフラグ的最初值为0。而在1件与2件以后的记录输入处理，要追加[当输入数据全部读完后，エンドフラグ设为1]的处理。数据还未读完时，エンドフラグ的数字一直保持为0。条件不成立时的处理不必写。反复的条件为[到エンドフラグ为1为止43在PAD中，0或1用‘’围起来，叫文字定数（常数）。在COBOL中文字定数一定要用引用号围起来，文字定数在3、5、2中学习。第一件

8、记录输入时出现ATEND的现象时，不进行循环操作，而进入下一步的处理。第二件以后的记录出现ATEND时，就结束循环。3.2.4文件的准备与结束在输入输出数据前和后，都需要进行文件的准备和结束。⑴打开处理在数据进行输入输出之前，必须保证文件处于可以输入输出的状态。