Problem bei insert mit mssql

[emsländer]

Moin,

hab da so ein kleines Problem mit insert. (MS-SQL2005)

Ich bekomme immer den Hinweis, das das Feld Code nicht gefunden werden kann - es ist aber da (vchar(5)) und auch genau so geschrieben.

Delphi-Quellcode:

_stmp := 'select Jahre03 from finanzdesk.dbo.Firmenkonditionen_dsb where Code = '+QuotedStr(AktenManager.edt_firma_lizenzcode.text);
    _query := Tadoquery.Create(nil);
    with _query do begin
      connection := AktenManager.ADOConnFDD;
      try
        _query.sql.Text := _stmp;
        _query.open;
        if eof then begin
          insert;
          FieldValues['Code'].asstring := AktenManager.edt_firma_lizenzcode.text;
          post;   // HIER KOMMT DER FEHLER
          showmessage('Keine Daten vorhanden'+#10#13+'Neuer Datensatz wird angelegt');
        end else begin;
          edt_fk_03.value := fieldbyname('Jahre03').AsFloat;
          edt_fk_05.value := fieldbyname('Jahre05').AsFloat;
          edt_fk_06.value := fieldbyname('Jahre06').AsFloat;
          edt_fk_08.value := fieldbyname('Jahre08').AsFloat;
          edt_fk_10.value := fieldbyname('Jahre10').AsFloat;
          edt_fk_12.value := fieldbyname('Jahre12').AsFloat;
          edt_fk_15.value := fieldbyname('Jahre15').AsFloat;
          post;
        end;
        _query.Close;
      except
        showmessage('Fehler aufgetreten');
      end;

      freeandnil(_query);
    end;

Wer hat eine Idee?

Gruss

EL