- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Trfunction para subtração
×
Linguagem de Programação ADVPL
Perguntas Trfunction para subtração
- dzf6762
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 18
- Obrigados Recebidos: 0
8 anos 4 meses atrás #30897
por dzf6762
Trfunction para subtração foi criado por dzf6762
Bom dia Pessoal;
Estou com duvida na classe TRFunction.
Por exemplo, eu tenho um TRFunction que soma as informações do campo VLRTIT(VALOR DO TITULOS), um TRFunction que soma E2_DECRESC, e um terceiro TRFunction que pegue a somatoria do primeiro e subtraia a somatario do segundo, ou seja (VLRTIT - E2_DECRESC) QUE SERIA O TOTAL.
Como faço este terceiro ?
O primeiro esta desta forma:
oFunction1 := TRFunction():New(oSessao1:Cell("VLRTIT") ,"Total Tit, :","SUM",oBreak,"",'@E 999,999,999.99',,.F.,.F.,.F.)
O segundo desta:
oFunction1 := TRFunction():New(oSessao1:Cell("E2_DECRESC"),"Total Desc.:","SUM",oBreak,"",'@E 999,999,999.99',,.F.,.F.,.F.)
Deixei o fonte para quem pode me ajudar.
Denis Zanichelli
Estou com duvida na classe TRFunction.
Por exemplo, eu tenho um TRFunction que soma as informações do campo VLRTIT(VALOR DO TITULOS), um TRFunction que soma E2_DECRESC, e um terceiro TRFunction que pegue a somatoria do primeiro e subtraia a somatario do segundo, ou seja (VLRTIT - E2_DECRESC) QUE SERIA O TOTAL.
Como faço este terceiro ?
O primeiro esta desta forma:
oFunction1 := TRFunction():New(oSessao1:Cell("VLRTIT") ,"Total Tit, :","SUM",oBreak,"",'@E 999,999,999.99',,.F.,.F.,.F.)
O segundo desta:
oFunction1 := TRFunction():New(oSessao1:Cell("E2_DECRESC"),"Total Desc.:","SUM",oBreak,"",'@E 999,999,999.99',,.F.,.F.,.F.)
Deixei o fonte para quem pode me ajudar.
Denis Zanichelli
Por favor Acessar ou Registrar para participar da conversa.
- dzf6762
- Autor do Tópico
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 18
- Obrigados Recebidos: 0
8 anos 4 meses atrás #30898
por dzf6762
Respondido por dzf6762 no tópico Trfunction para subtração
Pessoal não precisa mais consegui fazer deste modo aqui:
a terceira linha ficou assim:
oFunction1 := TRFunction():New(oSessao1:Cell("VLRTOTAL") ,"Total Geral:","ONPRINT",oBreak,"",'@E 999,999,999.99',{||oSessao1:aFunction[1]:GetValue() - oSessao1:aFunction[2]:GetValue()},.F.,.F.,.F.)
a terceira linha ficou assim:
oFunction1 := TRFunction():New(oSessao1:Cell("VLRTOTAL") ,"Total Geral:","ONPRINT",oBreak,"",'@E 999,999,999.99',{||oSessao1:aFunction[1]:GetValue() - oSessao1:aFunction[2]:GetValue()},.F.,.F.,.F.)
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Trfunction para subtração
Tempo para a criação da página:0.076 segundos