INTEGER-OF-DATE

Für die Umsetzung wird die migrationsunterstützende Erweiterungsmethode IntegerOfDate verwendet.

Beispiele

COMPUTE N-ZAPF-D0 = FUNCTION DATE-OF-INTEGER
                    (FUNCTION INTEGER-OF-DATE
            ((SNLPRIS-RIS-RI-ZA-PFL-BEG-XJ * 10000) +
             (SNLPRIS-RIS-RI-ZA-PFL-BEG-MM * 100) +
             (SNLPRIS-RIS-RI-ZA-PFL-BEG-TT)))
END-COMPUTE

NZapfD0 = (((Snlpris.RisRiZaPflBegD0.Year * 10000) + (Snlpris.RisRiZaPflBegD0.Month * 100) + (Snlpris.RisRiZaPflBegD0.Day)).IntegerOfDate()).DateOfInteger();