f$DatumAddieren (engl. f$dateadd)

Zu einem gegebenen Datum eine Anzahl an Stunden, Minuten, Sekunden, Tagen, Wochen, Monaten oder Jahren hinzuaddieren. Das Ergebnis ist ebenfalls ein Datum als Zeichenkette. Auf Wunsch kann das Format dieses Datums gesteuert werden. Bei länderspezifischen Datumsformaten (z.B. Monatsangabe als Text) muss außerdem die Länderinformation (German, English) mitgegeben werden. Wird kein Format angegeben, so erscheint das Datum DD.MM.JJJJ (z.B. 29.02.2004).

Wenn das Eingabedatum lediglich aus einer Zahl besteht, wird diese als Uhrzeit interpretiert. 4-stellige Zahlen als Stunden und Minuten, sonst als Stunden.

Falls das Eingabedatum ungültig ist, wird ein Leerstring zurückgegeben.

Tipp:

Durch addieren von 0 Tagen und einer geeigneten Formatangabe kann diese Funktion auch zur Konvertierung eines Datums in ein anderes Format verwendet werden.

Formatangaben sind als Zeichenketten mit festen Bestandteilen und durch % eingeleitete Kennbuchstaben anzugeben. Folgende Kennbuchstaben sind möglich

%a	abgekürzter Name des Wochentags (z.B. Mon)
%A	Name des Wochentags (z.B. Montag)
%b	Abgekürzter Name des Monats (z.B. Jan)
%B	Name des Monats
%c	Datum mit Uhrzeit in den Einstellungen des Landes
%d	Tag im Monat (01 – 31)
%H	Stunde (00 – 23)
%j	Tag im Jahr (001 – 366)
%m	Monat als Zahl (01 – 12)
%M	Minute (00 – 59)
%S	Sekunde (00 – 59)
%w	Tag der Woche als Zahl (0 – 6; Sonntag ist 0). Da die Formatierung mittels einer Windows-Funktion durchgeführt wird, ist diese Zählweise leider gegeben.
%x	Datum ohne Uhrzeit in den Einstellungen des Landes
%y	2-stellige Jahreszahl
%Y	4-stellige Jahreszahl
%%	Prozentzeichen

Syntax:	Datum = f$DatumAddieren(Datum,Was,Wieviel,[Format],[Gebiet])
	Argument	Typ	Bedeutung
	Datum	Zeichenkette	Gegebenes Datum
	Was	Zeichenkette	Angabe, was zu dem Datum addiert werden soll: h -Stunde n -Minute S - Sekunde t oder d- Tag w- Woche m- Monat j oder y- Jahr
	Wieviel	Ganzzahl	Anzahl der oben angegebenen Tage, Wochen...
(optional)	Format	Zeichenkette	Formatstring zur Steuerung des Ausgabedatums
(optional)	Gebiet	Zeichenkette	Angabe der Ländereinstellung (z.B. German)
Ergebnis:	Zeichenkette	Neu bestimmtes Datum
Beispiele:	Datum = f$DatumAddieren('01.01.2004','t',20) Ergebnis: Datum = '21.01.2004' Datum = f$DatumAddieren('01.01.2004','t',20,' %d.%b.%Y %A ','German') Ergebnis: Datum = ' 21.Jan.2004 Mittwoch '

Falls verschiedene Ländereinstellungen verwendet werden, können die Formate entsprechend angepasst werden.

Beispiel:

Datumsformat = f$ReadRegValue( 'HKEY_CURRENT_USER\\Control Panel\\International\\sShortDate' )

Datumb = f$Datum( Datumsformat )
Datumsformat = f$ersetzen( Datumsformat , 'yyyy' , '%Y' )
Datumsformat = f$ersetzen( Datumsformat , 'yy' , '%y' )
Datumsformat = f$ersetzen( Datumsformat , 'dd' , '%D' )
Datumsformat = f$ersetzen( Datumsformat , 'MM' , '%m' )
Datumsformat = f$ersetzen( Datumsformat , 'd' , '%D' )
Datumsformat = f$ersetzen( Datumsformat , 'M' , '%m' )
Datumsformat = f$ersetzen( Datumsformat , '%D' , '%d' )
Datumb = f$DatumAddieren( Datumb , 'y', 0 ,Datumsformat )