Habe einen Knopf wo folgende Informationen aus "Importtabelle" Tabelle importiert in die  "Mitglieder" Tabelle beim übertragen wird mir die Geburtsdaten nicht korrekt übertragen ( new.(Datum := i.Datum); funktioniert aber Datum ist bei allen das gleiche) es sind alle mit dem gleichen Datum übertragen es steht überall 01.01.1970. Bei den Feldern handelt es sich beides mal um "Datums" Felder.

Was mache ich falsch beim Datum kopieren. Hat vielleicht jemand einen Tip für mich.

Vielen Dank für Eure Hilfe. Grüsse Claus

for i in select Importtabelle do
 let myTAB := (select Mitglieder where Steuernummer = i.Steuernummer);
 if cnt(myTAB) = 0 then
  let new := (create Mitglieder);
  new.(Steuernummer := i.Steuernummer);
  new.(Status := 1);
  new.('seit:' := today());
  new.(Name := i.Name);
  new.(Beruf := i.Beruf);
  new.(Datum := i.Datum);
  new.(Abteilung := i.Abteilung)
 else
  switch first(myTAB).Status do
  case 1:
   first(myTAB).(Status := 3)
  case 2:
   (
    first(myTAB).(Status := 1);
    first(myTAB).('seit:' := today())
   )
  end
 end
end;
for i in select Mitglieder where Status = 2 do
 if cnt(select Importtabelle where Steuernummer = i.Steuernummer) != 0 then
  i.(Status := 1);
  i.('seit:' := today())
 end
end;
for i in select Mitglieder where Status != 2 do
 if cnt(select Importtabelle where Steuernummer = i.Steuernummer) = 0 then
  i.(Status := 2);
  i.('seit:' := today())
 end
end