Всавка NULL - проблема

[Yuran]

Interbase
поле в таблице ДОПУСКАЕТ значение NULL
Пишу такой код:

dm.QPosition.SQL.Clear;
dm.QPosition.SQL.Add('Update TBL_POS set INVNUM=NULL where POSNAME='+PosFrom);
//dm.QPosition.ParamByName('Q').AsString:='';
dm.QPosition.ExecSQL;

В результате ошибка:

[XeruH]

Твоя ошибка к NULL никакого отношения не имеет.
По ссылке думаю долженбыть ответ на твой вопрос.
http://www.ibase.ru/devinfo/ibrusfaq.htm

[Yurk@]

а что есть "Q" ???

[Yuran]

Q - сейчас просто коментарий
раньше было так

dm.QPosition.SQL.Add('Update TBL_POS set INVNUM=:Q where POSNAME='+PosFrom)

XeruH, ты прав. Хотя ссылка мне и не помогла, пришлось пересоздать таблицу.
Возникла другая ошибка. вот полный код

procedure TMoveF.Button1Click(Sender: TObject);
var s:string;
    PosFrom, PosTo:string;
    FromName, ToName:string;
    InvMov:string;
begin
        s:=dm.QInventarID.AsString;
InvMov:=dm.QInventarINVNUM.AsString;

dm.QPosition.Locate('INVNUM',dm.QInventarINVNUM.AsString,[]);

   posFrom:=dm.QPositionID.AsString; 
FromName:=dm.QPositionPOSNAME.AsString;

dm.QPosition.Locate('POSNAME',dm.QPosSearchPOSNAME.AsString,[]);

   PosTo:=dm.QPositionID.AsString;
ToName:=dm.QPositionPOSNAME.AsString;

dm.QInventar.SQL.Clear;
dm.QInventar.SQL.Add('update TBL_INV set DESTIN=:Q, MSTATUS=:W where id='+s);
dm.QInventar.ParamByName('Q').Value:=PosTo;
dm.QInventar.ParamByName('W').Value:=dm.QStatusKEY.AsInteger;
dm.QInventar.ExecSQL;

if PosTo<>'1' then
   begin
   dm.QPosition.SQL.Clear;
   dm.QPosition.SQL.Add('Update TBL_POS set INVNUM=:Q where ID='+PosTo);
   dm.QPosition.ParamByName('Q').Value:=InvMov;
   dm.QPosition.ExecSQL;
   end;
dm.QPosition.SQL.Clear;
dm.QPosition.SQL.Add('Update TBL_POS set INVNUM=NULL where ID='+PosFrom);
dm.QPosition.ExecSQL;

DM.QMove.SQL.Clear;
dm.QMove.SQL.Add('insert into TBL_MOVE (ACT, MOVEDATE, INVNUM, MFROM, MTO, MSTATUS, DESCR) values (:Q, :W, :U, :E, :R, :T, :Y)');
dm.QMove.ParamByName('Q').Value:='Ïåðåìåùåíèå';
dm.QMove.ParamByName('W').Value:=date;
dm.QMove.ParamByName('U').Value:=InvMov;
dm.QMove.ParamByName('E').Value:=FromName;
dm.QMove.ParamByName('R').Value:=ToName;
dm.QMove.ParamByName('T').Value:=dm.QStatusMSTAT.AsString;
dm.QMove.ParamByName('Y').Value:=' ';
dm.QMove.ExecSQL;
dm.TranS.Commit;

dm.QInventar.Close;
dm.QInventar.SQL.Clear;
dm.QInventar.SQL.Add('Select * from TBL_INV order by INVNUM');
dm.QInventar.Open;//ЗДЕСЬ ОШИБКА
dm.QInventar.Locate('ID',s,[]);

dm.QPosition.Close;
dm.QPosition.SQL.Clear;
dm.QPosition.SQL.Add('Select * from TBL_POS order by POSNAME');
dm.QPosition.Open;
dm.QPosition.Locate('ID',PosTo,[]);

dm.QPosSearch.Close;
dm.QPosSearch.SQL.Clear;
dm.QPosSearch.SQL.Add('Select ID, POSNAME, INVNUM from TBL_POS where INVNUM is Null order by POSNAME');
dm.QPosSearch.Open;
modalresult:=mrOk;
end;

И в чем блин проблема ?????