Page 1 of 1
Monatliche Aktion
Posted: Mon May 18, 2026 8:21 am
by WolfgangSaul
Hallo,
ich möchte monatlich am 1. Samstag einige Dateien verschieben. Unter Termin kann ich zwar monatlich auswählen aber nicht wann im Monat. Gibt es da irgendwo eine Einstellmöglichkeit?
Wolfgang
Re: Monatliche Aktion
Posted: Mon May 18, 2026 10:32 am
by tobias
Guten Tag,
das geht mit dem folgenden PascalScript. Der Job muss auf "Täglich um X Uhr" stehen, und das Script sorgt dafür, dass automatisch der erste Samstag im Monat ausgewählt wird. Das Script wird im Profil unter Allgemein->PascalScript hinterlegt.
Code: Select all
function OnGetNextRunTime(const LastRun, ProposedNextRun: Double):Double;
var DidItRunThisMonth:Boolean;
begin
Result:=ProposedNextRun;
DidItRunThisMonth:=(MonthOf(LastRun)=MonthOf(Now)) and
(MonthOf(LastRun)=MonthOf(ProposedNextRun)) and
(DayOf(LastRun)<DayOf(ProposedNextRun));
if DidItRunThisMonth then begin
// go to the next month
while DayOf(Result)>1 do
Result:=Result+1;
end
else begin
// go to the next month if we are beyond week #1
while DayOf(Result)>7 do
Result:=Result+1;
end;
// second, advance further until it's a Saturday
while DayOfTheWeek(Result)<>6 do
Result:=Result+1;
end;