Die MEDIAN-Funktion liefert den Wert desjenigen Arguments, das in der Mitte der aufsteigend oder absteigend sortierten Argumente steht.
Funktionstyp: numerisch.
Format
FUNCTION MEDIAN ({argument-1}...)
Argument
argument-1 muss der Klasse numerisch angehören.
Returnwerte
Der Returnwert ist der Wert des mittleren Arguments aus der Reihe der sortierten Argumente.
Ist die Anzahl der Argumente ungerade, ist mindestens die Hälfte der Argumentwerte größer oder gleich bzw. kleiner oder gleich dem Returnwert. Ist die Anzahl der Argumente gerade, wird der Returnwert aus dem arithmetischen Mittel der beiden mittleren Argumentwerte gebildet.
Der Vergleich zum Sortieren der Argumentwerte erfolgt nach den Regeln für einfache Bedingungen (siehe Abschnitt „Bedingungen").
Der Fehler-Returnwert ist 0.
Siehe auch: MIN, MAX, RANGE, MEAN, MIDRANGE, SUM
Beispiel 9-26
...
DATA DIVISION.
WORKING-STORAGE SECTION.
01 RES PIC 9(3).
PROCEDURE DIVISION.
P1 SECTION.
MAIN.
COMPUTE RES = FUNCTION MEDIAN (2 32 8 128 16 64 256).
DISPLAY RES UPON T.
STOP RUN.
Ergebnis: 032