CHAPTER 6 过程部之三——执行语句(PERFORM)
一。执行语句的作用:在一个COBOL程序中,过程部中往往有一部分语句需要执行多次。为了让重复的部分在程序中只出现一次,可以把重复的部分单独写成一段或一节(有一个段名或节名),每次执行这部分语句时转去该段,执行完转回来。这时候就需要用到执行语句(PERFORM )。?
二。执行语句的一般形式:?
??????????? PERFORM?????????? 过程名1??????? [THRU]??????????????? 过程名2?
三。使用PERFORM语句实现循环:?
? 1。?PERFORM?????????? 过程名1??????? [{THRU}??????????????? 过程名2?? ]??????? 整数???????? TIMES?
???????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????? 标识符?
????????
?2。?PERFORM?????????? 过程名1??????? [{THRU}??????????????? 过程名2?? ]??????? UNTIL???? 条件
?3。?PERFORM?????????? 过程名1??????? [{THRU}??????????????? 过程名2?? ]????????
??VARYING??? 标识符1??????? FROM?? 常数1??????? BY?????? 常数2???????????? UNTIL?? 条件?
??????????????????????????????????????????????????????????????????? ? 标识符2??????????????????????????? 标识符3?
四。执行语句的多重循环形式:COBOL 允许三重循环,其一般格式可写为:?
?PERFORM????????? 过程名1??????? [{THRU}??????????????? 过程名2?? ]????????
??[VARYING?? 参数1??????? FROM?? 初值1??????? BY?????? 步长1???????????? UNTIL?? 条件1 ]?
??[AFTER???????? 参数2??????? FROM?? 初值2??????? BY?????? 步长2???????????? UNTIL?? 条件2 ]?
??[AFTER???????? 参数3??????? FROM?? 初值3??????? BY?????? 步长3???????????? UNTIL?? 条件3 ]?
五。出口语句(EXIT):EXIT语句提供了一组过程的公共出口,即指出了被调用过程的逻辑终点。