1.) bestimme den Wochentag (@Weekday) des anfangsdatum
2.) bestimme @Fix((gebuchte_Std/8)/5) ... Anzahl der kompletten Wochen
3.) bestimme @Modulo(gebuchte_Std/8); 5) ... restlichen Tage, die keine komplette Woche ergeben
Anhand von 1.) und 3.) kannst Du ggf. das darin liegende Wochenende noch ausgleichen.
Gruß
Dirk
Mit @Adjust kannst du die Arbeitstage draufrechnen.
Dann müsstest du bei jeweils 5 Arbeitstagen 2 zusätzliche Tage rechnen (für die Wochenenden) und dann prüfen ob du an einem Samstag oder Sonntag gelandet bist, wenn ja dann nochmal 1 oder 2 Tage draufrechnen
mit Adjust muss auch der Wocehntag des Anfangsdatums bestimmt werden.
Gegenbeispiel:
anfangsdatum ist ein Freitag
Tage = 8 ... entspricht 10 Tagen (5 Tage [1 .Woche] + 2 Tage Wochenede + 3 Tage [Rest])
Der Adjust landet dann bei einem Montag, müsste aber bei einem Mittwoch landen!
Mit Weekday müsstest Du eine Variable (wd) so belegen, dass für
Mo ... 5
Di ... 4
Mi ... 3
Do ... 2
Fr .. 1
rauskommt.
Anfangsdatum muss ein Wochentag sein, da da die Arbeit beginnt.
Mit
@If(wd - @Modulo(Tage; 5) > 1; 2; wd - @Modulo(Tage; 5) = 1; 1;0)
bekommst Du die noch zu addierenden Tage (für ein Wochenede) heraus.
Gruß
Dirk
Wieso muss ich da den Anfangstag berechnen ?
_DAYS := 8;
_REALDAYS := _DAYS + (@Integer(_DAYS / 5) * 2);
_NEWDATE := @Adjust(StartDate;0;0;_REALDAYS;0;0;0);
@If(@Weekday(_NEWDATE) = 1;@Adjust(_NEWDATE;0;0;1;0;0;0);@Weekday(_NEWDATE)=7;@Adjust(_NEWDATE;0;0;2;0;0;0);_NEWDATE)
Dann schreib es dir eben in LotusScript um.
Alle Funktionen dafür existieren auch dort
wende Deine Formel mal auf den 09.03.2007 an, da kommt
der 19.03.2007 raus.
Kontrollieren kannst Du es mit einem folgendem Prompt nach Deinem Code:
_newDate2 := @If(@Weekday(_NEWDATE) = 1;@Adjust(_NEWDATE;0;0;1;0;0;0);@Weekday(_NEWDATE)=7;@Adjust(_NEWDATE;0;0;2;0;0;0);_NEWDATE);
@Prompt([ok];@Text(@BusinessDays(StartDate;_NewDate;1:7));@Text(_newDate2))
In der Titelleiste stehen die BusinessDays und in der Box das Ziel Datum.
Gruß
Dirk
Im Script geht es genau so:
@Weekday ... Weekday
@Adjust ... NotesDateTime.AdjustDay
@Modulo ... Mod
@Fix ... Rechne mit \ anstelle mit einem /
Gruß
Dirk
OK, stimmt, das hab ich übersehen
Wo hast du eigentlich @Fix her ?
Die Funktion finde ich nur im Script nicht aber in Formelsprache
Ja so war das gemeint, allerdings hat meine Formel wie Diali meinte noch nen Fehler, also verwende am besten seine und setz die in Script um
natürlich Fix ist Script mit Formeln muss @Integer verwendet werden. Stört mich schon lange, dass dies im Script und Formeln unterschiedlich ist. War wohl Wunschdenken 
.
Gruß
Dirk
