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语句提供了一组过程的公共出口,即指出了被调用过程的逻辑终点。

posted @ 2005-01-05 22:28  epan  阅读(5481)  评论(11编辑  收藏  举报