{
-------------------------------------------------------------------------------
FORMULARIO           :  CCFMRP023
OBJETIVO             :  Deducciones por Ventas  (VEPRRP023)
PROGRAMADOR          :  Tadeo A. Ferreras        
FECHA REALIZACION    :  Noviembre 24, 1993   
-------------------------------------------------------------------------------
}
database marmotech   
screen size 24 by 80
{
         Compania           [c]
         Ano Actual         [a10 ]
         Mes Comision       [m1]
         Ventas             [v]
}
end
tables
vetb00028,
vetb00003
attributes
c   = vetb00003.cod_cia,include = (1,2),comments = 
"1- Marmotech ";
a10 = formonly.p_ano,autonext;
m1  = formonly.mes type smallint,include = (1 to 12),comments =
"Digite en formato MM eje. 01 (Enero)";
v   = formonly.ventas type char,autonext,include=("1","2"),
      comments="1=Locales   2=Exportaciones";
instructions
     delimiters " "
end