Files
MBS/PROYECTOS/indir/infmmt046.per
T

66 lines
2.6 KiB
Plaintext

schema smarmotech
TOOLBAR
ITEM nuevo (TEXT="Documento", IMAGE="new", COMMENT="Nuevo Documento")
ITEM buscar (TEXT="Buscar Documento", IMAGE="find", COMMENT="Criterio de busqueda")
SEPARATOR
ITEM salir (TEXT="Salir", IMAGE="quit")
END
LAYOUT (TEXT="TRANSACCIONES INVENTARIOS")
GRID
{
<G >
Documento Numero [f000 ] Orden Compra [ord ]
Codigo Movimiento[m ] [m1 ]
Fecha [f001 ] Bodega :[p1 ]Conduce
DEPARTAMENTO [f1 ][d1 ]
Operador Grua [op ][nomop ][ap ]
<t >
[a ][b ][c ][d ][f02 ] [p ][k ] [ex1 ]
[a ][b ][c ][d ][f02 ] [p ][k ] [ex1 ]
[a ][b ][c ][d ][f02 ] [p ][k ] [ex1 ]
[a ][b ][c ][d ][f02 ] [p ][k ] [ex1 ]
[a ][b ][c ][d ][f02 ] [p ][k ] [ex1 ]
[a ][b ][c ][d ][f02 ] [p ][k ] [ex1 ]
}
end
tables
intb00006,
intb00001,
cotb00001
ATTRIBUTES
ex1 = formonly.existencia, TITLE="EXISTENCIA";
ord = formonly.orden_compra;
f1 = formonly.depto_a;
d1 = formonly.nombre_d,noentry;
op = formonly.pnum_emp;
nomop = formonly.nombre,noentry;
ap = formonly.apellido,noentry;
f000 = intb00006.num_doc,autonext,noentry;
f001 = intb00006.fecha, format = "dd/mm/yyyy",autonext,
comments = "Digite Fecha Documento";
a = intb00006.cod_n,TITLE="CODIGO",
comments = "Digite el NIVEL";
b = intb00006.cod_grupo,autonext,
comments = "Digite el GRUPO";
c = intb00006.cod_tipo,autonext,
comments = "Digite el TIPO";
d = intb00006.cod_sec,autonext,
comments = "Digite la SECUENCIA ";
f02 = intb00006.cantidad_2,TITLE="CANTIDAD",
comments = "Digite La Cantidad Ordenada";
k = intb00001.descrip_esp,TITLE="DESCRIPCION";
p = intb00001.unidad_med,noentry;
p1 = intb00006.bodega,autonext;
m = intb00006.cod_mov,autonext,autonext,
comments = "Digite codigo del movimiento";
m1 = formonly.descrip_mov, noentry;
INSTRUCTIONS
SCREEN RECORD s_movi1[6] (cod_n,cod_grupo,cod_tipo,cod_sec,
cantidad_2,unidad_med,descrip_esp,existencia)
end