CALL LOOP operand1 [operand2] ...40 |
statement  |
END-LOOP |
CALL LOOP operand1 [operand2] ...40 |
| statement |
[LOOP] |
このドキュメントでは、次のトピックについて説明します。
構文図で使用されている記号については、「構文記号」を参照してください。
関連ステートメント：CALL | CALL FILE | CALLNAT | DEFINE SUBROUTINE | ESCAPE | FETCH | PERFORM
関連機能グループ：「プログラムおよびルーチンの呼び出し」
CALL LOOP ステートメントは、Natural 以外のプログラムを呼び出す処理ループを生成します。
CALL ステートメントとは異なり、CALL LOOP ステートメントは、処理ループ内で繰り返し Natural 以外のプログラムを呼び出します。 CALL 処理の詳細については、CALL ステートメントを参照してください。
ステートメント AT BREAK、AT START OF DATA、および AT END OF DATA を、CALL LOOP 処理ループ内で使用することはできません。
オペランド定義テーブル：
| オペランド | 構文要素 | フォーマット | ステートメント参照 | ダイナミック定義 | ||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| operand1 | C | S | A | 可 | 不可 | |||||||||||||||
| operand2 | C | S | A | G | A | U | N | P | I | F | B | D | T | L | C | 可 | 可 | |||
構文要素の説明：
| operand1 | 呼び出される Natural プログラムの名前は、定数または変数で指定できます。プログラムロジックによって呼び出すプログラムが異なる場合は、長さ 1～8 の英数字の変数として指定します。 変数では、プログラム名を左詰めで指定する必要があります。 |
|---|---|
| operand2 | CALL LOOP ステートメントは、最大 40 個までのパラメータを受け渡すことができます。 パラメータリストの構成は、CALL ステートメントと同じです。 パラメータリストのフィールドは、CALL LOOP ステートメント自体で最初に定義するか、または事前に定義しておくことができます。
|
| statement ... | CALL LOOP ステートメントによって開始された処理ループは、ESCAPE ステートメントで終了する必要があります。
|
| END-LOOP | Natural 予約語 END-LOOP を使用して、処理ループを閉じる必要があります。
|
DEFINE DATA LOCAL
1 PARAMETER1 (A10)
END-DEFINE
CALL LOOP 'ABC' PARAMETER1
IF PARAMETER1 = 'END'
ESCAPE BOTTOM
END-IF
END-LOOP
END