54 lines
2.3 KiB
Plaintext
54 lines
2.3 KiB
Plaintext
{
|
|
-------------------------------------------------------------------------------
|
|
FORMULARIO : IRFMMT067
|
|
OBJETIVO : Capturar registros de la Tabla de IRTB00027
|
|
PROGRAMADOR : Lic. Abner Montalvo
|
|
FECHA REALIZACION : Junio 26, 1997.
|
|
-------------------------------------------------------------------------------
|
|
}
|
|
DATABASE smarmotech
|
|
SCREEN SIZE 24 by 80
|
|
{
|
|
|
|
|
|
Fecha ...: [a ]
|
|
Repuesto : [f][g][g1][g2 ] [a1 ]
|
|
\g---------------------------------------------------------------------------\g
|
|
Codigo Material Descripcion Und Cantidad
|
|
\g---------------------------------------------------------------------------\g
|
|
[c][d][c1][c2 ] [a2 ] [n1 ] [k1 ]
|
|
[c][d][c1][c2 ] [a2 ] [n1 ] [k1 ]
|
|
[c][d][c1][c2 ] [a2 ] [n1 ] [k1 ]
|
|
}
|
|
end
|
|
tables
|
|
irtb00027
|
|
attributes
|
|
a = formonly.fecha_r type date,autonext,reverse, format = "dd/mm/yyyy",
|
|
comments = "Digite la Fecha del Diseno del Repuesto";
|
|
f = formonly.cod_n_r,autonext,reverse,
|
|
comments = "Digite NIVEL del Repuesto o Ctrl+W para busqueda";
|
|
g = formonly.cod_grupo_r,autonext,reverse,
|
|
comments = "Digite GRUPO del Repuesto o Ctrl+W para busqueda";
|
|
g1 = formonly.cod_tipo_r,autonext,reverse,
|
|
comments = "Digite TIPO del Repuesto o Ctrl+W para busqueda";
|
|
g2 = formonly.cod_sec_r,autonext,reverse,
|
|
comments = "Digite SECUENCIA del Repuesto o Ctrl+W para busqueda";
|
|
a1 = formonly.descrip2,noentry;
|
|
c = formonly.cod_n_m,autonext,reverse,
|
|
comments = "Digite NIVEL del Material o Ctrl+W para busqueda";
|
|
d = formonly.cod_grupo_m,autonext,reverse,
|
|
comments = "Digite GRUPO del Material o Ctrl+W para busqueda";
|
|
c1 = formonly.cod_tipo_m,autonext,reverse,
|
|
comments = "Digite TIPO del Material o Ctrl+W para busqueda";
|
|
c2 = formonly.cod_sec_m,autonext,reverse,
|
|
comments = "Digite SECUENCIA del Material o Ctrl+W para busqueda";
|
|
a2 = formonly.descrip_esp,noentry;
|
|
k1 = irtb00027.cantidad_m,reverse,
|
|
comments = "Digite Cantidad Requerida";
|
|
n1 = formonly.unidad_med,noentry;
|
|
instructions
|
|
screen record s_mr[3] (cod_n_m,cod_grupo_m,cod_tipo_m,cod_sec_m,
|
|
descrip_esp, unidad_med,cantidad_m)
|
|
end
|