var
Qry2 : TIBOQuery;
begin

Qry2 := TIBOQuery.Create(Application);

with Qry2 do
begin
DatabaseName := 'DATAMETA'
SQL.Add('Select *From PRODUTOS_SALDOS');
SQL.Add('Where CODIG_PRODUTO =:Produto and');
SQL.Add(' DOCUMENTO =:Doc');
ParamByname('Produto').AsInteger := CodigProduto;
ParamByname('Doc').AsString := D;
Open;

if RecordCount <> 0 then <<<--- The mistake happens here:
.....

ISC ERROR CODE: 335544569

ISC ERROR MESSAGE:
Dynamic SQL Error
SQL code error = -104
Token unknown -line2, char -1
Where

STATEMENT:
IBOInternalDataset:
"<TApplication>.<TIBOQuery>.<TIBOInternalDataset>."

Which the problem?

Carlos H. Lemos