INDEX SEIP_N PDESC 
VARIAVEL LST_TP = 99999
VARIAVEL TOTUNI = 0 
VARIAVEL TOTVAL = 0 
VARIAVEL FABRICA= 0 

FILTRO peatual>0

COMANDO DURANTE FABRICA= PVLUVEN3 
COMANDO DURANTE TOTUNI = TOTUNI+PEATUAL 
COMANDO DURANTE TOTVAL = TOTVAL+(PEATUAL*FABRICA) 

D[pcod];[pdesc];[PUNIDADE];[pcodclafis];[peatual @E 99999.9999];[FABRICA @e 99999.9999];[FABRICA*PEATUAL @e 999999.9999]
ULTPAG[repl("-",80)]
ULTPAG                               TOTAL DE PRODUTOS: [TOTUNI @e 9,999,999]            R$ [TOTVAL @e 99,999,999.99] 
ULTPAG
