INDEX SEIP_N PDESC 
 
VARIAVEL z_valtot = 0 
 
COMANDO DURANTE z_valtot = z_valtot + psubsidio 
 
 
 
VARIAVEL Z_LISTA > "0" 
 
//T10,10,16,60,Parametros 
//T2,2,Produtos Subsidiados S ou N:,1,z_lista,X 
 
 
FILTRO psubsidio=Z_LISTA 


 
C[Empresa]                                 Data [Date()] 
C[Sistema]                                           Hora [Time()] 
CRelacao Geral de Produtos-Preco de Fabrica                        Pag [Pag 9999] 
C--------------------------------------------------------------------------- 
CCod   Descricao                Estoque Pr. Unit  Pr. Total  ABCF  ABCV 
C--------------------------------------------------------------------------- 
*99999 xxxxxyyyyyxxxxxyyyyyxxxx 
D[pcod 99999] [pdesc @s24] [pabcvenda] 
ULTPAG [repl("-",75)] 
ULTPAG TOTAL DE PRODUTOS:            [TOTUNI @e999,999] und   R$ [TOTVAL @e 999,999.99] 
ULTPAG [repl("-",75)] 
 