database smarmotech   
screen size 24 by 80
{
                  Paises
\g------------------------------------------
   Pais           Descripcion
\g------------------------------------------
   [f0 ]    [f001                          ]
   [f0 ]    [f001                          ]
   [f0 ]    [f001                          ]
   [f0 ]    [f001                          ]
   [f0 ]    [f001                          ]
   [f0 ]    [f001                          ]
   [f0 ]    [f001                          ]
   [f0 ]    [f001                          ]
   [f0 ]    [f001                          ]   
}
end
tables
cotb00018
attributes
f0   = formonly.cod_provincia,noentry,
       comments = "<Esc> Busca los paises";
f001 = formonly.nombre_provincia,upshift, 
       comments = "<Esc> Busca los paises";
instructions
   screen record s_provincias (cod_provincia,nombre_provincia)
   delimiters " "
end