Nur mal so als Denkansatz: So ein Datumsmove ist ja eine ziemlich allgemeingültige Aufgabe. Für so etwas schreiben wir uns immer Serviceprogramme als Tools. Du könntest z.B. ein Tool schreiben, das folgendermaßen aufgerufen würde: setYearInDate(sdatum:%subdt(tdatum:*Y)). Das Tool würde ein Datum zurückliefern. Damit hättest du das ganze ein für alle Mal gelöst und könntest es immer wiederverwenden.

Dieter