INTEGER-PART - Ganzzahliger Teil eines Gleitpunktwertes

Die INTEGER-PART-Funktion liefert den ganzzahligen Teil von argument-1.
Funktionstyp: ganzzahlig.

Format

---

FUNCTION INTEGER-PART (argument-1)

---

Argumente

1. argument-1 muss der Klasse numerisch angehören. Für den Wert w von argument-1 muss gelten:

-10³¹ < w < 10³¹

Returnwerte

1. Ist der Wert von argument-1 null, ist der Returnwert null.

2. Ist der Wert von argument-1 positiv, ist der Returnwert die größte ganze Zahl, die kleiner oder gleich dem Wert von argument-1 ist. Ist z.B. der Wert von argument-1 +1,5, dann ist der Returnwert +1.

3. Ist der Wert von argument-1 negativ, ist der Returnwert die größte ganze Zahl, die größer oder gleich dem Wert von argument-1 ist. Ist z.B. der Wert von argument-1 -1,5, dann ist der Returnwert -1.

4. Der Fehler-Returnwert ist -9’999’999’999’999’999’999’999’999’999’999.

Siehe auch: INTEGER

Beispiel 9-19

...
DATA DIVISION.
WORKING-STORAGE SECTION.
01  RES PIC 9(8).
PROCEDURE DIVISION.
P1 SECTION.
MAIN.
    COMPUTE RES = FUNCTION INTEGER-PART (-3.3).
    DISPLAY RES UPON T.
    STOP RUN.

Ergebnis:              -00000003