Paragrafen en PRESTEREN

In COBOL vindt modulariteit en logische structurering van code binnen de PROCEDURE DIVISION niet plaats via functies of methoden, maar eerder via Paragrafen en de PERFORM instructie.

Alinea's definiëren

Een alinea is een gelabeld stuk code dat begint met een naam in kolom 8 (Gebied A) en eindigt met een punt ., gevolgd door een reeks instructies in kolom 12 (Gebied B).

DISPLAY-MESSAGE.
    DISPLAY "This is a paragraph!".

Met alinea's kunnen potentieel zeer lange programma's worden opgesplitst in herbruikbare en zelfdocumenterende blokken.

Alinea's uitvoeren met PERFORM

De instructie PERFORM roept een alinea op en voert deze uit, en geeft vervolgens de controle terug aan de instructie die onmiddellijk volgt op de instructie PERFORM.

PROCEDURE DIVISION.
MAIN-PROCEDURE.
    DISPLAY "Starting program...".
    PERFORM PROCESS-DATA.
    DISPLAY "Ending program.".
    STOP RUN.

PROCESS-DATA.
    DISPLAY "Processing data in memory...".

In de bovenstaande lijst:

1. De DISPLAY binnen MAIN-PROCEDURE wordt uitgevoerd.
2. PERFORM PROCESS-DATA vertakt de uitvoering naar de paragraaf PROCESS-DATA.
3. Zodra de paragraaf PROCESS-DATA eindigt, keert de uitvoering terug naar MAIN-PROCEDURE om 'Eindeprogramma' af te drukken. en stop met STOP RUN..

Probeer het zelf