CALL LOOP

Structured Mode-Syntax

CALL LOOP   operand1   [operand2] ...40
    statement ../graphics/dot3.gif
END-LOOP [(r)]

Reporting Mode-Syntax

CALL LOOP  operand1  [operand2] ...40
    statement ../graphics/dot3.gif
LOOP [(r)]

Dieser Abschnitt 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 Subprogrammen

Funktion CALL LOOP

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.

Einschränkung

Innerhalb einer CALL LOOP-Verarbeitungsschleife dürfen die Statements AT BREAK, AT START OF DATA und AT END OF DATA nicht verwendet werden.

Syntax-Beschreibung CALL LOOP

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 [(r)]
Ende des CALL LOOP-Statements:

Im Structured Mode muss das für Natural reservierte Schlüsselwort END-LOOP zum Beenden des CALL LOOP-Statements benutzt werden.

Im Structured Mode können Sie bei END-LOOP Labels oder Zeilennummern angeben.

Im Reporting Mode wird das Natural-Statement LOOP zum Beenden des CALL LOOP-Statements benutzt.

Im Reporting Mode können Sie bei LOOP Labels oder Zeilennummern angeben.

LOOP [(r)]

Beispiel für CALL LOOP-Statement

DEFINE DATA LOCAL
1 PARAMETER1 (A10)
END-DEFINE
CALL LOOP 'ABC' PARAMETER1
  IF PARAMETER1 = 'END'
     ESCAPE BOTTOM
  END-IF
END-LOOP
END

On this page