{
-------------------------------------------------------------------------------
FORMULARIO           :  VEFMRP017
OBJETIVO             :  Ventas x Vend. X PT    (VEPRRP017)
PROGRAMADOR          :  Juan Fco. Soto           
FECHA REALIZACION    :  Mayo 1997    
DIRECTOR PROYECTO    :  ING. JOSE ALFREDO PAULINO
-------------------------------------------------------------------------------
}
database marmotech   
screen size 24 by 80
{
         Compania           [c]

         Fecha Inicial      [f1        ]
         Fecha Final        [f2        ]
         Codigo Vendedor    [c1   ]
         Codigo Prod.       [a][b ]
}
end
tables
vetb00002,
vetb00003
attributes
a    = vetb00003.cod_n;
b    = vetb00003.cod_grupo;
c   = vetb00003.cod_cia,include = (1,2),comments = 
"1- Marmotech";
f1 = formonly.fecha1 type date,autonext,format= "dd/mm/yyyy";
f2 = formonly.fecha2 type date,autonext,format= "dd/mm/yyyy";
c1  = vetb00002.sec_vend,
      comments = "Digite el codigo del vendedor o el criterio de seleccion";
instructions
     delimiters " "
end