× Linguagem de Programação ADVPL

Perguntas Duvida Relatorio Contas a Pagar

Mais
9 anos 7 meses atrás #27873 por douglasedp
Pessoal, Bom Dia

Estou criando um relatório usando TReport() que mostra todos os títulos a pagar quebrando por fornecedores e totalizando no campo E2_VALOR em cada quebra. Acontece que apesar de eu ja ter conseguido fazer isso o layout nao está da forma que eu gostaria. Preciso que o totalizador dos fornecedores saia acima da linha , e a linha seria somente para separar os fornecedores.

Segue código e print do relatório impresso, para que se possivel possam me ajudar.

oReport := TReport():New("RCOMR01","Titulos a Pagar	",cPerg,{|oReport| PrintReport(oReport)},"Impressão de cadastro de produtos em TReport simples.")
oReport:SetLandscape(.T.)
 
oSecCab := TRSection():New( oReport , "Titulos", {"QRY"} )
TRCell():New( oSecCab, "E2_FORNECE"     , "QRY")
TRCell():New( oSecCab, "E2_NUM"    , "QRY")
TRCell():New( oSecCab, "E2_PARCELA"    , "QRY")
TRCell():New( oSecCab, "E2_TIPO"      , "QRY")
TRCell():New( oSecCab, "E2_EMISSAO"      , "QRY")
TRCell():New( oSecCab, "E2_VENCTO"      , "QRY")
TRCell():New( oSecCab, "E2_VENCREA"      , "QRY")
TRCell():New( oSecCab, "E2_VALOR"      , "QRY")
TRCell():New( oSecCab, "E2_HIST"      , "QRY")


oBreak := TRBreak():New(oSecCab,oSecCab:Cell("E2_FORNECE"),"------> TOTAL")
TRFunction():New(oSecCab:Cell("E2_VALOR"),NIL,"SUM",oBreak)


Cordialmente,

Douglas Eduardo
Anexos:

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.093 segundos
Joomla templates by a4joomla