Hi,
ich habe hier eine Textdatei mit Daten. Diese sollen in eine Firebird Datenbank :
Delphi-Quellcode:
Memo1.Lines.Add(copy (zeile,11,5) + ' ' + copy (zeile,16,25)+' '+copy (zeile,193,10));
EingDM.ArtDS.insert;
...
EingDM.ArtDS.FindField ('VP').AsFloat := StrToFloat (copy (zeile,193,10));
EingDM.ArtDS.FindField ('EP').AsFloat := StrToFloat (copy (zeile,433,10));
...
VP ist Verkaufspreis und EP ist Einkaufspreis. Der ganze Datensatz steht in einer Zeile mit festen Feldlängen. Ab Stelle 193 folgen 10 Stellen, in denen die Zahl drin steht. Das wird nicht gespeichert (also VP). Selbst wenn ich die 193 durch 433 ersetze und somit den EP als VP benutze wird nichts gespeichert. Alle anderen Felder gehen einwandfrei.
Die Tabelle hat 2 Trigger, die habe ich vorsichtshalber noch überprüft. Nichts besonderes. Was kann das sein ? Any Ideas ?
