Fórum Msg - Token Unknown.. #140748

Esta msg aparece sempre qdo clico no botão gravar. Eu não estou usando TIBQuery, mas sim TIBTable. Então pq a mensagem Token.. SqlError e etc.. Este erro não é só p/ QUERY? Eis a msg. Project Noah.Exe raised exception class EIBInterBaseError with message ´Dynamic SQLError SQL Error code =-104 Token Unknown - line 2 char 19 CB520´. Process Stoped. Use Step or Run to continue. Eu quero é alterar a tabela de acordo com o filtro abaixo. Não está dando certo. Segue a rotina abaixo. Neste caso o nome do filtro (lancha é:1254CB520). Já coloquei o bloco do filtro antes do First mas continua a mesma coisa. O q faço? Esse é o código onde dá o erro procedure TfrmBaixaEquip.GravarClick(Sender: TObject); begin Dm.Indice.Last; Dm.Lancha.Edit; Dm.LanchaStatus.AsString:=´S´; Dm.Lancha.Post; Dm.histsaida.First; while not (Dm.histsaida.Eof) do begin Dm.HistSaida.Filtered:=false; [b:09c7863bb3]Dm.HistSaida.Filter:=´Lancha = ´+#39+dblookupcombobox1.text+39; [/b:09c7863bb3] Dm.HistSaida.Filtered:=true;******* O Erro aparece aqui*********** dm.HistSaida.edit; dm.HistSaidaFLAG.asstring:=´F´; Dm.HistSaidaDOLAR.asbcd:=Dm.IndiceVALOR.asbcd; Dm.HistSaida.Post; end; Dm.HistSaida.Close; Dm.HistSaida.Open; Dm.Lancha.Close; Dm.Lancha.Open; end;

Coloquei entre aspas o filtro, mudou alguma coisa, ou seja, o Token Unknown, que era CB520, passou a vir completo, no caso, 1254CB520. Mas continua o resto..