database marmotech 
screen size 24 by 80
{
Codigo              [b]-[c]-[d1]-[e01]
Descripcion Espanol [f004                          ]
Descripcion Ingles  [f005                          ]
Unidad de Medida    [a0 ]
[j]


Usuario Creador     [f006     ]           Usuario Modificador [f008     ]
Fecha Creacion      [f007            ]    Fecha Modificacion  [f009            ]
}
end
tables
  irtb00002
attributes
b    = irtb00002.cod_n, autonext, 
       comments = "Digite el NIVEL del bien o Servicio";
c    = irtb00002.cod_grupo, autonext, 
       comments = "Digite el GRUPO del bien o Servicio";
d1   = irtb00002.cod_tipo, autonext, 
       comments = "Digite el TIPO del bien o Servicio";
e01  = irtb00002.cod_sec, autonext, 
       comments = "Digite el SECUENCIA del bien o Servicio";
f004 = irtb00002.descrip_esp, upshift, required,
       comments = "Digite el nombre del Articulo en ESPANOL";
f005 = irtb00002.descrip_ing, upshift,
       comments = "Digite el nombre del Articulo en INGLES";
a0   = irtb00002.unidad_med, upshift, required,
       comments = "Digite la unidad de medida del articulo"; 
f006 = irtb00002.us_crea, noentry;
f007 = irtb00002.fech_crea, noentry;
f008 = irtb00002.us_mod, noentry;
f009 = irtb00002.fech_mod, noentry;
j = irtb00002.status_t, noentry;
instructions
delimiters " "
end