database exterior    
screen size 24 by 80
{

Ordenamiento         [k]
Fecha Existencia     [f1      ]
Codigo               [a][b][c ][d  ]
}
end
tables
intb00001
attributes
a = intb00001.cod_n;
b = intb00001.cod_grupo;
c = intb00001.cod_tipo;
d = intb00001.cod_sec;
f1 = formonly.fecha3 type date,format = "dd/mm/yy";
k = formonly.decide type char,required,autonext,
    comments = "Digite A - Alfabetico    N - Numerico",
    include = ("A","N"),upshift;
end