database rayovac   
screen
{
  
           Fecha Inicial   [f1        ]
           Fecha Final     [f2        ]
           Valor Minimo    [vm          ]
           Tipo Material   [c]

}
end
tables
cptb00001
attributes
f1  = formonly.fecha_1 type DATE,format = "dd/mm/yyyy";
f2  = formonly.fecha_2 type DATE,format = "dd/mm/yyyy";
vm  = formonly.cant_may,comments="Digite el Monto Minimo de Compra";
c   = formonly.tipo_rep type char,upshift,include=("M","R","H","S"),comments =
   " M = Materia Prima     R = Repuesto    H = Herramienta    S = Suministro";
INSTRUCTIONS delimiters" "
end