OUTROARQ SF_FAT VND FVENDEDOR
VARIAVEL z_de = date()
VARIAVEL z_ate = date()
VARIAVEL TOTUNI = 0
VARIAVEL TOTVAL = 0
VARIAVEL TOTfab = 0
VARIAVEL Z_TOTUNI = 0
VARIAVEL Z_TOTVAL = 0
VARIAVEL Z_TOTfab = 0
VARIAVEL TOTDSC = 0
VARIAVEL Z_TOTDSC = 0

T10,10,16,60,Parametros
T2,2,Data Inicial:,8,z_de,99.99.99
T3,2,Data Final..:,8,z_ate,99.99.99

C
C[Empresa]                        Data do Relatorio: [date()]  Pag [Pag 9999]
CVENDAS GERAL POR VENDEDOR NO PERIODO DE [Z_DE] ATE [Z_ATE].
C[repl("-",80)]
C   Cod Vendedor                                       SubTotal Val.Desc Val.Liqd
C[repl("-",80)]

SUBLIST SF_FAT
COMANDO ANTES DBSEEK(SF_VEND->FVENDEDOR)
REPITA ENQUANTO FVENDEDOR=SF_VEND->FVENDEDOR

FILTRO fnumped<>0.and.FDATAEMI>=z_de.and.FDATAEMI<=z_ate

COMANDO ANTES TOTVAL = 0
COMANDO ANTES TOTDSC = 0

COMANDO DURANTE TOTVAL = TOTVAL + FVAL
COMANDO DURANTE Z_TOTVAL = Z_TOTVAL + FVAL
COMANDO DURANTE TOTDSC = TOTDSC + FDESCONTO
COMANDO DURANTE Z_TOTDSC = Z_TOTDSC + FDESCONTO

FILTROIMP TOTVAL>0
ULTPAG[SF_VEND->FVENDEDOR]-[SF_VEND->nome]             [TOTVAL+TOTdsc @E 99,999.99][TOTdsc @E 99,999.99][TOTVAL @E 99,999.99]
FIM SUBLIST
ULTPAG[REPL("-",80)]
ULTPAG                                      TOTAL VENDIDO: [z_TOTVAL+z_TOTdsc @E 99,999.99][z_TOTdsc @E 99,999.99][Z_TOTVAL @E 99,999.99]
ULTPAG
