CX_DATE::LeapYear
Beschreibung:
Diese Funktion ermittelt, ob das Jahr, zu dem das Datum gehört, ein
Schaltjahr ist oder nicht. Das Ergebnis wird als Wahrheitswert geliefert. Für eine Datumsperiode bezieht sich diese Funktion auf ihr Startdatum.
Code-Beispiel:
In dem Beispiel-Programm wird überprüft, ob "1900" und "2000" Schaltjahre waren.
Var(date) CreateTransObject(CX_DATE) -> date // Objekt erzeugen
"25.12.1900" date Put
// Wert setzen
date Call(LeapYear)
// Auf Schaltjahr prüfen
"4.8.2000" date Put
// neuen Wert setzen
date Call(LeapYear)
// wieder Schaltjahr prüfen
Das Ausführen dieses Skriptes erzeugt die Werte "0" (= FALSE) und
"1" (= TRUE) auf dem Stack, da das Jahr 1900 kein, hingegen das Jahr 200 ein Schaltjahr war.
Stack | Position | Objekttyp | Kurzbeschreibung |
---|---|---|---|
Stack(In) | Top | CX_DATE oder CX_SPAN_DATE | das Datum(-sobjekt) |
Stack(Out) | Top | INTEGER | das Ergebnis der Überprüfung |