FastReport Calculo.

2,023 views
Skip to first unread message

Maicon Anderson Correa Bernardes

unread,
Sep 3, 2013, 9:22:10 PM9/3/13
to dug...@googlegroups.com
Olá, estou começando a utilizar o fast pra relatórios e estou com um problema.
Tenho que calcular o subtotal da conta, descontando os itens cancelados.
A estrutura da "CDS" dos itens esta assim:
- Código Item
- Descrição Item
- Valor Total
- Situação (A=Ativo, C=Cancelado)

Em um "memo" do fast inclui a seguinte condição:

SubTotal:[IIF(<frxItens."IN_ITEM_VENDA"> = 'A', SUM(<frxItens."VL_TOTAL">,DetailData1), 0)]

Detalhe é que sempre retorna o total, não desconsidera o cancelado, ou, não totaliza.
Sei que é uma duvida primaria mais não tenho muito conhecimento em fast.
Agradeço a ajuda.

Marcelo Bortolini

unread,
Sep 4, 2013, 7:54:52 AM9/4/13
to dug...@googlegroups.com
Buenas Maicon, tchê eu não usaria a condição no memo, isso tende não funcionar para cálculos, para trocar cor ou valor de um campo sim, mas para cálculo nunca consegui.
O que uso é uma variável e programo no evento OnBeforePrint do MasterData e dps atribui a variável ao campo memo no rodapé ou sumário, lá aceita código pascal, fica igual fazer no delphi.

Na aba "Código" vc terá um código parecido com este
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
var // declaração das variáveis, tem que ser assim, bem no começo do script
  dAuxTotalVenda    : Double;                                                    
   
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
     /// teste pra ver se é item da mesma venda
   if <frxItens."IN_ITEM_VENDA"> = 'A' then
      dAuxTotalVenda := dAuxTotalVenda + <frxDBRelVendas."VALOR_VENDA">;
                  
    
end;                                                          

procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);
begin
    mValorVenda.Text    := FormatFloat('###,##0.00',dAuxTotalVenda);  // atribui valor ao memo, aqui no sumário
 
end;


begin   /// inicializar a variável, tem que ser dentro deste begin/end que aparece por default no script
  dAuxTotalVenda := 0;               
      
end.
------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Qqr coisa prenda o grito


--
--
Você recebeu esta mensagem porque está inscrito no "DUG-RS -
Delphi Users Group Rio Grande do Sul" em Grupos do Google.
Acesse o nosso BLOG em http://www.dug-rs.org e contribua com a comunidade Delphi do Rio Grande do Sul
Para postar neste grupo, envie um e-mail para dug...@googlegroups.com
Para cancelar a sua inscrição neste grupo, envie um e-mail para
dug-rs-un...@googlegroups.com
Para ver mais opções, visite este grupo em
http://groups.google.com.br/group/dug-rs?hl=pt-BR

Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs

---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+un...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.



--
Marcelo Bortolini

Homesoft Informática

unread,
Sep 4, 2013, 7:42:32 PM9/4/13
to dug...@googlegroups.com
Boa noite, Maicom,
Deve fazer assim:

SubTotal:[SUM(IIF(<frxItens."IN_ITEM_VENDA">='A',<frxItens."VL_TOTAL">,0),DetailData1),
1)]
outra obs: n�o pode ter espa�o entre os comandos vari�veis.

Reginaldo Costa
Homesoft Inform�tica



-----Mensagem Original-----
From: Maicon Anderson Correa Bernardes
Sent: Tuesday, September 03, 2013 10:22 PM
To: dug...@googlegroups.com
Subject: [dug-rs] FastReport Calculo.

Ol�, estou come�ando a utilizar o fast pra relat�rios e estou com um
problema.
Tenho que calcular o subtotal da conta, descontando os itens cancelados.
A estrutura da "CDS" dos itens esta assim:
- C�digo Item
- Descri��o Item
- Valor Total
- Situa��o (A=Ativo, C=Cancelado)

Em um "memo" do fast inclui a seguinte condi��o:

SubTotal:[IIF(<frxItens."IN_ITEM_VENDA"> = 'A',
SUM(<frxItens."VL_TOTAL">,DetailData1), 0)]

Detalhe � que sempre retorna o total, n�o desconsidera o cancelado, ou, n�o
totaliza.
Sei que � uma duvida primaria mais n�o tenho muito conhecimento em fast.
Agrade�o a ajuda.

--
--
Voc� recebeu esta mensagem porque est� inscrito no "DUG-RS -
Delphi Users Group Rio Grande do Sul" em Grupos do Google.
Acesse o nosso BLOG em http://www.dug-rs.org e contribua com a comunidade
Delphi do Rio Grande do Sul
Para postar neste grupo, envie um e-mail para dug...@googlegroups.com
Para cancelar a sua inscri��o neste grupo, envie um e-mail para
dug-rs-un...@googlegroups.com
Para ver mais op��es, visite este grupo em
Message has been deleted

Maicon Anderson Correa Bernardes

unread,
Sep 9, 2013, 6:18:47 PM9/9/13
to dug...@googlegroups.com
Ok muito obrigado.
Sabes me dizer em qual versão do fast consigo acessar a aba code?
A que veio com o delphi não está acessando.

Marcelo Bortolini

unread,
Sep 10, 2013, 7:55:01 AM9/10/13
to dug...@googlegroups.com
Maicon, uso a 4.7.61 do Fast , e delphi 7.


--
--
Você recebeu esta mensagem porque está inscrito no "DUG-RS -

Delphi Users Group Rio Grande do Sul" em Grupos do Google.
Acesse o nosso BLOG em http://www.dug-rs.org e contribua com a comunidade Delphi do Rio Grande do Sul
Para postar neste grupo, envie um e-mail para dug...@googlegroups.com
Para cancelar a sua inscrição neste grupo, envie um e-mail para
dug-rs-un...@googlegroups.com
Para ver mais opções, visite este grupo em

http://groups.google.com.br/group/dug-rs?hl=pt-BR
 
Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs
 
---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+un...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.



--
Marcelo Bortolini

Reply all
Reply to author
Forward
0 new messages