{  
-------------------------------------------------------------------------------
FORMULARIO           :  VEFMRP009
OBJETIVO             :  Control de ventas mensual por vendedor (VEPRRP009)
PROGRAMADOR          :  Ing. Juan Soto (Johnny)
FECHA REALIZACION    :  Enero 08, 1993  
-------------------------------------------------------------------------------
}
database marmotech    
screen size 24 by 80
{
         Compania        [t1]
         Ventas          [a][b                 ]
         Mes(es)         [f1  ]
         Zona            [a1 ]
         Vendedor        [c1   ]

}
end
tables
vetb00002,
vetb00016
attributes
t1  = vetb00002.cod_cia,autonext,comments = "1- Marmotech",include = (1);
f1  = formonly.mes type char ,comments = "Digite Formato aamm Ej. 9305";
a   = vetb00002.ventas,comments = "1- LOCAL  2-EXPORTACION",include = ("1","2");
a1  = vetb00016.zona;
b   = formonly.descrip6,noentry;
c1  = vetb00002.sec_vend;

  instructions
     delimiters " "
end