DELPHI 7 x QUICK REPORT 3.0.9
Pessoal, preciso de uma ajuda sobre História sobre o QuickReport..rs.rs
Faz tempo que não mexo com o QuickReport e nem com o Delphi 7 e tem um relatorio
que a empresa esta precisando fazer uma manutenção e que não esta efetuando as Quebras.
A Função do relatorio é fazer um listar todos os produtos vendidos durante um periodo, para um determinado Cliente, onde a cada novo Cliente, é totalizado
o valor VENDIDO para o CLIENTE e terá um saldo de página para o próximo cliente.
Há uma query no relatório com a seguinte SQL
SELECT CR.CR_CLIE AS CODCLIENTE, PR.PR_REFI, PR_GRUP, PR_SUBG, PR_CODI, PR_DESC, IV.IV_CORE, IV.IV_TAMA, IV_UPCU, IV_PVEN,
SUM(IV_QTDE) QTDE ,sum(IV.IV_TOTA) TOTAL
FROM ITENS_VENDAS IV
LEFT JOIN ESTOQUE ES ON (IV.IV_GRUP=ES.ES_GRUP) AND
(IV.IV_SUBG=ES.ES_SUBG) AND
(IV.IV_PROD=ES.ES_PROD) AND
(IV.IV_CORE=ES.ES_CORE) AND
(IV.IV_TAMA=ES.ES_TAMA)
LEFT JOIN PRODUTOS PR ON (IV.IV_GRUP=PR.PR_GRUP) AND
(IV.IV_SUBG=PR.PR_SUBG) AND
(IV.IV_PROD=PR.PR_CODI)
INNER JOIN VENDAS VE ON (IV.IV_VEND=VE.VE_CODI) AND
(IV.IV_LOJA=VE.VE_LOJA) AND
(IV.IV_CAIX=VE.VE_CAIX)
LEFT JOIN CREDIARIOS CR ON (IV.IV_VEND=CR.CR_VEND) AND
(IV.IV_CAIX=CR.CR_CAIX) AND
(IV.IV_LOJA=CR.CR_LOJA)
WHERE 1=1
GROUP BY CR.CR_CLIE, PR.PR_REFI, PR_GRUP, PR_SUBG, PR_CODI, PR.PR_DESC, IV.IV_CORE, IV.IV_TAMA , IV_UPCU, IV_PVEN
ORDER BY QTDE DESC
No formulário tem as seguintes configurações:
Tenho 1 Objeto QuickRep, Nele 5 Bandas, sendo
3 banda QrBand, 1 Qrgroup, 1 QrSubdetail1
Estão dispostas da seguinte maneira.
1 Quickrep, Name=Relatorio. e dentro dele por ordem esta:
1a) Qrband1 - Name= BandaCabecalho = Começando o relatório, é o cabeçalho principal do Relatório, onde mostra todos os filtros usados.
Ele aparece uma vez apenas.
2a) QrGroup - A banda de Qrgroup, esta renomeada QuebraCliente, que deve controlar a quebra de clientes e as outras bandas associadas ao cliente em questão.
na expressão qVendas.CODCLIENTE. Possui uma Label onde exibe o Codigo e Nome do Cliente a ser listado.
3a) Qrband2 - Name=BndCabDetalhe, esta banda apenas exibe o cabeçalho após cada quebra de clientes, onde exibira o texto "Codigo Nome Produto Qtde valor"
linkBand = QrGroup1
4a) QrSubDetails = N=DetalheCliente, Esta banda exibe os detalhes dos produtos do Cliente
DataSet=Qvendas - Footerband= BndTotalCliente -
headerBand= BndCabDetalhe - linkBand = QrGroup1 - Master = Relatorio
5a) QrBand3 - Name=BndTotalCliente, Esta banda é para exibir o somatorio do Total dos clientes
linkBand = QrGroup1
Problemas:
O relatório anteriormente não totalizava os valores do cliente. Agora terei que implementar isto, sendo que qdo insiro uma banda, o
Qreport colocar ela abaixo de QrBand1 e não consigo colocar ela para baixo.
A quebra parou de funcionar.
Quem puder me ajudar Eu agradeço.
Faz tempo que não mexo com o QuickReport e nem com o Delphi 7 e tem um relatorio
que a empresa esta precisando fazer uma manutenção e que não esta efetuando as Quebras.
A Função do relatorio é fazer um listar todos os produtos vendidos durante um periodo, para um determinado Cliente, onde a cada novo Cliente, é totalizado
o valor VENDIDO para o CLIENTE e terá um saldo de página para o próximo cliente.
Há uma query no relatório com a seguinte SQL
SELECT CR.CR_CLIE AS CODCLIENTE, PR.PR_REFI, PR_GRUP, PR_SUBG, PR_CODI, PR_DESC, IV.IV_CORE, IV.IV_TAMA, IV_UPCU, IV_PVEN,
SUM(IV_QTDE) QTDE ,sum(IV.IV_TOTA) TOTAL
FROM ITENS_VENDAS IV
LEFT JOIN ESTOQUE ES ON (IV.IV_GRUP=ES.ES_GRUP) AND
(IV.IV_SUBG=ES.ES_SUBG) AND
(IV.IV_PROD=ES.ES_PROD) AND
(IV.IV_CORE=ES.ES_CORE) AND
(IV.IV_TAMA=ES.ES_TAMA)
LEFT JOIN PRODUTOS PR ON (IV.IV_GRUP=PR.PR_GRUP) AND
(IV.IV_SUBG=PR.PR_SUBG) AND
(IV.IV_PROD=PR.PR_CODI)
INNER JOIN VENDAS VE ON (IV.IV_VEND=VE.VE_CODI) AND
(IV.IV_LOJA=VE.VE_LOJA) AND
(IV.IV_CAIX=VE.VE_CAIX)
LEFT JOIN CREDIARIOS CR ON (IV.IV_VEND=CR.CR_VEND) AND
(IV.IV_CAIX=CR.CR_CAIX) AND
(IV.IV_LOJA=CR.CR_LOJA)
WHERE 1=1
GROUP BY CR.CR_CLIE, PR.PR_REFI, PR_GRUP, PR_SUBG, PR_CODI, PR.PR_DESC, IV.IV_CORE, IV.IV_TAMA , IV_UPCU, IV_PVEN
ORDER BY QTDE DESC
No formulário tem as seguintes configurações:
Tenho 1 Objeto QuickRep, Nele 5 Bandas, sendo
3 banda QrBand, 1 Qrgroup, 1 QrSubdetail1
Estão dispostas da seguinte maneira.
1 Quickrep, Name=Relatorio. e dentro dele por ordem esta:
1a) Qrband1 - Name= BandaCabecalho = Começando o relatório, é o cabeçalho principal do Relatório, onde mostra todos os filtros usados.
Ele aparece uma vez apenas.
2a) QrGroup - A banda de Qrgroup, esta renomeada QuebraCliente, que deve controlar a quebra de clientes e as outras bandas associadas ao cliente em questão.
na expressão qVendas.CODCLIENTE. Possui uma Label onde exibe o Codigo e Nome do Cliente a ser listado.
3a) Qrband2 - Name=BndCabDetalhe, esta banda apenas exibe o cabeçalho após cada quebra de clientes, onde exibira o texto "Codigo Nome Produto Qtde valor"
linkBand = QrGroup1
4a) QrSubDetails = N=DetalheCliente, Esta banda exibe os detalhes dos produtos do Cliente
DataSet=Qvendas - Footerband= BndTotalCliente -
headerBand= BndCabDetalhe - linkBand = QrGroup1 - Master = Relatorio
5a) QrBand3 - Name=BndTotalCliente, Esta banda é para exibir o somatorio do Total dos clientes
linkBand = QrGroup1
Problemas:
O relatório anteriormente não totalizava os valores do cliente. Agora terei que implementar isto, sendo que qdo insiro uma banda, o
Qreport colocar ela abaixo de QrBand1 e não consigo colocar ela para baixo.
A quebra parou de funcionar.
Quem puder me ajudar Eu agradeço.
Leandro Sindorf
Curtidas 0