INCLUDE SI_RESUL.LST

COMANDO DEPOIS Z_VENDATOTAL = FR("VV_031")
COMANDO DEPOIS Z_TRANSF = FR("VV_011")
COMANDO DEPOIS Z_D_DIN = FR("VV_006")
COMANDO DEPOIS Z_D_CHE = FR("VV_007")
COMANDO DEPOIS Z_D_CAR = FR("VV_008")
COMANDO DEPOIS Z_D_FIS = FR("VV_009")
COMANDO DEPOIS Z_D_JUR = FR("VV_010")
COMANDO DEPOIS Z_DESCBALC = Z_D_DIN+Z_D_CHE+Z_d_CAR+Z_D_JUR+Z_D_FIS
COMANDO DEPOIS Z_V_DIN = FR("VV_001")
COMANDO DEPOIS Z_V_CHE = FR("VV_002")
COMANDO DEPOIS Z_V_CAR = FR("VV_003")
COMANDO DEPOIS Z_V_FIS = FR("VV_004")
COMANDO DEPOIS Z_V_JUR = FR("VV_005")
COMANDO DEPOIS Z_VMDIN = IF(FR("VV_020")>0,Z_V_DIN/FR("VV_020"),0)
COMANDO DEPOIS Z_VMche = IF(FR("VV_021")>0,Z_V_CHE/FR("VV_021"),0)
COMANDO DEPOIS Z_VMCAR = IF(FR("VV_022")>0,Z_V_CAR/FR("VV_022"),0)
COMANDO DEPOIS Z_VMFIS = IF(FR("VV_023")>0,Z_V_FIS/FR("VV_023"),0)
COMANDO DEPOIS Z_VMJUR = IF(FR("VV_024")>0,Z_V_JUR/FR("VV_024"),0)
COMANDO DEPOIS Z_VMGER = IF(FR("VV_030")>0,z_vendatotal /FR("VV_030"),0)
COMANDO DEPOIS Z_TRMED = IF(FR("VV_025")>0,Z_TRANSF/FR("VV_025"),0)
COMANDO DEPOIS Z_pDIN = IF(Z_V_DIN>0,Z_d_DIN/Z_V_DIN,0) * 100
COMANDO DEPOIS Z_pche = IF(Z_V_che>0,Z_d_che/Z_V_che,0) * 100
COMANDO DEPOIS Z_pcar = IF(Z_V_car>0,Z_d_car/Z_V_car,0) * 100
COMANDO DEPOIS Z_pFIS = IF(Z_V_FIS>0,Z_d_FIS/Z_V_FIS,0) * 100
COMANDO DEPOIS Z_pJUR = IF(Z_V_JUR>0,Z_d_JUR/Z_V_JUR,0) * 100
COMANDO DEPOIS Z_PDTOT= IF(z_vendatotal>0,Z_DESCBALC/ z_vendatotal,0) * 100
COMANDO DEPOIS Z_pTDIN = IF(z_vendatotal>0,Z_V_DIN/z_vendatotal,0) * 100
COMANDO DEPOIS Z_pTche = IF(z_vendatotal>0,Z_V_che/z_vendatotal,0) * 100
COMANDO DEPOIS Z_pTcar = IF(z_vendatotal>0,Z_V_car/z_vendatotal,0) * 100
COMANDO DEPOIS Z_pTFIS = IF(z_vendatotal>0,Z_V_FIS/z_vendatotal,0) * 100
COMANDO DEPOIS Z_pTJUR = IF(z_vendatotal>0,Z_V_JUR/z_vendatotal,0) * 100

