database exterior 
screen size 24 by 80
{
               Fecha Inventario [k       ]
               Tipo Inventario  [p]
}
end
tables
intb00001
attributes
k   = formonly.fecha type date,format = "dd/mm/yy",
     comments = "Introduzca Fecha de Inventario";
p   = formonly.decide type char,upshift,include = ("M","T","S"),comments =
 "Inventario: M = Mat. Primas,  T = Prod. Terminados,  S = Semi-Elaborados";
  instructions delimiters " "
end