Es ist wie ich vermutet habe:
Wenn Du dem SP.Param keinen Wert zuweist, gibt die Komponente NULL an die Stored Procedure weiter und diese trägt das dann natürlich auch ein.
Ich nehme an, in der Tabelle sollen unter ID_KUNDE keine NULLS vorkommen. Dann solltest Du Folgendes tun:
- Feld NOT NULL setzen.
entweder:
- In SchreibeDatei ergänzen
Delphi-Quellcode:
...
if Trim (KuNr) <> '' then
SP.ParamByName('ID_KUNDE').AsInteger := StrToInt (KuNr)
else
SP.ParamByName('ID_KUNDE').AsInteger := 0;
und/oder:
- einen Trigger BEFORE INSERT OR UPDATE definieren mit
if (new.id_kunde is null) then new.id_kunde = 0
Der DEFAULT-Wert könnte dann auch wegbleiben.
Der Trigger wäre auf jeden Fall besser um zu gewährleisten, dass immer alles richtig ist (möglichst wenig Verantwortung in die Applikation auslagern).
Im Übrigen würde ich - falls das nicht im Original ohnehin der Fall ist - prüfen, ob KuNr wirklich einer Integer entspricht und entsprechend reagieren (so wie es dasteht, kommt dann eine
Exception mit einer - für den Anwender - vielleicht kryptischen Meldung).
MfG und viel Erfolg
Urs