Firebird Sql Syntax Problem

[Schuster]

Hy Leute,

habe ein kleines Problem mit der Umstellung von MySql auf Firebird 1.5:

Bei meiner kleinen Kundendatenbank bekomme ich bei folgenden Code diese Meldung (siehe Anhang Fehler.jpg):

Code:

with  DataModule1.ZQuery_Kd_such do
        begin
            sql.Clear;
            sql.Add('Insert into kdaten (Anrede,Titel,FamName,VorName,Strasse,Plz,Ort,'+
                    'GebDat,FamStand,Staatsbuerger,Beruf,Arbeitgeber,Beamter,Betreuer,'+
                    'Bemerkungen,Kundennr) values ('+
                    QuotedStr(Cmb_Kd_Speichern_Anrede.Text)+','+
                    QuotedStr(Cmb_Kd_speichern_Titel.Text)+','+
                    QuotedStr(Edt_Kd_speichern_FamName.Text)+','+
                    QuotedStr(Edt_Kd_speichern_VorName.Text)+','+
                    QuotedStr(Edt_Kd_speichern_Strasse.Text)+','+
                    QuotedStr(Edt_Kd_speichern_Plz.Text)+','+
                    QuotedStr(Edt_Kd_speichern_Ort.Text)+','+
                    QuotedStr(MeineFunktion.Datumformatieren(Edt_Kd_speichern_GebDat.Text))+','+
                    QuotedStr(Cmb_Kd_speichern_FamStand.Text)+','+
                    QuotedStr(Cmb_Kd_speichern_StBuerger.Text)+','+
                    QuotedStr(Edt_Kd_speichern_Beruf.Text)+','+
                    QuotedStr(Edt_Kd_speichern_Arbeitgeber.Text)+','+
                    QuotedStr(OeffD)+','+
                    QuotedStr(Cmb_Kd_speichern_Betreuer.Text)+','+
                    QuotedStr(Memo_Kd_speichern_Sonstiges.Text)+','+
                    QuotedStr ('1')+')');
            ExecSQL;
        end;   //Ende Kundendaten speichern

Wie die DB aufgebaut ist seht ihr im Anhang Datenbank.jpg