database marmotech
screen size 24 by 80
{
Codigo                [b]-[c]-[d ]-[e  ][g                             ] 
Peso Bruto            [f004        ] Kgs. 
Peso Neto             [f005        ] Kgs. 
Dimension de Caja     [f006        ] ft3. 
Cantidad de Pilas     [f011        ] Unds.  [a]
Codigo Semi-elaborado [f012 ] [d1                            ]

Usuario Creador [f007     ]               Usuario Modificador [f009     ]
Fecha Creacion  [f008            ]        Fecha Modificacion  [f010            ]
}
end
tables
vetb00014,
intb00001 
attributes
b    = vetb00014.cod_n,autonext,
       comments = "Digite el NIVEL del Articulo o Ctrl-W para busqueda";
c    = vetb00014.cod_grupo,autonext,
       comments = "Digite el GRUPO del Articulo o Ctrl-W para busqueda";
d    = vetb00014.cod_tipo,autonext,
       comments = "Digite el TIPO de Articulo o Ctrl-W para busqueda";
e    = vetb00014.cod_sec,autonext,
       comments = "Digite la SECUENCIA del Articulo o Ctrl-W para busqueda";
g    = intb00001.descrip_esp, noentry; 
f004 = vetb00014.peso_bruto,autonext, 
       comments = "Digite el PESO BRUTO del Articulo en Kilogramos" ;
f005 = vetb00014.peso_neto,autonext, 
       comments = "Digite el PESO NETO del Articulo en Kilogramos" ;
f006 = vetb00014.dim_caja,autonext, 
       comments = "Digite la DIMENSION DE LA CAJA del Articulo en Pies Cubicos" ;
a    = vetb00014.status_t, noentry;
f007 = vetb00014.us_crea, noentry;
f008 = vetb00014.fech_crea, noentry;
f009 = vetb00014.us_mod, noentry;
f010 = vetb00014.fech_mod, noentry;
f011 = vetb00014.cantidad,autonext;
f012 = formonly.p_cod_prod,required,comments =
"Si no existe en la maestra de semi-elaborado, proceda agregarlo";
d1   = formonly.p_descrip;
end

INSTRUCTIONS
delimiters " "