[firebase-br] Erro Field Name is Missing

[Valdir Dill]

Tenho a seguinte rotina para verificar e evitar cadastrar dois clientes com o mesmo nome:

if HouveDuplicacaoChave('CLIENTES', 'NOME', AnsiUpperCase(DBEdit2.text))then
 ShowMessage('Esse nome já existe');

Function HouveDuplicacaoChave(VTabela, VCampo, VValor: String) : boolean;
begin
 SQLDataSet1.Close;
 SQLDataSet1.Close;
 SQLDataSet1.CommandText := 'SELECT UPPER('+VCampo+') FROM '+VTabela+' WHERE UPPER('+VCampo+')=:VDado';
 SQLDataSet1.Params[0].AsString := VValor;
 SQLDataSet1.Open;
 Result := not SQLDataSet1.IsEmpty;
end;

Vários usuários utilizam o sistema, mas, em alguns deles (pequeno percentual), ocorre o seguinte ao se executar a rotina:
 "SQLDataSet1 field name is missing"

O sistema utiliza Firebird 1.5.

Não é em todo computador que ocorre. A única relação que consegui estabelecer entre as máquinas onde o erro ocorre, é que todas tem o Interbase instalado. 

Será que é algum conflito com o Interbase? Ou será que minha função tem algum erro?

Obrigado.