database exterior 
screen size 24 by 80
{
  Codigo Materia Prima             [a][b][c ][d  ]
  Codigo Materia Prima Equivalente [g][h][i ][j  ]
  Status Materia Prima Equivalente [k]
}
end

tables
intb00004
attributes
a    = intb00004.cod_n,autonext,comments = "Digite el NIVEL";
b    = intb00004.cod_grupo,autonext,comments = "Digite el GRUPO";
c    = intb00004.cod_tipo,autonext,comments = "Digite el TIPO"; 
d    = intb00004.cod_sec,autonext,comments = "Digite la SECUENCIA"; 
g    = intb00004.cod_n_e,autonext,
       comments = "Digite el NIVEL del Equivalente"; 
h    = intb00004.cod_grupo_e,autonext,
       comments = "Digite el GRUPO del Equivalente";
i    = intb00004.cod_tipo_e,autonext,
       comments = "Digite el TIPO del Equivalente";
j    = intb00004.cod_sec_e,autonext,
       comments = "Digite la SECUENCIA del Equivalente";
k    = intb00004.cod_uso_e, autonext,
       comments="0 = Equivalente esta en uso,   1 = Equivalente no esta en uso";
end