database rayovac
screen size 24 by 80
{
  Programa       [f000     ] 


}
end
tables
dstb00001,dstb00003
attributes
f000 = dstb00001.programa,upshift,comments = "Digite nombre del programa";
instructions delimiters " "
end