[firebase-br] problema na execucao do sql

[Moyses Perillo de Carvalho]

AO EXECUTAR ESTA SQL ABAIXO PARA UMA DETERMIDADA EMPRESA 1 O PROGRAMA ENCONTRA O
FUNCIONARIO.
SE EXECUTAR NOVAMENTE PARA UMA EMPRESA 2 JA NAO ENCONTRADA O FUNCIONARIO DA EMPRESA 2
SE SAIR DO PROGRAMA E EXECUTAR A EMPRESA 2 ELE ENCONTRA O FUNCIONARIO DA EMPRESA
MAS SE LOGO EM SEGUIDA EXECUTAR PARA A EMPRESA 3 NAO ENCONTRA O FUNCIONARIO

OBRIGADO POR TODA AJUDA

SFUNCI -> TSQLQUERY
CFUNCI -> TCLIENTDATASET
DSFUNCI -> TDATASOURCE

     DM2.CFUNCI.Close;
     DM2.CFUNCI.Active := FALSE;
     DM2.DSFUNCI.DATASET:=DM2.CFUNCI;
     DM2.SFUNCI.Close;
     DM2.SFUNCI.SQL.clear;
     DM2.SFUNCI.sql.add('SELECT
CODFUNCIONARIO,CODEMPRESA,NOME,CODFUNCAO,DESCFUNCAO,TURNO,CODPESSOA,DATAADMISSAO,');
     DM2.SFUNCI.sql.add('DATADEMISSAO,ULTPERIODICO,
INICIOAFASTAMENTO,DIASAFASTAMENTO,MOTIVOAFAST, ');
     DM2.SFUNCI.sql.add('CODSETOR,DATABASE2,SITUACAO,EMPRESA,SITUAC,CODFUN2,SEXO,DATANASC,SETORNOME
');
     DM2.SFUNCI.sql.add(' FROM FUNCIONARIOS');
     DM2.SFUNCI.sql.add(' where  ');
     DM2.SFUNCI.sql.add('(UPPER(NOME) LIKE :WNOME)');
     DM2.SFUNCI.sql.add (' AND (CODEMPRESA = :WCODEMPRESA)');
     DM2.SFUNCI.sql.add (' AND ((SITUAC = :WSITUAC) OR (SITUAC = :WSITUAC2))');
     DM2.SFUNCI.SQL.add(' ORDER BY NOME');

Moyses Perillo de Carvalho
www.mdinformatica.com.br
Fone(31)9222 6014
email perillo em pop.com.br