Fórum Problema com relatório no Delphi 7 e Rave Reports #344505

15/08/2007

0

Tenho um relatorio no Raver Reports 5.1 onde eu tenho dois SQL que me traz os dados do banco.

1 – SQL na propriedade Query

SELECT CODTRA,NOME,CIDADE+´ - ´+BAIRRO+´ - ´+RUA,NUMERO,TELEFONE
FROM TTRA
WHERE CODTRA IN
(SELECT CODTRA FROM TMOV WHERE IDMOV IN(SELECT IDMOV FROM TMOVCOMPL WHERE MINUTA = ´:CODIGO´)
AND ((STATUS = ´F´) OR (STATUS = ´N´) OR (STATUS = ´Q´) OR (STATUS = ´P´))
AND CODTMV >= ´2.2.01´
AND CODTMV<= ´2.4.15´)
ORDER BY NOME

2 – SQL na Propriedade Query

SELECT M.NUMEROMOV,M.QUANTIDADE,C.NOMEFANTASIA,C.CIDADEENTREGA+´ - ´+C.CODETDENTREGA+
´ - ´+C.BAIRROENTREGA+´ - ´+C.RUAENTREGA+´ - ´+C.NUMEROENTREGA,M.VALORLIQUIDO,CC.MINUTA MINUTA$$,
M.PESOBRUTO,M.VALORBRUTO,M.DATAEMISSAO,CC.DATAMINUTA
FROM TMOV M, FCFO C,TMOVCOMPL CC
WHERE M.IDMOV IN (SELECT IDMOV FROM TMOVCOMPL WHERE MINUTA = ´:CODIGO´)
AND M.CODCFO = C.CODCFO
AND ((STATUS = ´F´) OR (STATUS = ´N´) OR (STATUS = ´Q´) OR (STATUS = ´P´))
AND M.CODTMV >= ´2.2.01´
AND M.CODTMV<= ´2.4.15´
AND M.IDMOV = CC.IDMOV
ORDER BY MINUTA$$


Estou passando o parâmetro :CODIGO e na opção QueryParams de cada um estou me referindo a seguinte forma:

CODIGO=Param.PARAM1.(´103-6832´)

Passando um número para poder testar em tempo de execução, até ai está tudo certo, mais na aplicação delphi:



procedure TFrmPrncipal.Button1Click(Sender: TObject);
begin
//codigo para executar o relatório
RvProject1.Open;
RvProject1.SetParam(´PARAM1´,Edit1.Text);
RvProject1.ExecuteReport(´Report1´);
RvProject1.Close;

end;


Esta gerando o relatório mais sempre o mesmo que foi passado como parâmetro e não o que estou digitando dentro do edit.

Agradeço a Ajuda!!!


Crist

Crist

Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar