MAX - Maximalwert

Die MAX-Funktion liefert den höchsten Wert aus einer Reihe von Argumentwerten.
Der Funktionstyp ist abhängig vom angegebenen Argumenttyp:

Argumenttyp	Funktionstyp
alphabetisch alphanumerisch alle Argumente ganzzahlig index national numerisch numerisch/ganzzahlig	alphanumerisch alphanumerisch ganzzahlig index national numerisch numerisch

Format

---

FUNCTION MAX ({argument-1}...)

---

Argumente

1. Sind mehrere Argumente angegeben, müssen alle Argumente derselben Klasse angehören.

2. Die einzelnen Argumente dürfen nicht mit der ANY LENGTH-Klausel definiert sein.

Returnwerte

1. Der Returnwert ist der Inhalt desjenigen Arguments, das den höchsten Wert enthält. Der höchste Wert wird entsprechend den Vergleichsregeln für einfache Bedingungen bestimmt.

2. Bei mehreren Argumenten mit dem gleichen (Höchst-)Wert gilt der Wert des am weitesten links stehenden Arguments als Returnwert.

3. Ist der Funktionstyp alphanumerisch oder national, ist die Länge des Returnwerts identisch mit der Länge des entsprechenden Arguments.

4. Der Fehler-Returnwert ist 0.

Siehe auch:        MIN, ORD-MAX, ORD-MIN, RANGE, MEAN, MEDIAN, MIDRANGE, SUM

Example 9-24

...
DATA DIVISION.
WORKING-STORAGE SECTION.
01  RES PIC 9(3).
01  RES1 PIC X(4).
PROCEDURE DIVISION.
P1 SECTION.
MAIN.
    COMPUTE RES = FUNCTION MAX (12 32 5 8 17 9).
    MOVE FUNCTION MAX ("HUGO" "EGON" "THEO" "OTTO") TO RES1.
    DISPLAY "Höchster Argumentwert RES: " RES UPON T.
    DISPLAY "Höchster Argumentwert RES1: " RES1 UPON T.
    STOP RUN. 

Ergebnis:           Höchster Argumentwert RES: 032
                          Höchster Argumentwert RES1: THEO