{
-------------------------------------------------------------------------------
FORMULARIO           :  VEFMRP019
OBJETIVO             :  Relacion de Ventas en unidades (VEPRRP019)
PROGRAMADOR          :  Juan Fco. Soto           
FECHA REALIZACION    :  Junio 3, 1993   
-------------------------------------------------------------------------------
}
database marmotech   
screen size 24 by 80
{
         Compania           [c]
         Fecha Inicial      [fn      ]
         Fecha Final        [fi      ]
         Codigo Vendedor    [c1   ]
         Codigo Producto    [a][b][d1][a1 ]
}
end
tables
vetb00028,
vetb00003
attributes
c   = vetb00003.cod_cia,include = (1,2),comments = 
"1- Rayovac     2- Distribuidora";
fn  = formonly.fecha_in type date,format = "dd/mm/yy";
fi  = formonly.fecha_fin type date,format = "dd/mm/yy";
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