Files

42 lines
1.7 KiB
Plaintext

{
-------------------------------------------------------------------------
NOMBRE : ctfmmt017
OBJETIVO : Capturar las informaciones de Equivalencia
Material/Semi-elabora. Es usado Por CTFMMT017.4gl
AUTOR : Tadeo A. Ferreras
FECHA REALIZADO : Diciembre 16, 1993
--------------------------------------------------------------------------
}
database marmotech
screen
{
Semi-elaborado [cod ] [des ]
\g--------------------------------------------------------------------------\g
Material Cantidad
\g--------------------------------------------------------------------------\g
[n][g][t ][s ] [tp1 ] [tp2] [cp ]
[n][g][t ][s ] [tp1 ] [tp2] [cp ]
[n][g][t ][s ] [tp1 ] [tp2] [cp ]
[n][g][t ][s ] [tp1 ] [tp2] [cp ]
[n][g][t ][s ] [tp1 ] [tp2] [cp ]
}
end
tables
cttb00008
attributes
cod = formonly.cod_prod, comments = "Digite Codigo Semi-elaborado";
des =formonly.descrip1,noentry;
n = formonly.cod_n type smallint,autonext;
g = formonly.cod_grupo type smallint,autonext;
t = formonly.cod_tipo type smallint,autonext;
s = formonly.cod_sec type smallint,autonext;
tp1= formonly.descrip_esp type char,noentry,color=yellow;
tp2= formonly.unidad type char,noentry,color=yellow;
cp = formonly.cant_prop;
instructions
screen record datos_sc[5] (cod_n,cod_grupo,cod_tipo,cod_sec,descrip_esp,
unidad,cant_prop)
delimiters " "
end