database marmotech
screen size 24 by 80
{
           Codigo [a]-[b]-[c ]-[d  ]
}
end
tables
cotb00017
attributes
a    = cotb00017.cod_n,autonext,
       comments = "Digite el NIVEL";
b    = cotb00017.cod_grupo,autonext, 
       comments = "Digite el GRUPO";
c    = cotb00017.cod_tipo,autonext, 
       comments = "Digite el TIPO ";
d    = cotb00017.cod_sec,autonext,  
       comments = "Digite el SECUENCIA";