CHAR - Zeichen in der alphanumerischen Sortierfolge

Die CHAR-Funktion liefert dasjenige Zeichen, dessen Ordnungsposition innerhalb der alphanumerischen Sortierfolge mit argument-1 bestimmt ist.
Funktionstyp: alphanumerisch.

Format

---

FUNCTION CHAR (argument-1)

---

Argumente

1. argument-1 muss ganzzahlig sein.

2. Der Wert von argument-1 muss größer als null und kleiner oder gleich der Anzahl Positionen in der Sortierfolge sein.

Returnwerte

1. Wenn mehrere Zeichen in der Sortierfolge die gleiche Position haben, wird als Returnwert dasjenige Zeichen des ersten Literals geliefert, das für diese Zeichenposition in der ALPHABET-Klausel angegeben ist.

2. Der Fehler-Returnwert ist ein Leerzeichen.

Siehe auch:        ORD

Example 9-6

...
DATA DIVISION.
WORKING-STORAGE SECTION.
01  LETTER PIC 999 VALUE 194.
01  R PIC X.
PROCEDURE DIVISION.
P1 SECTION.
MAIN.
    MOVE FUNCTION CHAR (LETTER) TO R. 
    DISPLAY R UPON T.
    STOP RUN.

Ergebnis:   A

                  „A“ hat im EBCDI-Code die Ordnungsposition 194.