hallo Zusammen

habe folgende Aufgabe zu lösen:
generiere  eine Datums- und Terminreihe für einen bestimmten Zeitraum

mit dem Script versuche ich, ab einem festgestzten Datum (Startdatum) und einem Enddatum (myEND) ein Datum wöchentlich (+7) zu generieren.
Bis zum erreichen der Winterzeit (25.10.2020) ist alles in Ordnung, dann ergibt sich eine Datumverschiebung.

do as server
let me := Objekte;
let myBEZ := Beschrieb;
let my := this;
let myEND := date(2021, 1, 10);
let mySTART := date(year(abDatum), month(abDatum), day(abDatum));
let myUSER := first((select Kontakte where Anwender = my.EingesetztesPersonal.Kontakte.Anwender).Benutzer);
let myVON := WoVon;
let myBIS := WoBis;
"/// Objekt";
"/// Job generieren";
let myTEST := 0;
while mySTART <= myEND do
let myJOB := (create Jobs);
myJOB.(Objekte := me);
myJOB.(LTF := me.LTF);
myJOB.(Bezeichnung := myBEZ);
myJOB.(Beschreibung = null);
myJOB.(Firmen := me.Firmen);
myJOB.(Kontakte := me.Kontakte);
if mySTART <= today() then myJOB.(Status := 6) end;
myJOB.(Art := 1);
myJOB.(Startdatum := date(year(mySTART), month(mySTART), day(mySTART)));
myJOB.(Startzeit := myVON);
myJOB.(Endzeit := myBIS);
myJOB.(Benutzer := myUSER);
closeRecord();
mySTART := date(year(mySTART), month(mySTART), day(mySTART)) + 7;
abDatum := date(year(mySTART), month(mySTART), day(mySTART)) + 7
end
end

Mo 02.11.2020 08:30 - 12:00   (Wert falsch +6 anstatt +7 Tage)
Mo 26.10.2020 08:30 - 12:00   (Wert falsch +6 anstatt +7 Tage)
Di 20.10.2020 08:30 - 12:00
Di 13.10.2020 08:30 - 12:00

Hat jemand ebenfalls dieses Problem und eine Lösung?

Besten Dank im Voraus.