Your Browser is not longer supported

Please use Google Chrome, Mozilla Firefox or Microsoft Edge to view the page correctly
Loading...

{{viewport.spaceProperty.prod}}

Datenstrukturen, Klauseln

&pagelevel(4)&pagelevel

Das Datenformat national kann zusätzlich zur PICTURE Klausel auch in der USAGE-Klausel explizit als NATIONAL angegeben werden.

Nationale Daten dürfen auch zu Datenstrukturen gruppiert werden. Dabei ist zu berücksichtigen, dass Datengruppen in COBOL immer von der Klasse alphanumerisch sind. Dadurch wird eine Datengruppe wie ein alphanumerisches Datenfeld behandelt, auch wenn sie nur elementare nationale Datenfelder enthält, z.B. beim Auffüllen mit Leerzeichen. Die Klausel GROUP-USAGE NATIONAL bewirkt, dass auch eine Datengruppe wie ein nationales Datenfeld behandelt wird.

Beispiel 12-12

01 alfanum-struktur.
 02 nat1 PIC N(10).
 02 nat2 PIC N(10).
01 national-struktur GROUP-USAGE NATIONAL.
 02 nat1 PIC N(10).
 02 nat2 PIC N(10).

Die erste Datenstruktur ist immer alphanumerisch. Wird ein kürzeres Sendefeld dorthin übertragen, werden alphanumerische Leerzeichen (X'40') angefügt, die in nationalen Datenfeldern nicht sinnvoll sind.
Die zweite Datenstruktur ist dagegen wegen der zusätzlichen Klausel national. Es würden nationale Leerzeichen (X'0020') angefügt werden.