Hallo Werner,
ich will das um ein paar Punkte ergänzen. "Sascha" hat er als Namen letztens dazugeschrieben, aber es wäre einfach besser, wenn man das unter jedes Posting setzt (es sei denn, man ist bekannt wie ein bunter Hund).
@Sascha:
- Über die Gefahren des Verlassens auf das Exiting-Event bist Du Dir bewusst?
- PostRecalc sollte getriggert werden, da das auch bei anderen Ereignissen dann greift
- Abschliessend muss im QuerySave berechnet werden
- "Anzahl Nettotage" in einm TEXTfeld ist schräg bis krank. Ist das eine Zahl oder nicht?
@Werner: AdjustDay (NotesDateTime) ist hier schon Overkill. Wenn die Prüfungen auf korrekte Inhalte in WEinvdate und Nettotage gelaufen sind (!!!), reicht ein
Dim vBaseDate As Variant
vBaseDate = NotesDocument.WEInvdate (0)
NotesDocument.WEInvdate = vBaseDate + Cint (NotesDocument.Nettotage (0))
Für so einen Pippifax braucht man die NotesDateTime class gar nicht
Bernhard