53 lines
2.1 KiB
Plaintext
53 lines
2.1 KiB
Plaintext
|
|
|
|
{
|
|
===========================================================================
|
|
Formulario : infmmt019
|
|
Sistema : Inventario de Material
|
|
Objetivo : Formulario a usar para captura de informacion en el modulo
|
|
inprmt019 (datos referentes a maestra de resoluciones)
|
|
Autor : Tadeo A. Ferreras
|
|
Fecha : Julio 22,1993
|
|
===========================================================================
|
|
}
|
|
database exterior
|
|
screen
|
|
{
|
|
|
|
Numero de Resolucion [z ]
|
|
Numero de Solicitud [a ]
|
|
Fecha de Resolucion [b ]
|
|
\g----------------------------------------------------------------------------\g
|
|
Material Cantidad
|
|
\g----------------------------------------------------------------------------\g
|
|
[c]-[d]-[e ]-[f ][desc1 ] [uni] [cant ]
|
|
[c]-[d]-[e ]-[f ][desc1 ] [uni] [cant ]
|
|
[c]-[d]-[e ]-[f ][desc1 ] [uni] [cant ]
|
|
[c]-[d]-[e ]-[f ][desc1 ] [uni] [cant ]
|
|
[c]-[d]-[e ]-[f ][desc1 ] [uni] [cant ]
|
|
}
|
|
end
|
|
tables
|
|
intb00019
|
|
attributes
|
|
z = intb00019.num_res,comments = "Digite el numero de resolucion";
|
|
a = intb00019.num_sol,comments = "Digite el numero de solicitud";
|
|
b = intb00019.fecha,format = "dd/mm/yy",comments =
|
|
"Digite fecha de solicitud";
|
|
c = intb00019.cod_n,autonext,comments =
|
|
"Digite el codigo de del material";
|
|
d = intb00019.cod_grupo,autonext,comments =
|
|
"Digite el codigo de del material";
|
|
e = intb00019.cod_tipo,autonext,comments =
|
|
"Digite el codigo de del material";
|
|
f = intb00019.cod_sec,autonext,comments =
|
|
"Digite el codigo de del material";
|
|
desc1 = formonly.descrip1 type char,color=yellow,noentry;
|
|
uni = formonly.unidad1 type char,color=yellow,noentry;
|
|
cant = intb00019.cantidad,comments=
|
|
"Digite la cantidad de material a internar en esta resolucion";
|
|
instructions delimiters " "
|
|
screen record arr_form5[5](cod_n,cod_grupo,cod_tipo,cod_sec,descrip1,
|
|
unidad1,cantidad)
|
|
end
|