Ich möchte eine kleine Vertragsdatenbank realisieren (Zeitschriftenabos, Softwareabos und was es da sonst heute noch gibt). Dazu soll mit anhand der Vertrragslaufzeit der Beginn der nächsten Laufzeit ausgegeben werden und mit der Kündigungsfrist das Datum, bis zu dem man spätestens kündigen müsste, wenn man es wollte. Ich scheitere momentan aber schon beim ersten Teil (vermute aber, dass man die Lösung des ersten Teils modifiziert auch für den zweiten Teil einsetzen könnte)

Gegeben sind (u.a.)

- ein Feld "Vertrag ab" als Datumsfeld mit dem Start-Datum eines Vertrages

- ein Feld "Vertragslaufzeit" als Auswahlliste mit verschiedenen Laufzeiten (monatlich, Quartal usw)

- ein Feld "Beginn nächste Laufzeit" - das habe ich als Berechnungsfeld angelegt, denn wenn ich das richtig sehe würde sich ein Datumsfeld nur aktualisieren lassen wenn sich irgendwas am Inhalt der Tabelle bzw des Datensatzes ändert - das ist in dem Fall aber ja eher nicht der Normalfall

Folgenden Code habe ich bisher:

let vertrag := 'Vertrag ab';
let monate := 1;

if Vertragslaufzeit = "Jährlich" then
let monate := 12;
void
end;

if Vertragslaufzeit = "Halbjährlich" then
let monate := 6;
void
end;

if Vertragslaufzeit = "Quartal" then
let monate := 3;
void
end;

while (vertrag <=today()) do
 vertrag := date((vertrag), month(vertrag) + monate, day(vertrag));
end;

'Beginn nächste Laufzeit' := format(vertrag, "DD.MM.YYYY");

Mit der letzten Zeile soll das Ergebnis der Datumsberechnung ausgegeben werden - nur das klappt nicht, da gibt es im Editor eine Fehlermeldung "die Tabelle ist kein einfaches Datenfeld. Mache ich als letzte Zeile "nur"

format(vertrag, "DD.MM.YYYY");

oder 

vertrag;

gibt es zwar keine Fehlermeldung, aber es wird auch nichs angezeigt.

Nun weiß ich nicht mehr weiter - kann mir jemand auf die Sprünge helfen?