database smarmotech   
screen size 24 by 80
{
Codigo del Pais   [a0 ]
Nombre del Pais   [f000                                                        ]
[j]
Usuario Creador  [f002     ]              Usuario Modificador [f004     ]
Fecha Creacion   [f003            ]       Fecha Modificacion  [f005            ]
}
end
tables
cotb00018
attributes
a0 = cotb00018.cod_pais,autonext,
     comments = "Digite el codigo del pais";
f000 = cotb00018.nom_pais,upshift,
       comments = "Digite el nombre del pais";
j = cotb00018.status_t,noentry;
f002 = cotb00018.us_crea,noentry;
f003 = cotb00018.fech_crea,noentry;
f004 = cotb00018.us_mod,noentry;
f005 = cotb00018.fech_mod,noentry;
instructions
delimiters " "
end