jsoto/MBS
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Commit inicial: fuentes MBS ERP (Genero 6) + .gitignore + docs/SETUP_PC_MBS.md

Browse Source
This commit is contained in:
jsoto
2026-08-18 20:59:52 -04:00
commit 454973e269
5978 changed files with 2664094 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
PROYECTOS/ipdir/ipfmmt044.per
+91
View File
@@ -0,0 +1,91 @@
SCHEMA smarmotech
LAYOUT (TEXT="Movimientos Inventarios",STYLE="basic")
GRID
{
<G encabezado >
Documento Numero [f000 ] Compania [r][c4 ]
Codigo Movimiento [m ] [m1 ]
Factura [fact ] Transportista [tr][tr1 ][des ]
Cotizacion [cot ]
Tarifa [t ][t1 ] Placa [pl ]
fecha [f001 ]Bodega [p1 ] Orden Pedido [oc ]
Detalle [det ]
Cliente [cl]-[cl1 ] [nom ]Codigo V [ve ]
Direccion [dr1 ]
Departamento [dep ] [nomd ]Requisicion[req ]
Codigo Mov [cd1] [des2 ]Entrada [ent1 ]
<G Detalle >
<t >
[x13][a ][b ][c ][d ][f03 ][f02 ][p ][f04 ][k ][bl1 ]
[x13][a ][b ][c ][d ][f03 ][f02 ][p ][f04 ][k ][bl1 ]
[x13][a ][b ][c ][d ][f03 ][f02 ][p ][f04 ][k ][bl1 ]
[x13][a ][b ][c ][d ][f03 ][f02 ][p ][f04 ][k ][bl1 ]
[x13][a ][b ][c ][d ][f03 ][f02 ][p ][f04 ][k ][bl1 ]
}
end
tables
iptb00006,
intb00001,
cotb00001
ATTRIBUTES
cot = formonly.xcotizacion;
req = formonly.pnum_req;
dr1 = formonly.direccion_p,SCROLL;
bl1 = formonly.codigo_bloque,TITLE="BLOQUE";
LABEL x13 = formonly.area;
ve = formonly.psec_vend;
det = iptb00006.detalle;
cl = iptb00006.cod_sp,autonext;
cl1 = iptb00006.cod_sp_sec,autonext;
nom = formonly.descrip4,noentry;
pl = iptb00006.placa,autonext,comments =
"Digite placa del vehiculo que transporta la mercancia";
fact = formonly.fact_no,autonext,comments =
"Introducir Numero de Factura de Ventas";
tr = iptb00006.cod_transp,autonext,comments =
"Introduzca Codigo Transportista";
tr1 = iptb00006.sec_transp,autonext,comments =
"Introduzca Codigo Transportista";
des = formonly.descrip2,noentry;
t = iptb00006.cod_tarifa,comments =
"Introduzca Codigo Tarifa",autonext;
oc = iptb00006.conduce_no,
comments = "Digite le numero de orden de Corte";
t1 = formonly.descrip1,noentry;
f000 = iptb00006.num_doc,noentry;
r = iptb00006.cod_cia,autonext,include = (1 to 2), comments =
"01 - MARMOTECH ";
ent1 = formonly.entrada,comments = "Digite Entrada Almacen";
cd1 = formonly.cod_mov1,comments = "Digite codigo movimiento entrada";
des2 = formonly.descrip_mov1,noentry;
dep = formonly.departamento;
nomd = formonly.nombre_depto,noentry;
c4 = formonly.nombre_cia,noentry;
f001 = iptb00006.fecha, format = "dd/mm/yyyy",autonext,
comments = "Digite Fecha Documento";
a = iptb00006.cod_n,autonext,TITLE="CLASE",
comments = "Digite el NIVEL o Presione CTRL-W Para Ayuda";
b = iptb00006.cod_grupo,autonext,TITLE="GRUPO",
comments = "Digite el GRUPO o Presione CTRL-W Para Ayuda";
c = iptb00006.cod_tipo,autonext,TITLE="TIPO",
comments = "Digite el TIPO o Presione CTRL-W Para Ayuda";
d = iptb00006.cod_sec,autonext,TITLE="MEDIDA",
comments = "Digite la SECUENCIA o Presione CTRL-W Para Ayuda ";
f03 = iptb00006.cantidad_1,autonext,TITLE="CANTIDAD";
f02 = formonly.cantidad_2,noentry,TITLE="UNIDAD";
f04 = formonly.cantidad_p,noentry,TITLE="PENDIENTE";
k = formonly.descrip_esp,scroll,TITLE="DESCRIPCION";
p = intb00001.unidad_med,noentry;
p1 = iptb00006.bodega,autonext;
m = iptb00006.cod_mov,autonext,autonext,
comments = "Digite codigo del movimiento";
m1 = formonly.descrip_mov, noentry;
INSTRUCTIONS
SCREEN RECORD s_movi1[7] (area,cod_n,cod_grupo,cod_tipo,cod_sec,cantidad_1,
cantidad_2,cantidad_p,unidad_med,descrip_esp,codigo_bloque)
end