RdPrint - Relatório Pis/Cofins

[idanielv8 0]

Galera é o seguinte, não conheço muito bem esse componente, no entanto, eu já tenho a consulta (sql) pronta para esse relatório, mas não estou conseguindo faze-lo como se deve, alguém que domina esse componente, poderia me ajudar, me mandando algum .pas para eu fazer as devidas modificações...

 

Desde já eu agradeço.

[Eisenheim 67]

Olá amigo!

 

Você tem algo já feito para postar e em cima disso discutirmos aonde está sua dificuldade?

 

Até a próxima. :thumbsup:

[idanielv8 0]

Estou terminando outro procedimento e esse eu mal comecei, mas hoje a noite e no mais tardar amanha pela manha, acho que tenho feito alguma coisa, dai te passo para você poder me ajudar meu amigo... muito obrigado de ante mao....

[idanielv8 0]

Caro amigo, terminei a primeira parte do relatorio, agora estou com uma duvida com relacao a um array para ultima parte do relatorio, você poderia me ajudar?

 

 

//declarando o array do tipo Record

type

TCst = Record

Cst: String;

CstVlr: Currency;

end;

.......

 

//declarando a variável

Var

WCst : array of TCst;

.......

 

//configurando o tamanho dinamico do array

SetLength(WCst,QryPisCofins.RecordCount);

.......

 

//passando valores

WCst.Cst := QryPisCofins.FieldByName('Cst_Pis').AsString;

WCst.CstVlr := QryPisCofins.FieldByName('VlrContabil').AsCurrency;

i := i + 1;

.......

 

 

Está funcionando perfeito, agora eu quero somar os valores na qual possuem o mesmo codigo de CST,

por exemplo:

Registro 1 - cst 70, vlr = 10

Registro 2 - cst 50, vlr = 20

Registro 3 - cst 10, vlr = 45

Registro 4 - cst 70, vlr = 44

 

quero colocar o resultado em 2 variaveis o codigo cst e sua respectiva soma,

ficando assim:

 

codCST = 10, vlrCST = 45

codCST = 50, vlrCST = 20

codCST = 70, vlrCST = 54 <-- observem que aqui tem a soma

 

Nao estou conseguindo ver como fazer isso... hoje nao estou legal na cabeça, me cerebro nao estah processando direito...

Já tentei com for, com while, mas nada encaixa como resolver isso... eh aparentemente bem simples...

Obrigado desde já...

[Eisenheim 67]

Olá amigo!

 

Você já criou um tópico específico para a sua dúvida a qual está duplicado. Evite ficar duplicando sua dúvida pois fica complicado de administrá-los dessa maneira. Como você já criou um tópico, basta aguardar que logo sua dúvida será respondida. Dessa maneira facilita para futuras consultas a respeito de uma dúvida semelhante.

 

Fica a dica.

 

Até a próxima. :thumbsup:

[idanielv8 0]

obrigado pela dica meu amigo... e desculpas...