
VARIAVEL ZundLeit  = 0
VARIAVEL ZundEspel = 0
VARIAVEL ZsemEsp = 0
VARIAVEL zPsemEsp = 0
VARIAVEL ZsemEan = 0
VARIAVEL zPsemEan = 0
COMANDO DURANTE ZsemEsp = ZsemEsp + if(mQespel=0,mQatend,0)
COMANDO DURANTE ZsemEan = ZsemEan + if(mQespel>0.and.mQatend=0,mQespel,0)
COMANDO DURANTE ZpsemEsp = ZpsemEsp + if(mQespel=0,1,0)
COMANDO DURANTE ZpsemEan = ZpsemEan + if(mQespel>0.and.mQatend=0,1,0)

COMANDO DURANTE ZundLeit = ZundLeit + MQATEND
COMANDO DURANTE ZundEspel = ZundEspel + mQespel

C
CCritica das Leituras do Pedido [w_pedido]
C===============================================
CCod Barras     CodRedz Descricao  Unids Espelho   
C===============================================
D[PDIC6] [Pcod 999999] [Pdesc @s35] [Mqatend 9999] [MqEspel 9999] [pdic 99999999]

ULTPAG
ULTPAG UNIDADES PISTOLADAS QUE NAO ESTAVAM NO ESPELHO: [ZsemEsp 9999] Unids ([ZpsemEsp 9999] Prods)
ULTPAG UNIDADES NO ESPELHO QUE NAO FORAM PISTOLADAS..: [ZsemEan 9999] Unids ([ZpsemEan 9999] Prods)
ULTPAG
ULTPAG Unidades Pistoladas: [ZundLeit 999999]
ULTPAG Unidades no Espelho: [ZundEspel 999999]