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,53 @@
+database smarmotech   
+
+screen size 24 by 80
+{
+
+\gp--------------------------------------------------------------------------q\g
+\g|\gDocumento Numero [f000  ]   Orden de Compras  [ti][l     ]                \g|\g
+\g|\gFecha            [f001    ]                                               \g|\g
+\g|\gSuplidor         [p1][f013] [a1                            ] Bodega: [p2] \g|\g
+\gb--------------------------------------------------------------------------d\g
+                  C A N T I D A D
+ Codigo          Devuelta   Ordenada     Unidad     D e s c r i p c i o n
+\g------------------------------------------------------------------------------\g
+[a][b][c ][d  ][f02        ][f03         ][p  ][k                             ] 
+[a][b][c ][d  ][f02        ][f03         ][p  ][k                             ] 
+[a][b][c ][d  ][f02        ][f03         ][p  ][k                             ] 
+[a][b][c ][d  ][f02        ][f03         ][p  ][k                             ] 
+[a][b][c ][d  ][f02        ][f03         ][p  ][k                             ] 
+[a][b][c ][d  ][f02        ][f03         ][p  ][k                             ] 
+\g------------------------------------------------------------------------------\g
+
+}
+end
+tables
+intb00006,
+intb00001,
+cotb00001
+attributes
+f000 = intb00006.num_doc,autonext,
+    comments = "Digite Numero Documento";
+l    = intb00006.orden_compra,autonext,
+    comments = "Digite El Numero De La Orden de Compras";
+f001 = intb00006.fecha, format = "dd/mm/yy",autonext,
+    comments = "Digite Fecha Documento";
+p2   = intb00006.bodega,autonext;
+p1   = intb00006.cod_sp,noentry; 
+f013 = intb00006.cod_sp_sec,noentry;
+ti   = intb00006.tipo,autonext,include = ("01","02","03","04"),comments =
+"Digite tipo 01-Generales 02-Rov-Ltd.  03-Locales 04-Miscelanas";
+a    = intb00006.cod_n,noentry;
+b    = intb00006.cod_grupo,noentry;
+c    = intb00006.cod_tipo,noentry;
+d    = intb00006.cod_sec,noentry;
+f02  = intb00006.cantidad_1,autonext,
+    comments = "Digite La Cantidad Ordenada";
+f03  = intb00006.cantidad_2,noentry; 
+k    = intb00001.descrip_esp,noentry,autonext;
+p    = intb00001.unidad_med,noentry,autonext;
+a1   = cotb00001.nom_sp,noentry;
+  INSTRUCTIONS
+    SCREEN RECORD s_movi1[6] (cod_n,cod_grupo,cod_tipo,cod_sec,cantidad_1,
+                              cantidad_2,unidad_med,descrip_esp)
+end