Diese Datenfelder sind ausschließlich zur Durchführung von Rechenoperationen gedacht. Innerhalb der Symbolzeichenkette der PICTURE-Klausel sind für numerische Datenfelder die folgenden Symbole vorgesehen:
9 |
Dieses Symbol darf nur benutzt werden, um Ziffern zwi- schen 0 und 9 aufzunehmen. Es darf maximal 18 mal für 18 Stellen in der Symbolzeichenkette stehen. |
V |
Dieses Symbol kennzeinet einen fiktiven Dezimalpunkt. Es darf nur einmal in der Symbol- zeichnkette vorkommen. Es belegt keinen Speicherplatz. |
S |
Dieses Symbol wird für Felder benutzt, die negative Inhalte haben können. Es darf nur einmal vorkommen. Es belegt keinen Speicherplatz. Es ist ein Vorzeichensymbol. |
P |
Dieses Symbol steht für je eine Zehnerpotenz. Dem Wert wird diese Potenz zugrunde gelegt. Diese Symbole dürfen nur am Anfang oder am Ende der Symbolzeichenkette nebeneinander stehen. |
Beispiel 1:
01 ReFeld1 PIC 9(5). | ||||
2 | 6 | 5 | 4 | 7 |
01 ReFeld2 PIC 999V99. | |||||
2 | 6 | 5 | 4 | 7 |
Der Wert in ReFeld2 beträgt, nur durch den Umstand, daß das Rechenfeld in der PICTURE-Klausel anders definiert wurde also lediglich ein Hundertstel des Wertes der in ReFeld1 abgelegt wurde.
01 ReFeld2 PIC 999V99. | |||||
2 | 6 | 5 | 4 | 7 |
01 ReFeld3 PIC 999V99PP. | |||||
2 | 6 | 5 | 4 | 7 |
Würde Hier eine Anweisung lauten:
DIVIDE ReFeld3 BY 100 GIVING ReFeld2.
So wäre der Wert von ReFeld2 wiederrum 265,47.
|
||||||||||||||
minus | ||||||||||||||
|
||||||||||||||
gleich | ||||||||||||||
|