OUTROARQ SE_PROD SEIP_C PCOD 
 
VARIAVEL Z_DE = ctod( "01."+Substr(Dtoc(DATE()),4) ) 
VARIAVEL Z_aTE = DATE() 
 
T10,10,16,70,Parametros 
T2,2,Data Inicial:,8,z_de,99.99.99 
T3,2,Data Final..:,8,z_ate,99.99.99 
 
FILTRO MDATA>=Z_DE .AND. MDATA<=Z_ATE 
 
COMANDO DURANTE Z_PCOD = PCOD 
COMANDO DURANTE SE_PROD->( DBSEEK( Z_PCOD )) 
 
C[SISTEMA] 
CRelacao Produtos Marcados Como Faltas de Balcao, de [z_de] ate [z_ate] 
C-------------------------------------------------------------------------------- 
CCod  CodDist    Produto                Data       Preco    Est.Atual 
C================================================================================ 
D[pcod 99999] [se_prod->pcprodforn 99999] [se_prod->pdesc @s25] [mdata] [SE_PROD->PVLUVENDA 999.99] [SE_PROD->PEATUAL] __________ 
 