Einzelnen Beitrag anzeigen

hauiclaudi
(Gast)

n/a Beiträge
 
#1

einem Datum nur Arbeitstage hinzuaddieren

  Alt 20. Sep 2004, 11:36
Will einem Datum z.B 100 Tage hinzuaddieren um einen neuen Termin zu erhalten. Wichtig ist aber, dass die 100 Tage nur Arbeitstage sind.

Er muss also beim aufaddieren jeweils den Samstag und Sonntag weglassen. Ich habe zwar eine Routine geschrieben wo er prüft ob es ein Samstag oder Sonntag gibt, wenn ja dann überspring das usw.

Das Problem ist aber, dass er viele Datensätze berechnen muß und dieser Vorgang dann sehr lange dauert.
Gibt es eine Funktion (Routine) die nur Arbeitstage addiert?

var
neuesDatum : TdateTime ;

..
neuesDatum := Date + nurArbeitstage(100) ;
  Mit Zitat antworten Zitat