Konvertierungen zwischen EBCDIC und UTF-16-Darstellung

Neben den impliziten Konvertierungen bei Übertragungen und Vergleichsbedingungen gibt es die Möglichkeit, explizit Konvertierungen mit Hilfe von FUNCTIONs durchzuführen:

• NATIONAL-OF liefert die nationale Darstellung (UTF-16) eines alphanumerischen Arguments

• DISPLAY-OF liefert die alphanumerische Darstellung (EBCDIC) eines nationalen Arguments

Beide Funktionen erlauben als optionales zweites Argument die Angabe eines Ersatzzeichens, das an Stelle derjenigen Zeichen eingesetzt wird, die kein Gegenstück im anderen Zeichensatz haben.

Beispiel 12-17

01 n  PIC N(3) VALUE NX"E23A00410040".
01 a  PIC X VALUE "?".
FUNCTION DISPLAY-OF (n, a)

Der Funktionsaufruf liefert ein alphanumerisches Datenfeld mit Inhalt „?A@“, weil das erste nationale Zeichen kein EBCDIC Gegenstück hat. Dafür wird im Ergebnis das Ersatzzeichen „?“ eingesetzt.