DATA DIVISION in COBOL

Hier werden die Daten definiert und zwar mit einer Stufennummer, gefolgt vom Datenname und der KLAUSE, die mit dem Schlüsselwort PIC näher definiert wird.

Beispiel:

01
EINGABE-SATZ PIC X(80). (Alphanumerischer Wert mit 80 Zeichen)


01
AUSGABE-SATZ PIC X(80). (Alphanumerischer Wert mit 80 Zeichen)


01
ZIFFER PIC 9(01). (Eine Zahl mit 1 Ziffer)


01
FUENF-ZIFFERN PIC 9(05). (Eine Zahl mit 5 Ziffer)

 

Beispiel einer Datenstruktur

 

01 Customer-Record.

05 Customer-Name.

10 Last-Name PIC x(17).

10 [Filler] PIC x.

10 Initials PIC xx.

05 Part-Order.

10 Part-Name PIC x(15).

10 Part-Color PIC x(10).