INDEX SEIP_N PDESC
VARIAVEL LST_TP=58
VARIAVEL PT = 0
VARIAVEL PL = 0
VARIAVEL TT = 0
VARIAVEL ZVD = 0
VARIAVEL ZVS = 0
VARIAVEL ZVQ = 0
VARIAVEL ZVM = 0
VARIAVEL ZVB = 0
VARIAVEL ZVB = 0


FILTRO peatual >0 .and. pabcfisica="Z"
 
COMANDO DURANTE PT  = (pvluvenda * .7) * peatual
COMANDO DURANTE tt = tt + pt
COMANDO DURANTE pl = pl + 1
C [Empresa]                            Data [Date()]
C [Sistema]                                            Hora [Time()]
C Inventario de Produtos                                  Pag [Pag 9999]
C ---------------------------------------------------------------------------
C Cod   Descricao               Estoque   Pr. Venda  Pr. Total
C ---------------------------------------------------------------------------
* 99999 xxxxxyyyyyxxxxxyyyyyxxxx 9999 XXXX xxxxxyyyyyxxxxx xxxxxyyyyyxxxxx
D [pcod 99999] [pdesc @s24] [peatual 9999]     [pvluvenda @E 99,999.99] [pt @E 999,999.99]
ULTPAG ---------------------------------------------------------------------------
ULTPAG Total de Produtos listados: [pl @e 999,999]               [tt @E 999,999.99]
ULTPAG ---------------------------------------------------------------------------







