cobol
Dichiarazione di PERFORM
Ricerca…
Osservazioni
L'istruzione PERFORM trasferisce il controllo a una o più procedure e restituisce il controllo implicitamente al termine della sequenza. PERFORM può essere utilizzato anche per loop in linea nell'ambito della PERFORM.
La frase VARYING consente l'annidamento con una o più clausole AFTER e il test condizionale può essere BEFORE (predefinito) o AFTER ogni ciclo.
La clausola THRU un'esecuzione procedurale presuppone un controllo sequenziale dall'alto verso il basso dalla procedure-1 alla fine della procedure-2 . THRU è un problema polemico e molti programmatori preferiscono PERFORM per SECTION piuttosto che usare i paragrafi THRU . Alcuni negozi possono imporre PERFORM THRU con un paragrafo di punto di uscita esplicito, altri possono vietare l'uso di THRU trovando più difficile eseguire il debug.
Esecuzione procedurale:
Esecuzione in linea:
Dove la varying-phrase è:
In linea PERFORMARE VARIAZIONE
PERFORM VARYING TALLY FROM 1 BY 1 UNTIL TALLY > 5
DISPLAY TALLY
END-PERFORM
PERFORM PROCESSO
PERFORM some-paragraph