Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Estou fazendo uma consulta para gerar um relatorio, esa cosnulta está certinho, mais ele consulta apanas uma matricula no EDMATRICULAS.TEXT, eu no caso preciso que ela consulte varias matriculas, ou seja, ao colocar uma matricula e a virgula, outra matricula e a virgula, ele consulte e gere o relatorio de todas as matriculas inseridas, até não encontrar a virgula. Acredito precisar de um while mais eu nao tenho ideia de como fazer.
Se alguem puder me ajuda reu agradeço...
Segue abaixo a consulta que estou usando....
procedure btnOKOnClick(Sender: TfrxComponent);
begin
qLOCAL.sql.clear;
qCLIENTE.sql.clear;
qCLIENTE.sql.add('select distinct c.matricula, c.categoria, c.nome, c.endereco, c.numero_imovel, c.hidrometro, c.complemento, c.ROTEIRO,');
qCLIENTE.sql.add('c.ECO_AGUA_RES, c.ECO_AGUA_COM, c.ECO_AGUA_IND, c.ECO_AGUA_PUB, c.ECO_AGUA_UTP,');
qCLIENTE.sql.add('c.ECO_ESG_RES, c.ECO_ESG_COM, c.ECO_ESG_IND, c.ECO_ESG_PUB, c.ECO_ESG_UTP, c.DT_INSTALACAO, l.nome,');
qCLIENTE.sql.add('s.cpf_cnpj, s.bairro, s.telefone, s.codope');
qCLIENTE.sql.add('from cliente c, sgcf s, local l');
qCLIENTE.sql.add(' where c.matricula = ' + EDMATRICULAS.TEXT);
qCLIENTE.sql.add('and c.matricula = s.matricula and c.i_local = l.i_local');
QLOCAL.SQL.ADD('select * from servicos where i_servico = ' + CBSERVICO.TEXT);
end;Carregando comentários...