Seite 1 von 1

Problem mit AddDate()

Verfasst: 29.12.2004 13:08
von Käthe
Hallo zusammen!

Schreibe gerade an einem Zinsrechner. Dabei soll für den jeweiligen Zahlungstermin das Datum ausgegeben werden. Das heißt, zu dem angegebenen Startdatum müssen je nachdem 1,3, 6 oder 12 Monate addiert werden. Der folgende Code für die halbjährlichen Termine
v_datum = FormatDate("%dd.%mm.%yyyy",AddDate(v_datum,#PB_Date_Month,6))
liefert bei dem Startdatum 01.01.2000 die folgende Datumsangaben zurück
30.06.2000
30.12.2000
29.06.2001
29.12.2001
28.06.2002 usw.
Eigentlich wollte ich sowas wie 01.07. und 01.01. für jedes Jahr haben.
Bei Schritten von einem und drei Monaten dasselbe Problem. Nur ein ganzes Jahr läßt sich fehlerlos addieren.
Habe dazu nirgendwo Infos gefunden. Und hoffe, daß ich nicht nur einfach zu doof bin ;-)

Freue mich auf eure Hilfe!!!

Viele Grüße,
Käthe

Verfasst: 29.12.2004 14:15
von ChaOsKid
hi Käthe,

vielleicht hilft dir das weiter:

Code: Alles auswählen

datum$ = "01.01.2000"
Repeat
  Debug datum$
  datum$ = FormatDate("%dd.%mm.%yyyy",AddDate(ParseDate("%dd/%mm/%yyyy", datum$),#PB_Date_Month,6))
  Delay(1000)
ForEver
mfG
Tobi

Verfasst: 29.12.2004 15:58
von Maurizio555
Hallo Kähte!
Ich mußte auch Rechnungen mit Datumsangaben anstellen (Addieren, Subtrahieren, usw.).
Habe dazu 3 Procedures geschrieben, wenn du sie noch brauchst, maile mir einfach.
Gruß
Maurizio