CALL
LOOP operand1 [operand2]
...40 |
statement
 |
END-LOOP |
CALL LOOP
operand1
[operand2]
...40 |
| statement
|
LOOP |
Dieses Dokument behandelt folgende Themen:
Eine Erläuterung der in dem Syntax-Diagramm verwendeten Symbole entnehmen Sie dem Abschnitt Syntax-Symbole.
Verwandte Statements: CALL | CALL FILE |
CALLNAT |
DEFINE SUBROUTINE |
ESCAPE |
FETCH |
PERFORM
Gehört zur Funktionsgruppe: Aufrufen von Programmen und Unterprogrammen
Das Statement CALL LOOP dient dazu, eine
Verarbeitungsschleife zu generieren, die den Aufruf eines
Nicht-Natural-Programms beinhaltet.
Im Gegensatz zum CALL-Statement erzeugt das CALL
LOOP-Statement eine Verarbeitungsschleife, die dazu dient, das
Nicht-Natural-Programm wiederholt aufzurufen. Zu der
CALL-Verarbeitung siehe CALL-Statement.
Innerhalb einer CALL LOOP-Verarbeitungsschleife dürfen die
Statements AT BREAK,
AT START OF DATA und
AT END OF DATA nicht
verwendet werden.
Operanden-Definitionstabelle:
| Operand | Mögliche Struktur | Mögliche Formate | Referenzierung erlaubt | Dynam. Definition | ||||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| operand1 | C | S | A | ja | nein | |||||||||||||||
| operand2 | C | S | A | G | A | U | N | P | I | F | B | D | T | L | C | ja | ja | |||
Syntax-Element-Beschreibung:
| Syntax-Element | Beschreibung |
|---|---|
operand1 |
Der Name des aufgerufenen Nicht-Natural-Programms (operand1) kann entweder als Konstante angegeben werden oder — falls je nach Programmlogik verschiedene Programme aufgerufen werden sollen — als alphanumerische Variable mit Länge 1 bis 8. Ein Programmname muss linksbündig in der Variablen stehen. |
operand2 |
Mit dem CALL LOOP-Statement können
Sie bis zu 40 Parameter angeben. Der Aufbau der Parameterliste entspricht der
für das CALL-Statement. In
der Parameterliste verwendete Felder können schon vorher definiert werden oder
erst im CALL LOOP-Statement selbst.
|
statement
... |
Die mit CALL LOOP initiierte Verarbeitungsschleife
muss mit einem ESCAPE-Statement beendet werden.
|
END-LOOP |
Ende des CALL LOOP-Statements:
Im Structured Mode muss das für Natural reservierte Schlüsselwort
Im Reporting Mode wird das Natural-Statement
|
LOOP |
DEFINE DATA LOCAL
1 PARAMETER1 (A10)
END-DEFINE
CALL LOOP 'ABC' PARAMETER1
IF PARAMETER1 = 'END'
ESCAPE BOTTOM
END-IF
END-LOOP
END