ULTPAG
ULTPAG     Tipo de Venda         Valor_Total   Cupons  ValorMedio   %Desct  %VdaTot
*                                999,999,999  999,999  999,999.99  999.99%  999.99%
ULTPAG   ----------------------- -----------  -------  ----------  -------  -------
ULTPAG   * em Dinheiro.........: [z_v_din @E 999,999,999]  [fr("VV_020") @e 999,999]  [Z_VMDIN @e 999,999.99]  [Z_PDIN @e 999.99]%  [Z_PTDIN @e 999.99]%
ULTPAG   * em Cheques..........: [z_v_che @E 999,999,999]  [fr("VV_021") @e 999,999]  [Z_VMCHE @e 999,999.99]  [Z_PCHE @e 999.99]%  [Z_PTCHE @e 999.99]%
ULTPAG   * em Cartoes..........: [z_v_car @E 999,999,999]  [fr("VV_022") @e 999,999]  [Z_VMCAR @e 999,999.99]  [Z_PCAR @e 999.99]%  [Z_PTCAR @e 999.99]%
ULTPAG   * Praz Pessoas Fisicas: [z_v_fis @E 999,999,999]  [fr("VV_023") @e 999,999]  [Z_VMFIS @e 999,999.99]  [Z_PFIS @e 999.99]%  [Z_PTFIS @e 999.99]%
ULTPAG   * Praz Pessoas Jurid..: [z_v_jur @E 999,999,999]  [fr("VV_024") @e 999,999]  [Z_VMJUR @e 999,999.99]  [Z_PJUR @e 999.99]%  [Z_PTJUR @e 999.99]%
ULTPAG   ----------------------- ---,---,---  ---,---  ---,---.--  ---.--   ---.--
ULTPAG   => Valor Total Vendido: [z_vendatotal @E 999,999,999.99][fr("VV_030") @e 999999]  [Z_VMGER @e 999,999.99]  [Z_PDTOT @E 999.99]%  100.00%
ULTPAG   => Transferencias ....: [z_transf @E 999,999,999.99][fr("VV_025") @e 999999]  [Z_trmed @e 999,999.99]
ULTPAG   -> Valor dos Descontos: [Z_DESCBALC @E 999,999,999.99]
ULTPAG   -> Venda Liquida......: [z_vendatotal-Z_DESCBALC @E 999,999,999.99]
ULTPAG   -> Din+Cheques+Cartoes: [z_v_din+z_v_che+z_v_car @E 999,999,999.99]

COMANDO DEPOIS z_tvtotal = FR("VV_013")
COMANDO DEPOIS z_tv_fis  = FR("VV_016")
COMANDO DEPOIS z_tv_jur  = FR("VV_018")
COMANDO DEPOIS z_tv_din  = z_tvtotal-z_tv_fis-z_tv_JUR
COMANDO DEPOIS Z_TVMDIN = IF(FR("VV_020")>0,Z_TV_DIN/FR("VV_026"),0)
COMANDO DEPOIS Z_TVMFIS = IF(FR("VV_028")>0,Z_TV_FIS/FR("VV_028"),0)
COMANDO DEPOIS Z_TVMJUR = IF(FR("VV_029")>0,Z_TV_JUR/FR("VV_029"),0)
COMANDO DEPOIS Z_TVPDIN = IF(z_tv_din>0,(FR("VV_014")-FR("VV_017")-FR("VV_019"))/z_tv_din,0)*100
COMANDO DEPOIS Z_TVPfis = IF(z_tv_FIS>0,(FR("VV_017"))/z_tv_FIS,0)*100
COMANDO DEPOIS Z_TVPJUR = IF(z_tv_JUR>0,(FR("VV_019"))/z_tv_JUR,0)*100
COMANDO DEPOIS Z_TVPTDIN = IF(z_tvtotal>0,z_tv_din/z_tvtotal,0)*100
COMANDO DEPOIS Z_TVPTFIS = IF(z_tvtotal>0,z_tv_FIS/z_tvtotal,0)*100
COMANDO DEPOIS Z_TVPTJUR = IF(z_tvtotal>0,z_tv_JUR/z_tvtotal,0)*100

ULTPAG
ULTPAG   Vendas Televendas       Valor_Total   Cupons  ValorMedio   %Desct  %VdaTot
*                                999,999,999  999,999  999,999.99  999.99%  999.99%
ULTPAG   ----------------------- -----------  -------  ----------  -------  -------
ULTPAG   Dinheiro+Cheques+Cart.: [z_tv_din @E 999,999,999]  [fr("VV_026") @e 999,999]  [Z_TVMDIN @e 999,999.99]  [Z_TVPDIN @e 999.99]%  [Z_TVPTDIN @e 999.99]%
ULTPAG   a Praz Pessoas Fisicas: [z_tv_fis @E 999,999,999]  [fr("VV_028") @e 999,999]  [Z_TVMFIS @e 999,999.99]  [Z_TVPFIS @e 999.99]%  [Z_TVPTFIS @e 999.99]%
ULTPAG   a Praz Pessoas Jurid..: [z_tv_jur @E 999,999,999]  [fr("VV_029") @e 999,999]  [Z_TVMJUR @e 999,999.99]  [Z_TVPJUR @e 999.99]%  [Z_TVPTJUR @e 999.99]%
ULTPAG   ----------------------- ---,---,---  ---,---  ---,---.--  ---.--   ---.--
ULTPAG   => Total da Venda TV..: [z_tvtotal @E 999,999,999.99][fr("VV_026") @e 999999]  [Z_VMGER @e 999,999.99]  [Z_PDTOT @E 999.99]%  100.00%
