DATABASE marmotech   
screen size 24 by 80
{
       [a ].-[a1                                       ]
       [a ].-[a1                                       ]
       [a ].-[a1                                       ]
}
tables
intb00001
attributes
a = formonly.opc,noentry;
a1 = formonly.descrip_menu,noentry;
instructions
  screen record menu0[3](opc,descrip_menu)
delimiters " "
end