Numerisch druckaufbereitete Datenfelder

Wenn in Cobol gerechnet wird, so werden in der Symbolzeichenkette der PICTURE-Klausel Symbole für numerische Datenfelder verwendet. Diese sind zum Ausdrucken oder Anzeigen am Bildschirm jedoch nicht geeignet. Daher gibt es die numerisch druckaufbereiteten Datenfelder, um Rechnung wie Ergebnis sicht- bzw. druckbar zu machen. Dabei dürfen die folgenden Symbole verwendet werden:

 9  Zifferstelle
 Z  Zifferstelle mit 0-Unterdrückung
 *  Zifferstelle mit 0-Unterdrückung
      Dezimalpunkt oder Einführungszeichen
  ,   Dezimalkomma oder Einführungszeichen
  -   Minus-Vorzeichen
 +  Plus-Vorzeichen
 B  Einführungszeichen (Blank)
 0  Einführungszeichen (Null)
   Einführungszeichen (Slash)
CR Einführungszeichen (Kreditor)
DB Einführungszeichen (Debitor)
 $  Zifferstelle mit 0-Unterdrückung
 V  Ausrichtung der Dezimalstelle
 P  Ausrichtung der Zehnerpotenzen

Es dürfen maximal 18 Zifferstellensymbole pro PICTURE-Klausel vorkommen.

...

Ein numerisch druckaufbereitetes Datenfeld darf eine maximale Länge von127 Zeichen haben.
...

Um als numerisch erkannt zu werden, muß midestens eines der folgenden Symbole in der PICTURE-Klausel verwandt werden:

| 0 | B | / | Z | * | + | - | , | . | CR | DB | $ |

...