Rave Reports (Data)
Galera, uso a seguinte query para gerar um relatório no Rave
SELECT
LIVROS.LIVR_NOME AS Titulo,
LIVROS.LIVR_TIPO AS Tipo,
Sum(PALETES.PLTE_PESO) AS Peso,
Sum(PALETES.PLTE_QT_LIVR) AS Qtd_livros,
Sum(PALETES.PLTE_QT_ENCO) AS Qtd_Encomendas,
Count(PALETES.PLTE_CD_BARRA) AS Qtd_Paletes,
LIVROS.LIVR_EDITORA,
FROM
LIVROS INNER JOIN PALETES ON LIVROS.LIVR_CODIGO = PALETES.PLTE_LIVR_CD
WHERE
(((PALETES.PLTE_DT_PROD) Between :Data1 and :Data2))
GROUP BY
LIVROS.LIVR_NOME,
LIVROS.LIVR_TIPO,
LIVROS.LIVR_EDITORA,
PALETES.PLTE_DT_PROD
Esta funcionando direitinho, mas eu queria colocar no relatório as datas digitadas em :Data1 e :Data2
Exemplo:
O usuário digitou 27/10/03 em :Data1 e 28/10/03 em :Data2
Gostaria que ficasse assim:
RELATÓRIO DE PRODUÇÃO
DE ´27/10/03´ ATÉ ´28/10/03´
Alguém sabe??????
Valeu!!!!!
bampavao@editorasaraiva.com.br
SELECT
LIVROS.LIVR_NOME AS Titulo,
LIVROS.LIVR_TIPO AS Tipo,
Sum(PALETES.PLTE_PESO) AS Peso,
Sum(PALETES.PLTE_QT_LIVR) AS Qtd_livros,
Sum(PALETES.PLTE_QT_ENCO) AS Qtd_Encomendas,
Count(PALETES.PLTE_CD_BARRA) AS Qtd_Paletes,
LIVROS.LIVR_EDITORA,
FROM
LIVROS INNER JOIN PALETES ON LIVROS.LIVR_CODIGO = PALETES.PLTE_LIVR_CD
WHERE
(((PALETES.PLTE_DT_PROD) Between :Data1 and :Data2))
GROUP BY
LIVROS.LIVR_NOME,
LIVROS.LIVR_TIPO,
LIVROS.LIVR_EDITORA,
PALETES.PLTE_DT_PROD
Esta funcionando direitinho, mas eu queria colocar no relatório as datas digitadas em :Data1 e :Data2
Exemplo:
O usuário digitou 27/10/03 em :Data1 e 28/10/03 em :Data2
Gostaria que ficasse assim:
RELATÓRIO DE PRODUÇÃO
DE ´27/10/03´ ATÉ ´28/10/03´
Alguém sabe??????
Valeu!!!!!
bampavao@editorasaraiva.com.br
Bampavao
Curtidas 0
Respostas
Frare
30/10/2003
Olá, Bam
Tente isso:
//Seta o Parametro p_data com o conteúdo do Label1 RvProject1.SetParam(´p_data´,Label1.Caption); //Executa o relatorio RvProject1.ExecuteReport(´Report1´);
Espero ter ajudado. :wink:
Tente isso:
//Seta o Parametro p_data com o conteúdo do Label1 RvProject1.SetParam(´p_data´,Label1.Caption); //Executa o relatorio RvProject1.ExecuteReport(´Report1´);
Espero ter ajudado. :wink:
GOSTEI 0
Bampavao
30/10/2003
Eai Frare, blz!!!???
Eu quero que as datas apareçam dentro do relatório, não sei se o que vc passou pra mim é valido.
Uso o seguinte, no evento de um botão...
begin
with dmPrincipal.qryRelLivrPa do begin
with Parameters do begin
ParamByName(´Data1´).Value := StrToDateTime(Edit1.Text);
ParamByName(´Data2´).Value := StrToDateTime(Edit2.Text);
if not Active then Open
else
REQUERY;
dmPrincipal.rvprjRelLivrPa.ExecuteReport(´rptRelLivrPa´);
end;
end;
dmPrincipal.qryRelLivrPa.Close;
dmPrincipal := NIL;
Close;
end;
Alguém tem mais alguma idéia?????
Eu quero que as datas apareçam dentro do relatório, não sei se o que vc passou pra mim é valido.
Uso o seguinte, no evento de um botão...
begin
with dmPrincipal.qryRelLivrPa do begin
with Parameters do begin
ParamByName(´Data1´).Value := StrToDateTime(Edit1.Text);
ParamByName(´Data2´).Value := StrToDateTime(Edit2.Text);
if not Active then Open
else
REQUERY;
dmPrincipal.rvprjRelLivrPa.ExecuteReport(´rptRelLivrPa´);
end;
end;
dmPrincipal.qryRelLivrPa.Close;
dmPrincipal := NIL;
Close;
end;
Alguém tem mais alguma idéia?????
GOSTEI 0
Bampavao
30/10/2003
Sobe!!!!!! Ninguém sabe?????
Valeu!!!!!
Valeu!!!!!
GOSTEI 0
Bampavao
30/10/2003
Galera, achei o que eu queria, entrem no link abaixo
http://www.delphibr.com.br/artigos/param_rave.php
É um ÓTIMO artigo feito pelo Marcos P. Gomes.
http://www.delphibr.com.br/artigos/param_rave.php
É um ÓTIMO artigo feito pelo Marcos P. Gomes.
GOSTEI 0