Seite durchsuchen nach:
(powered by
FreeFind)
Bemerkung: Manche Browser haben offensichlich Probleme mit CSS. Für die richtige Darstellung dieser Seiten verwenden Sie am besten
Firefox,
Chrome oder
Opera.
Syntax
gDate = GregDate([jDate]) [;]
Beschreibung
Umsetzen des julianischen Datums (jjddd)
in das gregorianische Datumformat (dd.mm.jjjj).
Aufrufparameter
jDate
Das Datum im julianische Format (jjddd)
zum Konvertieren
Standardwerte
jDate
das aktuelle Datum (heute) im julianischen Format
jjddd
Rückgabewerte
gregDate
Datum im europeischen (gregorianischen) Format:
dd.mm.jjjj).
Bemerkungen
Die Return-Klausel dieser Funktion ist ein sehr gutes Beispiel
dafür, wie man die Built-in-Funktion Translate benutzen kann.
Sourcecode
/*====( Translate julian date jjddd to gregorian date dd.mm.jjjj)====*/
GregDate: Procedure
Arg julDate
If julDate = '' Then julDate = Date( 'J' )
Return Translate( '78.56.1234', Date('S', julDate, 'J'), '12345678' )
/*** End GregDate ***/
Beispiel 1
gDate = GregDate()
Say gDate
Ergebnis 1
21.12.2006 /* erstellt am 21.12.2006 */
Beispiel 2
gDate = GregDate( "01003" )
Say gDate
Ergebnis 2
03.01.2001
Beispiel 3
gDate = GregDate( "55031" )
Say gDate
Ergebnis 3
31.01.2055
Beispiel 4
gDate = GregDate( "56060" )
Say gDate
Ergebnis 4
29.02.1956
Your privacy: This web site has no cookies, no advertising and does not provide access data to anyone for any reason.
Copyright © Janosch R. Kowalczyk 1999, 2010. All rights reserved.
Most recent revision on 25 Feb 2010 (56) - 13:22:21.
