40 lines
1.4 KiB
Plaintext
40 lines
1.4 KiB
Plaintext
{
|
|
-------------------------------------------------------------------------
|
|
NOMBRE : cgfmwd003
|
|
OBJETIVO : Consulta de los bienes y servicios
|
|
DISENO : Ing. Juan F.Soto
|
|
FECHA REALIZADO : Septiembre 30, 1993.
|
|
MODULO UTILIZA : cgprmt003
|
|
--------------------------------------------------------------------------
|
|
}
|
|
database marmotech
|
|
screen
|
|
{
|
|
Consulta Bienes y Servicios
|
|
\g------------------------------------------------------\g
|
|
Codigo Descripcion Unidad
|
|
\g------------------------------------------------------\g
|
|
[a][b][c ][d ][d1 ][u ]
|
|
[a][b][c ][d ][d1 ][u ]
|
|
[a][b][c ][d ][d1 ][u ]
|
|
[a][b][c ][d ][d1 ][u ]
|
|
[a][b][c ][d ][d1 ][u ]
|
|
[a][b][c ][d ][d1 ][u ]
|
|
}
|
|
end
|
|
tables
|
|
intb00001
|
|
attributes
|
|
a = intb00001.cod_n,comments = "Digite codigo bienes o servicio";
|
|
b = intb00001.cod_grupo,comments = "Digite codigo bienes o servicio";
|
|
c = intb00001.cod_tipo,comments = "Digite codigo bienes o servicio";
|
|
d = intb00001.cod_sec,comments = "Digite codigo bienes o servicio";
|
|
d1 = intb00001.descrip_esp,upshift,comments = "Digite descripcion";
|
|
u = formonly.unidad type char,noentry;
|
|
|
|
instructions
|
|
screen record s_bien[6](cod_n,cod_grupo,cod_tipo,cod_sec,descrip_esp,unidad)
|
|
|
|
delimiters " "
|
|
end
|