{
-------------------------------------------------------------------------------
FORMULARIO           :  VEFMRP017
OBJETIVO             :  Comisiones por Ventas  (VEPRRP017)
PROGRAMADOR          :  Juan Fco. Soto           
FECHA REALIZACION    :  Mayo 27, 1993   
-------------------------------------------------------------------------------
}
database marmotech   
screen size 24 by 80
{
         Compania           [c]
         Mes A Procesar     [m1]
         Ventas             [v]
         Codigo Vendedor    [c1   ]
         Codigo Producto    [a][b][d1][a1 ]
}
end
tables
vetb00028,
vetb00003
attributes
c   = vetb00003.cod_cia,include = (1,2),comments = 
"1- Marmotech     2-  ";
m1  = formonly.p_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";
c1  = vetb00028.sec_vend,
      comments = "Digite el codigo del vendedor o el criterio de seleccion";
a   = formonly.cod_n;
b   = formonly.cod_grupo;
d1  = formonly.cod_tipo;
a1  = formonly.cod_sec;
instructions
     delimiters " "
end