Hallo zusammen,

was ist hier falsch?? 

delete (select Druck);
do as server
    let me := this;
    let myPos := 1;
    for i in select Retouren where 'Aufträge'.Vertragspartner.Nr = 3 and Ausgangsdatum = null and Sichtbarkeit = true do
        let new := (create Druck);
        new.(Lieferscheine := me);
        new.(Nummer := myPos);
        new.(KV := i.'Aufträge'.'KV-Nr.');
        new.(KV2 := i.'Aufträge'.'KV-Nr.');
        new.(Name := i.'Aufträge'.Name);
        new.(Vorname := i.'Aufträge'.Vorname);
        new.(Eingang := i.Eingangsdatum);
        new.(Lagerort := i.Lagerort);
        new.(Lieferant := text(i.Lieferantenauswahl));
        myPos := myPos + 1
    end;
    for i in select Druck do
        (select Druck where Name = i.Name and Vorname = i.Vorname and number(Nr) != number(i.Nr)).(
            Name := "";
            Vorname := "";
            KV := ""
        )
    end
end;
printRecord(this, "Lagerbestand")