ORD - Ordnungsposition in der Sortierfolge

Die ORD-Funktion liefert einen ganzzahligen Wert, der die Ordnungsposition von argument-1 in der programmspezifischen Sortierfolge angibt. Die niedrigste Ordnungsposition ist 1.
Funktionstyp: ganzzahlig.

Format

---

FUNCTION ORD (argument-1)

---

Argument

1. argument-1 muss ein Zeichen lang sein und der Kategorie alphabetisch, alphanumerisch oder national angehören.

Returnwert

1. Ist argument-1 von der Klasse alphabetisch oder alphanumerisch, dann ist der Returnwert die Ordnungsposition von argument-1 in der alphanumerischen Sortierfolge.

2. Ist argument-1 von der Klasse national, dann ist der Returnwert die Ordnungsposition von argument-1 in der nationalen Sortierfolge.

Siehe auch: CHAR

Beispiel 9-33

...
DATA DIVISION.
WORKING-STORAGE SECTION.
01  L PIC X VALUE "Z".
01  R PIC X(3).
PROCEDURE DIVISION.
P1 SECTION.
MAIN.
    COMPUTE R = FUNCTION ORD (L).
    DISPLAY R UPON T.
    STOP RUN.

Ergebnis:           234
                          Der Buchstabe Z hat im EBCDI-Code die Ordnungsposition 234.