条件ステートメント
条件ステートメントは、条件の真理値を判別すること、そしてオブジェクト・プログラムの次に取るべき処置がこの真理値によって決まることを指定します。 (条件式を参照。)
図 1 には、条件ステートメントである COBOL ステートメント、または条件が含まれていて (例 : ON SIZE ERROR または ON OVERFLOW)、 かつそのステートメントが明示範囲終了符号によって終了しないときに条件ステートメントになる COBOL ステートメントを列挙しています。
図 1. 条件ステートメント
Arithmetic Ordering
ADD...ON SIZE ERROR RETURN...AT END
ADD...NOT ON SIZE ERROR RETURN...NOT AT END
COMPUTE...ON SIZE ERROR
COMPUTE...NOT ON SIZE ERROR
DIVIDE...ON SIZE ERROR
DIVIDE...NOT ON SIZE ERROR
MULTIPLY...ON SIZE ERROR
MULTIPLY...NOT ON SIZE ERROR
SUBTRACT...ON SIZE ERROR
SUBTRACT...NOT ON SIZE ERROR
データの操作 サブプログラム・リンケージ
STRING...ON OVERFLOW CALL...ON OVERFLOW
STRING...NOT ON OVERFLOW CALL...ON EXCEPTION
UNSTRING...ON OVERFLOW CALL...NOT ON EXCEPTION
UNSTRING...NOT ON OVERFLOW
IBM Extension XML GENERATE...ON EXCEPTION
XML GENERATE...NOT ON EXCEPTION
XML PARSE...ON EXCEPTION
XML PARSE...NOT ON EXCEPTION End of IBM Extension
判断 テーブル処理
IF SEARCH...WHEN
EVALUATE
Input/Output
ACCEPT...ON EXCEPTION READ...NO DATA
ACCEPT...NOT ON EXCEPTION REWRITE...INVALID KEY
DELETE...INVALID KEY REWRITE...NOT INVALID KEY
DELETE...NOT INVALID KEY START...INVALID KEY
DISPLAY...ON EXCEPTION START...NOT INVALID KEY
DISPLAY...NOT ON EXCEPTION WRITE...AT END~OF~PAGE
READ...AT END WRITE...NOT AT END~OF~PAGE
READ...NOT AT END WRITE...INVALID KEY
READ...INVALID KEY WRITE...NOT INVALID KEY
READ...NOT INVALID KEY