database rayovac
screen size 24 by 80
{

 Sistema [f0] [f001                                         ]
-------------------------------------------------------------------------------
 Tabla                 Descripcion 
-------------------------------------------------------------------------------
[cc       ]          [dc                                ]
[cc       ]          [dc                                ]
[cc       ]          [dc                                ]
[cc       ]          [dc                                ]
[cc       ]          [dc                                ]
}
end
tables
dstb00003
attributes
f0   = dstb00003.cod_sistema,upshift;
f001 = formonly.desc_sistema type char,noentry;
cc   = formonly.tabla type char;
dc   = formonly.descripcion type char,noentry; 
instructions delimiters " "
  screen record act1_s[5] (tabla,descripcion)
end