---------------------------------------------------------------------------------- -- 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 { [label1 ] [tipo_cl|sec_] [label4 ][f_vencimiento ] [label6 |rangofecha ] [label10 ] [c_nombre ] [label2 ] [kvendedor ] [busca_cliente ] [ ] < > [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 ] [ ] [ ] [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