{
-------------------------------------------------------------------------------
FORMULARIO           :  VEFMRP043
OBJETIVO             :  Comisiones por Ventas  (VEPRRP043)
PROGRAMADOR          :  JUAN F. SOTO
FECHA REALIZACION    :  Agosto 7, 1998.
-------------------------------------------------------------------------------
}
database marmotech  
screen size 24 by 80
{
         Ano                [a10 ]     Factura[nu     ]
         Mes Comision       [m1]
         Compania           [c]
         Ventas             [v]
         Codigo Vendedor    [c1   ]
         Producto           [a]-[b]-[c2]-[c3 ]
        
}
end
tables
vetb00028,
vetb00003,
cctb00001
attributes
v   = formonly.ventas, include = (1 to 3),comments = 
"1- Locales RD$     2- Exportaciones  3-Locales USD$";
c   = vetb00003.cod_cia,include = (1,2),comments = 
"1- Rayovac     2- Distribuidora";
m1  = formonly.p_mes type smallint,include = (1 to 12),comments =
"Digite en formato MM eje. 01 (Enero)";
nu  = formonly.factura;
a10 = formonly.p_ano,autonext;
c1  = cctb00001.cod_emp_sec,
      comments = "Digite el codigo del vendedor o el criterio de seleccion";
a   = vetb00003.cod_n;
b   = vetb00003.cod_grupo;
c2  = vetb00003.cod_tipo;
c3  = vetb00003.cod_sec;
instructions
     delimiters " "
end