Somar V�rios Details no QuickReport

Question

Tenho um problema que pedi solu��o aqui e n�o tive �xito:Numa aplica��o/Tabela eu cadastro o Pai, Filho1 e Filho2.Preciso montar um relat�rio onde mostre:PaiFilho1Filho2E pela sequ�ncia, o pr�ximo cad...

Abueno_silva · Answer

Pelo que entendi, pai, filho1 e filho2 s�o campos do mesmo registro, certo? Ent�o, o DetailCount n�o vai funcionar, pois ele conta apenas os registros. Uma forma de contornar isso � utilizando uma vari�vel e fazer a soma �na m�o�. Declare a vari�vel no in�cio do c�digo do Report, e no BeforePrint da DetailBand verifique se os campos est�o preenchidos, somando-os na vari�vel. No final, coloque uma QRLabel e substitua o Caption pelo total da sua vari�vel.
Espero ter sido �til.
[]�s

Osmar Cardoso · Answer

Abueno, acho que � bem isso que vc falou mas tentei muito e n�o consegui desenvolver essa fun��o.
Realmente preciso contar quantos registros tenho preenchidos na Tabela!
V� se consegue me dar mais detalhes sobre o preenchimento dessa vari�vel?!? Por favor... :?

Abueno_silva · Answer

Vamos l�.Na Unit do QReport, procure a se��o var(logo antes da implementation) e declare a vari�vel:v_tot_reg : integer;No evento BeforePrint do Report:v_tot_reg := 0;No evento BeforePrint da DetailBand (onde s�o impressos os registros): if QRDBText1.Caption <> �� then inc(v_tot_reg); if QRDBText2.Caption <> �� then inc(v_tot_reg); if QRDBText3.Caption <> �� then inc(v_tot_reg);Acrescente uma SummaryBand no Report, coloque uma label e e coloque no evento BeforePrint da Band: QRLabel1.Caption := inttostr(v_tot_reg);Isto deve funcionar, agora � s� voc� formatar o relat�rio como quiser.Se ainda tiver alguma d�vida ou problema, � s� perguntar.[]�s...

Osmar Cardoso · Answer

Alexandre, oi eu traveis...Do jeito que vc me passou ele continuou somando os registros em branco...A� fiz direto na tabela:Table1.Pai.Value...Deu certo s� na primeira vez que se abre o QuickReport! Se abro novamente sem fechar o programa, ele remonta a soma...Agora a d�vida � como fechar o valor na vari�vel ap�s fechar o QuickReport!Agrade�o muito sua aten��o!...

Abueno_silva · Answer

� estranho, j� que quando voc� abre o QR ele deveria zerar...
Voc� pode tentar zerar a vari�vel no final da impress�o (evento AfterPrint do QR), ou ent�o declar�-la na se��o public do report, da� antes de dar o preview ou o print, voc� inicia a vari�vel no form.

[]�s

Osmar Cardoso · Answer

Alexandre, por favor, me desculpe amigo...

Eu n�o havia declarado no evento BeforePrint do Report como vc me orientou (v_tot_reg := 0)!

Com o c�digo completo que me orientou com aquelas modifica��es que te passei e funcionou perfeitamente.

Vc � muito prestativo. Meus agradecimentos sinceros.
Abra�os e at� a pr�xima d�vida.

F�rum Somar V�rios Details no QuickReport #175637