Alphanumerische Datenfelder

Alphanumerische Datenfelder können alle Zeichen des ASCII-Satzes aufnehmen. Um ein alphanumerisches Datenfeld als ein solches zu definieren, verwendet man folgende Symbolzeichen in der Symbolzeichenkette der PICTURE-Klausel:

   X    Dieses Symbolzeichen
steht für jedes Zeichen
des ASCII-Satzes 
   9    Dieses Symbolzeichen
steht für alle Ziffern
zwischen 0 und 9 
   A    Dieses Symbolzeichen
steht für alphabetisches-
oder Leerzeichen 

Natürlich kann man auch hier mit Klammersetzung die Anzahl bestimmen.

Beispiel 1:

MOVE Zeit TO Treffen.
01 Zeit PIC X(9).
 1   7   :   2   0   ~   U   h   r 
01 Treffen PIC 99X99A(4).
 1   7   :   2   0   ~   U   h   r 

Beispiel 2:
MOVE Zeit TO Treffen.
01 Zeit PIC 9(2)X(4)A(3).
 2   0   :   4   5   ~   U   h   r 
01 Treffen PIC X(3)99AXXA.
 2   0   :   4   5   ~   U   h   r 

Diese Beispiele sind zwar etwas unrealistisch, sollen aber die Möglichkeiten verdeutlichen.

...