PERFORM BREAK [PROCESSING ] [(r)]
|
AT BREAK statement
|
このドキュメントでは、次のトピックについて説明します。
構文図で使用されている記号については、「構文記号」を参照してください。
関連ステートメント:ACCEPT/REJECT | AT BREAK | AT START OF DATA | AT END OF DATA | BACKOUT TRANSACTION | BEFORE BREAK PROCESSING | DELETE | END TRANSACTION | FIND | GET | GET SAME | GET TRANSACTION DATA | HISTOGRAM | LIMIT | PASSW | READ | RETRY | STORE | UPDATE
関連機能グループ:「データベースへのアクセスと更新」
PERFORM BREAK PROCESSING
ステートメントは、自動ブレイク処理が設定されない FOR
、REPEAT
、CALL LOOP
、および CALL FILE
ステートメントで生成されるループ内にブレイク処理を設定するために使用します。または、ユーザー開始のブレイク処理が必要な場合に使用します。 レコードが読み取られた直後に実行される自動ブレイク処理とは異なり、PERFORM BREAK PROCESSING
ステートメントは、プログラムの通常の流れの中で出現したときに初めて実行されます。
このステートメントでは、(コントロールフィールドの値に基づいて)ブレイク処理の条件をチェックし、Natural システム関数を評価します。 このチェックおよびシステム関数の評価は、実行対象のステートメントが出現するたびに行われます。 このステートメントは、IF
ステートメントで指定した条件に応じて実行することもできます。
(r) |
ステートメント参照表記:
デフォルトでは、プログラム、サブプログラム、またはサブルーチンの実行終了時に最後の 表記 |
---|---|
AT BREAK statement... |
|
** Example 'PBPEX1S': PERFORM BREAK PROCESSING (structured mode) ************************************************************************ DEFINE DATA LOCAL 1 #INDEX (N2) 1 #LINE (N2) INIT <1> END-DEFINE * FOR #INDEX 1 TO 18 PERFORM BREAK PROCESSING /* AT BREAK OF #INDEX /1/ WRITE NOTITLE / 'PLEASE COMPLETE LINES 1-9 ABOVE' / RESET INITIAL #LINE END-BREAK /* WRITE NOTITLE '_' (64) '=' #LINE ADD 1 TO #LINE END-FOR * END
________________________________________________________________ #LINE: 1 ________________________________________________________________ #LINE: 2 ________________________________________________________________ #LINE: 3 ________________________________________________________________ #LINE: 4 ________________________________________________________________ #LINE: 5 ________________________________________________________________ #LINE: 6 ________________________________________________________________ #LINE: 7 ________________________________________________________________ #LINE: 8 ________________________________________________________________ #LINE: 9 PLEASE COMPLETE LINES 1-9 ABOVE ________________________________________________________________ #LINE: 1 ________________________________________________________________ #LINE: 2 ________________________________________________________________ #LINE: 3 ________________________________________________________________ #LINE: 4 ________________________________________________________________ #LINE: 5 ________________________________________________________________ #LINE: 6 ________________________________________________________________ #LINE: 7 ________________________________________________________________ #LINE: 8 ________________________________________________________________ #LINE: 9 PLEASE COMPLETE LINES 1-9 ABOVE
レポーティングモードの例はライブラリ SYSEXRM のプログラム PBPEX1R を参照してください。