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

This commit is contained in:
2026-08-18 20:59:52 -04:00
commit 454973e269
5978 changed files with 2664094 additions and 0 deletions
+155
View File
@@ -0,0 +1,155 @@
----------------------------------------------------------------------------------
-- File created from C:\Users\egarcia\OneDrive - MARMOTECH, S. A\Equipo Tecnologia\Fuentes\MARMOTECH\PROYECTO\ccdir\ccfmmt050_1.4fd by Genero Studio
-- WARNING! All changes made in this file will be lost!
----------------------------------------------------------------------------------
SCHEMA formonly
LAYOUT (text=%"Form")
VBOX VBox1
HBOX HBox1
GRID Grid1
{
<G group1 >
[label1 ] [tipo_cl|sec_]
[label4 ][f_vencimiento ]
[label6 |rangofecha ]
[label10 ] [c_nombre ]
[label2 ] [kvendedor ]
[busca_cliente ]
[ ]
< >
<G group2 >
[label5 |f_inicio ]
[label9 |f_final ]
[busca_acuerdo ]
[ ]
< >
}
END -- Grid1
FOLDER Folder1
PAGE Page1(text=%"Page1")
TREE Tree1(parentIdColumn=nodo, idColumn=hijos)
{
[clientes |factura |orden |cotizaci|telefono |limcredito |corriente |de1a30 |de31a60 |de61a90 |masde90 |totalsald|fechapago |observacion |montopago ]
[clientes |factura |orden |cotizaci|telefono |limcredito |corriente |de1a30 |de31a60 |de61a90 |masde90 |totalsald|fechapago |observacion |montopago ]
[clientes |factura |orden |cotizaci|telefono |limcredito |corriente |de1a30 |de31a60 |de61a90 |masde90 |totalsald|fechapago |observacion |montopago ]
[clientes |factura |orden |cotizaci|telefono |limcredito |corriente |de1a30 |de31a60 |de61a90 |masde90 |totalsald|fechapago |observacion |montopago ]
[clientes |factura |orden |cotizaci|telefono |limcredito |corriente |de1a30 |de31a60 |de61a90 |masde90 |totalsald|fechapago |observacion |montopago ]
}
END -- Tree1
END -- Page1
PAGE Page2(text=%"Page2")
GRID Grid3
{
[label3 ][ncliente |label7 |fecha_compromiso ]
[factura1 |nfactura |label8 |monto_pago ]
[label11 |notacliente ]
[ ]
[ ]
<T table1 >
[accliente |acfechapago |acobservacion |acmonto ]
[accliente |acfechapago |acobservacion |acmonto ]
[accliente |acfechapago |acobservacion |acmonto ]
[accliente |acfechapago |acobservacion |acmonto ]
[accliente |acfechapago |acobservacion |acmonto ]
< >
}
END -- Grid3
END -- Page2
END -- Folder1
END -- HBox1
END -- VBox1
END -- Form
ATTRIBUTES
GROUP group1:Group1, text=%"Group1";
LABEL label1:Label1, text=%"Cliente";
EDIT tipo_cl=formonly.tipo_cliente;
EDIT sec_=formonly.sec_cliente;
LABEL label4:Label4, text=%"Vencimiento";
DATEEDIT f_vencimiento=formonly.f_vencimiento;
LABEL label6:Label6, text=%"Rango Fecha:";
COMBOBOX rangofecha=formonly.rangoFecha, items=(("d1a30", %"DE 1 á 30 DIAS"),("d31a60", %"DE 31 á 60 DIAS"),("d61a90", %"DE 61 á 90 DIAS"),("mas90", %"MAS DE 90 DIAS"));
LABEL label10:Label10, text=%"Nombre";
EDIT c_nombre=formonly.c_nombre;
LABEL label2:Label2, text=%"Vendedor";
COMBOBOX kvendedor=formonly.kvendedor;
BUTTON busca_cliente:busca_cliente, text=%"Buscar";
GROUP group2:Group2, text=%"Pagos Acordados";
LABEL label5:Label5, text=%"Fecha Inicial";
DATEEDIT f_inicio=formonly.f_inicio;
LABEL label9:Label9, text=%"Fecha Final";
DATEEDIT f_final=formonly.f_final;
BUTTON busca_acuerdo:busca_acuerdo, text=%"Buscar";
EDIT clientes=formonly.clientes, tabIndex=10, title=%"Clientes";
EDIT factura=formonly.factura, tabIndex=11, title=%"Documento";
EDIT orden=formonly.orden, tabIndex=12, title=%"Orden";
EDIT cotizaci=formonly.cotizacion, tabIndex=13, title=%"Cotizacion";
EDIT telefono=formonly.telefono, tabIndex=14, title=%"Telefono";
EDIT limcredito=formonly.limCredito, tabIndex=15, title=%"Limite Credito";
EDIT corriente=formonly.corriente, tabIndex=16, title=%"Corriente";
EDIT de1a30=formonly.de1a30, tabIndex=17, title=%"De 1 a 30";
EDIT de31a60=formonly.de31a60, tabIndex=18, title=%"De 31 a 60";
EDIT de61a90=formonly.de61a90, tabIndex=19, title=%"De 61 a 90";
EDIT masde90=formonly.masde90, tabIndex=20, title=%"Mas de 90";
EDIT totalsald=formonly.totalSaldo, tabIndex=21, title=%"Total";
EDIT fechapago=formonly.fechaPago, tabIndex=22, title=%"Fecha Pago", justify=right;
EDIT observacion=formonly.observacion, tabIndex=23, title=%"Observacion", justify=right;
EDIT montopago=formonly.montoPago, tabIndex=24, title=%"Monto Pagar";
PHANTOM formonly.nodo;
PHANTOM formonly.hijos;
PHANTOM formonly.imagen;
PHANTOM formonly.idRegistro;
PHANTOM formonly.tCliente;
PHANTOM formonly.sCliente;
PHANTOM formonly.sec_vend;
LABEL label3:Label3, text=%"Cliente:";
EDIT ncliente=formonly.nCliente, tabIndex=27, noEntry;
LABEL label7:Label7, text=%"Fecha Compromiso:";
DATEEDIT fecha_compromiso=formonly.fecha_compromiso, tabIndex=29;
LABEL factura1:factura1, text=%"Factura:";
EDIT nfactura=formonly.nFactura, tabIndex=26, noEntry;
LABEL label8:Label8, text=%"Monto Prometido:";
EDIT monto_pago=formonly.monto_pago, tabIndex=28;
LABEL label11:Label11, text=%"Observación:";
EDIT notacliente=formonly.notaCliente, tabIndex=25;
TABLE table1:Table1;
EDIT accliente=formonly.aCcliente, tabIndex=30, title=%"Cliente";
EDIT acfechapago=formonly.aCfechaPago, tabIndex=31, title=%"Fecha";
EDIT acobservacion=formonly.aCobservacion, tabIndex=32, title=%"Observacion";
EDIT acmonto=formonly.aCmonto, tabIndex=33, title=%"Monto";
PHANTOM formonly.ACidCliente;
END -- ATTRIBUTES
INSTRUCTIONS
SCREEN RECORD campos(formonly.tipo_cliente,formonly.sec_cliente,formonly.f_vencimiento,formonly.f_inicio,formonly.f_final)
SCREEN RECORD Undefined(formonly.c_nombre,formonly.rangoFecha,formonly.kvendedor,formonly.notaCliente,formonly.nFactura,formonly.nCliente,formonly.monto_pago,formonly.fecha_compromiso)
SCREEN RECORD s_rec(formonly.clientes,formonly.factura,formonly.orden,formonly.cotizacion,formonly.telefono,formonly.limCredito,formonly.corriente,formonly.de1a30,formonly.de31a60,formonly.de61a90,formonly.masde90,formonly.totalSaldo,formonly.fechaPago,formonly.observacion,formonly.montoPago,formonly.nodo,formonly.hijos,formonly.imagen,formonly.idRegistro,formonly.tCliente,formonly.sCliente,formonly.sec_vend)
SCREEN RECORD src_acuerdo(formonly.aCcliente,formonly.aCfechaPago,formonly.aCobservacion,formonly.aCmonto,formonly.ACidCliente)
END -- INSTRUCTIONS