Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
jorgejlbd Aprendiz

Registrado: Segunda-Feira, 28 de Fevereiro de 2005 Mensagens: 131
|
Enviada: Ter Mai 06, 2008 2:56 pm Assunto: resolvido - impressao de relatorio agrupado usando rdprint |
|
|
oi amigos
estou tentando fazer um relatório agrupado usando RdPrint, sera que vc podem me ajudar
as tabelas são : produtos, grupoProd
produto: codprod, nomeProd, grupo , valor ...etc..
GrupoProd: codGrup, NomeGrupo ..
alguém pode me ajudar
abraço..... |
|
Voltar ao Topo |
|
 |
joemil Moderador

Registrado: Quinta-Feira, 25 de Março de 2004 Mensagens: 9100 Localização: Sinop-MT
|
Enviada: Ter Mai 06, 2008 3:33 pm Assunto: |
|
|
primeiro vc deve selecionar os itens ja na ordem q vc precisa, por exemplo:
SELECT p.*, g.descricao AS grupo FROM produtos p
LEFT JOIN grupo g ON g.codigo = p.codgrupo
ORDER BY grupo, p.descricao
depois, vc cria uma variavel pra controlar o grupo:
Código: |
procedure ...
var Grupo: String;
begin
// selecione os dados aqui
Grupo := 'xyz'; // SO PRA FICAR DIFERENTE
while not Query1.Eof do begin
if Query1Grupo.AsString <> Grupo then
// imprima o grupo aqui
// imprima os dados do produto aqui
Grupo := Query1Grupo.AsString; // pra trocar de grupo
Query1.Next;
end;
end; |
_________________ <b>SEMPRE COLOQUE [RESOLVIDO] NO SEU POST</b>
Enviar imagens: http://tinypic.com/ |
|
Voltar ao Topo |
|
 |
jorgejlbd Aprendiz

Registrado: Segunda-Feira, 28 de Fevereiro de 2005 Mensagens: 131
|
Enviada: Sex Mai 23, 2008 5:33 pm Assunto: impressao de relatorio agrupado usando rdprint |
|
|
valeu amigos ..
ate...a proxima...desculpe a demora |
|
Voltar ao Topo |
|
 |
|