database marmotech
screen size 24 by 80
{

         Rango: fecha Inicial[f1      ]
                Fecha Final  [f2      ]
         Tipo de Venta       [t]
         Numero de Factura(s)[b    ] 
         Condicion Pago      [k1 ]
         Tipo Cliente        [t1]
}
end
tables
vetb00002 
attributes
k1  = vetb00002.cond_pago;
f1  = formonly.fecha1 type date, autonext,comments="Digite Fecha Inicial",
                                 format = "dd/mm/yy";
f2  = formonly.fecha2 type date, autonext,comments="Digite Fecha Final",
                                 format = "dd/mm/yy";
t   = formonly.ventas,autonext,
      comments="1 - Ventas Locales      2 - Ventas Exportacion      <ENTER> - Ambas";
b   = vetb00002.factura;
t1  = vetb00002.tipo_cliente;

instructions
delimiters " "
end