COBOL Syntax verstehen & anwenden

Die Syntax von COBOL ist sehr lesbar und ähnelt natürlicher Sprache. COBOL-Programme bestehen aus Abschnitten, die bestimmte Aufgaben erfüllen, wie z.B. Datenbeschreibung, Prozedursteuerung und Verarbeitung.

Der Datenbeschreibungsabschnitt enthält die Definition der Datenfelder, die von dem Programm verwendet werden, sowie deren Längen und Typen.

Der Prozedursteuerungsabschnitt enthält die Anweisungen, die die Ablaufsteuerung des Programms bestimmen, wie z.B. Schleifen und Verzweigungen.

Der Verarbeitungsabschnitt enthält die Anweisungen, die das Programm ausführt, um die eigentliche Arbeit zu erledigen, wie z.B. Berechnungen und Datenmanipulationen.

Die Anweisungen innerhalb eines Abschnitts sind in logischen Absätzen gruppiert, die durch eine bestimmte Phrase beginnen, wie z.B. "PERFORM" oder "COMPUTE".

Eine COBOL-Anweisung besteht normalerweise aus einem Schlüsselwort, gefolgt von Argumenten und einem Punkt am Ende der Anweisung.

COBOL Beispiel einfach erklärt

Um ein noch besseres Verständnis für die COBOL Syntax zu bekommen, ist ein Blick auf dieses COBOL Beispiel notwendig:

IDENTIFICATION DIVISION.
PROGRAM-ID. SUM-EXAMPLE.

ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01  NUM1 PIC 9(4).
01  NUM2 PIC 9(4).
01  SUM  PIC 9(4).

PROCEDURE DIVISION.
BEGIN.
    DISPLAY "Bitte die erste Zahl eingeben:"
    ACCEPT NUM1
    DISPLAY "Bitte die zweite Zahl eingeben:"
    ACCEPT NUM2
    COMPUTE SUM = NUM1 + NUM2
    DISPLAY "Die Summe ist: " SUM
    STOP RUN.
END.

In diesem COBOL Beispiel für einen Taschenrechner gibt die erste Zeile "IDENTIFICATION DIVISION." an, dass dies der Anfang des Identifikationsabschnitts ist. In diesem Abschnitt werden Informationen über das Programm angegeben, wie z.B. sein Name und die Verfasser.

Die zweite Zeile "PROGRAM-ID. SUM-EXAMPLE." gibt den Namen des Programms an.

Die nächste Abschnitte sind die ENVIRONMENT DIVISION, die DATA DIVISION und die WORKING-STORAGE SECTION. In der WORKING-STORAGE SECTION werden die Datenfelder NUM1, NUM2 und SUM definiert, die vom Programm verwendet werden.

Der PROCEDURE DIVISION enthält die Anweisungen, die das Programm ausführt. In diesem Fall werden die Anweisungen verwendet, um die Benutzereingaben zu akzeptieren, die Summe zu berechnen und das Ergebnis auf dem Bildschirm auszugeben.

Der letzte Befehl "STOP RUN" beendet das Programm.

Weiterführende Artikel

• COBOL Datentypen