- Mueve todo el contenido de PROYECTOS/indir y varias funciones compartidas de PROYECTOS/otrodir hacia PROYECTO, siguiendo instruccion de Johnny (PROYECTOS se va a eliminar). - inprmt002: agrega campo Desglose faltante, corrige typo "eLiminar". - inprmt005: agrega formulario y 3 campos faltantes (Consumo, Requiere Autorizacion, Requisiciones), corrige typo "eLiminar". - inprmt013: agrega formulario, titulo, corrige typo "eLiminar". - inprmt046: agrega formulario y varias funciones/dependencias faltantes (cincodmov, clasf_bloque, medidas, defecto, buscaEmp, consultaTransportista, busca_departamento); corrige nombres de campo desalineados con el codigo (depto_a, bodega) y los convierte a ComboBox donde el codigo lo requiere. - Corrige dependencia faltante de FORMULARIOS_IN a la libreria Database (bloqueaba todo el modulo de MATERIA PRIMA).
58 lines
2.0 KiB
Plaintext
58 lines
2.0 KiB
Plaintext
{
|
|
=========================================================================
|
|
FORMULARIO : INFMMT022
|
|
OBJETIVO : Crear,modificar y eliminar logicamente registro de
|
|
la maestra de materiales de la ley 69
|
|
PROGRAMA Q. LO USA : INPRMT022
|
|
PROGRAMADOR : Tadeo A. Ferreras
|
|
FECHA : Agosto 31, 1993
|
|
=========================================================================
|
|
}
|
|
|
|
database exterior
|
|
screen size 24 by 80
|
|
{
|
|
Codigo [b]-[c]-[d1 ]-[e1 ]
|
|
Descripcion Espanol [f004 ]
|
|
Descripcion Ingles [f005 ]
|
|
Unidad de Medida [a0 ] Costo Real
|
|
C/I S/I
|
|
[ctt ][ct1 ]
|
|
[j]
|
|
|
|
|
|
Usuario Creador [f006 ] Usuario Modificador [f008 ]
|
|
Fecha Creacion [f007 ] Fecha Modificacion [f009 ]
|
|
}
|
|
end
|
|
tables
|
|
intb00022
|
|
attributes
|
|
b = intb00022.cod_n, autonext,
|
|
comments = "Digite el NIVEL del bien o Servicio";
|
|
c = intb00022.cod_grupo, autonext,
|
|
comments = "Digite el GRUPO del bien o Servicio";
|
|
d1 = intb00022.cod_tipo, autonext,
|
|
comments = "Digite primera SECUENCIA del bien o Servicio";
|
|
e1 = intb00022.cod_sec, autonext,
|
|
comments = "Digite segunda SECUENCIA del bien o Servicio";
|
|
f004 = intb00022.descrip_esp, upshift, required,
|
|
comments = "Digite el nombre del Articulo en ESPANOL";
|
|
f005 = intb00022.descrip_ing, upshift,
|
|
comments = "Digite el nombre del Articulo en INGLES";
|
|
a0 = intb00022.unidad_med, upshift, required,
|
|
comments = "Digite la unidad de medida del articulo";
|
|
ctt = intb00022.costo_real_ci,comments =
|
|
"Digite el costo Real con Impuesto del material";
|
|
ct1 = intb00022.costo_real_si,comments =
|
|
"Digite el costo Real sin Impuesto del material";
|
|
f006 = intb00022.us_crea, noentry;
|
|
f007 = intb00022.fech_crea, noentry;
|
|
f008 = intb00022.us_mod, noentry;
|
|
f009 = intb00022.fech_mod, noentry;
|
|
j = intb00022.status_t, noentry;
|
|
instructions
|
|
delimiters " "
|
|
end
|
|
|