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

2026-08-18 20:59:52 -04:00
commit 454973e269
5978 changed files with 2664094 additions and 0 deletions
@@ -0,0 +1,56 @@
+{
+-----------------------------------------------------------------------------
+FORMULARIO      : CCFMMT007
+OBJETIVO        : Captura los documentos de CXC 
+REALIZADO POR   : Ing. JUAN F. SOTO
+FECHA           : SEPTIEMBRE 5, 1998.
+-----------------------------------------------------------------------------
+}SCHEMA smarmotech  
+LAYOUT (TEXT="Documentos Cuentas Por Cobrar",STYLE="basic")
+GRID
+
+{
+   Tipo      [a0][t1                   ]  Numero de Documento  [f001  ]
+   Vendedor  [f004] [c                             ]
+   Fecha     [f005      ]                   Valor Recibo   [vr          ] 
+                                          Remanente      [re          ]
+----------------------------------------------------------------------------
+  Cliente         Aplicacion   Valor Pendiente    Descuento      Valor Pagado
+----------------------------------------------------------------------------
+  [f2][f003  ]  [f006        ] [f009         ]  [pk1       ]   [f002         ]
+  [f2][f003  ]  [f006        ] [f009         ]  [pk1       ]   [f002         ]
+  [f2][f003  ]  [f006        ] [f009         ]  [pk1       ]   [f002         ]
+  Nombre: [b                                            ]       =============
+         Balance Documento [f012         ]    Valor Recibo     [f011         ]
+}
+end
+tables
+cctb00001
+attributes
+vr = formonly.valor_ctrl,comments = "Digite el Monto del Recibo o Dcto.";
+a0 = cctb00001.tipo_doc,autonext,upshift,include = ("NC","PG","ND","OD","DV","OC"),
+ comments = "PG-Pago   ND-Nota Dr.   NC-Nota Cr.  ";
+f011 = formonly.p_total,noentry;
+f012 = formonly.nc_pend,noentry;
+t1   = formonly.nombre_tipo,noentry;
+f001 = cctb00001.num_doc,comments = "Digite Numero de Docuemnto";
+f2 = cctb00001.tipo_cliente,autonext,
+   comments = "Presione Ctrl-W o Digite el codigo del cliente";
+f003 = cctb00001.sec_cliente,autonext,
+   comments = "Presione Ctrl-W o Digite el codigo del cliente";    
+b = formonly.nom_cli,noentry;
+f004 = cctb00001.cod_emp_sec,autonext,
+   comments = "Presione Ctrl-W o Digite el codigo del vendedor";
+c = formonly.nombre_emp,noentry;
+f005 = cctb00001.fecha_orig,format = "dd/mm/yyyy";
+pk1  = formonly.desc_p;
+f006 = cctb00001.aplica_a, comments = 
+"Presione Ctrl-W Para Buscar Documentos Pendientes";
+f009 = formonly.valor_pen,noentry;
+f002 = formonly.valor_pag;
+re   = formonly.remanente;
+instructions
+ screen record s_recibo[3] (tipo_cliente,sec_cliente,aplica_a,valor_pen,desc_p,valor_pag)
+ 
+ delimiters " "
+end