database rayovac
screen size 24 by 80
{
  Tipo de Campos
  ==============
  [f006    ]
  [f006    ]
  [f006    ]
  [f006    ]
  [f006    ]
  [f006    ]
}
end
tables
dstb00002
attributes
f006 = formonly.tipo_c type char,upshift,autonext;
instructions delimiters " "
 screen record campo_s[6] (tipo_c)
end