5. Februar 2007 21:10
IF rec_Artikel.GET(Artikelnummer) THEN
ArtBezeichnung := rec_Artikel.ArtBezeichnung;
Farbe := rec_Artikel.Farbe;
5. Februar 2007 21:26
IF rec_Artikel.GET(Artikelnummer) THEN BEGIN
ArtBezeichnung := rec_Artikel.ArtBezeichnung;
Farbe := rec_Artikel.Farbe;
END;
5. Februar 2007 22:25
5. Februar 2007 22:28
IF rec_Adressdaten.GET(KUNUMMER) THEN BEGIN
ANREDE := rec_Adressdaten.ANREDE;
NAME := rec_Adressdaten.NAME;
ANSCHR := rec_Adressdaten.ANSCHR;
ZUSATZ := rec_Adressdaten.ZUSATZ;
STRASSE := rec_Adressdaten.STRASSE;
PLZ := rec_Adressdaten.PLZ;
ORT := rec_Adressdaten.ORT;
FAX := rec_Adressdaten.FAX;
Alarm := rec_Adressdaten.Alarm;
SPRACHE := rec_Adressdaten.SPRACHE;
KONDITION := rec_Adressdaten.KONDITION;
Eingangsdatum := TODAY;
END;
5. Februar 2007 22:50
IF NOT rec.INSERT THEN
IF NOT MODIFY THEN
ERROR(...);
5. Februar 2007 22:51
5. Februar 2007 22:57
IF rec_Adressdaten.GET(KUNUMMER) THEN BEGIN
ANREDE := rec_Adressdaten.ANREDE;
NAME := rec_Adressdaten.NAME;
ANSCHR := rec_Adressdaten.ANSCHR;
ZUSATZ := rec_Adressdaten.ZUSATZ;
STRASSE := rec_Adressdaten.STRASSE;
PLZ := rec_Adressdaten.PLZ;
ORT := rec_Adressdaten.ORT;
FAX := rec_Adressdaten.FAX;
Alarm := rec_Adressdaten.Alarm;
SPRACHE := rec_Adressdaten.SPRACHE;
KONDITION := rec_Adressdaten.KONDITION;
Eingangsdatum := TODAY;
END ELSE BEGIN
ERROR('Der Kunde %1 wurde nicht gefunden!',KUNUMMER);
END;
Tesarolle hat geschrieben:Ich habe noch was anderes probiert, wenn ich da ein FIND('-') mache holt er mir immer den ersen Datensatz rein, also es würde eigentlich schon funktionieren, ich muss irgendwas übersehen. Woran kann es noch liegen?
Mikka hat geschrieben:Machst du auch ein INSERT bzw. MODIFY?
6. Februar 2007 17:18