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,96 @@
+{
+------------------------------------------------------------------------
+ FORMULARIO        : ADFMMT010
+ OBJETIVO          : Pantalla para introducir las informaciones de la
+                     requisicion de personal.
+                     Es utilizada por: ADPRMT010
+ PROGRAMADOR       : Ing. Betania Guerrero Perez
+ FECHA REALIZACION : Junio 24, 1993  
+------------------------------------------------------------------------
+}
+SCHEMA smarmotech 
+
+TOOLBAR
+  ITEM nuevo (TEXT="Nuevo", IMAGE="new", COMMENT="Adicionar Registos")
+  ITEM buscar (TEXT="Buscar", IMAGE="find", COMMENT="Buscar Regustros")  SEPARATOR
+  ITEM salir (TEXT="Salir", COMMENT = "Salir del Programa", IMAGE="quit") 
+END
+  
+screen size 24 by 80
+{
+Numero Documento: [f002]    Fecha: [f000      ]   Fecha Requerido: [f001      ]
+Departamento: [f004] [b                             ]
+Requerimiento: [f] [c        ]     Razon: [t                             ]
+Puesto: [f5] [d                             ] 
+Funciones: [g                                                            ]
+           [g4                                                           ]
+Edad Minima: [f6]  Sueldo Semanal: [f003       ]  Sueldo Mensual: [f005       ]
+Experiencia: [h][k           ] Educacion: [m ] [n                             ]
+\g-----------------------------------------------------------------------------
+   Codigo     Descripcion                          Nivel Pericia
+    [f9]     [f8                            ]          [a]
+    [f9]     [f8                            ]          [a]
+    [f9]     [f8                            ]          [a]
+Requerido Por: [x   ][y   ][r ][s ]  [g1                                      ]
+Aprobado Por:  [x1  ][y1  ][r1][s1]  [g2                                      ]
+Aprobado Por:  [x2  ][y2  ][r2][s2]  [g3                                      ]
+}
+end
+tables
+adtb00011,adtb00001,
+adtb00004,adtb00005,
+adtb00006,adtb00009
+attributes
+f002 = adtb00011.num_doc,autonext,
+  comments = "Digite el Numero del Documento";
+f000 = adtb00011.fecha,format = "dd/mm/yyyy";
+f001 = adtb00011.fech_req,format = "dd/mm/yyyy";
+f004 = adtb00011.depart,autonext,
+comments = "Digite el codigo del Departamento o Presione Ctr-l W para busqueda";
+b = adtb00001.nom_dpto,noentry;
+f = adtb00011.tipo_req,autonext,include = (1,2),
+   comments = "Digite 1 = Adicion, 2 = Reemplazo";
+c  = formonly.descr,noentry;
+t  = adtb00011.razon_vac,upshift,
+   comments = "Digite la Razon de la Vacante";
+f5 = adtb00011.cod_puesto_r,autonext,
+comments = "Digite el Codigo del Puesto o Presione Ctr-l W para busqueda";
+d = adtb00004.nom_puesto,noentry;
+g = adtb00004.funciones,noentry;
+g4 = adtb00004.funcion1,noentry;
+f6 = adtb00011.edad_min,autonext,
+   comments = "Digite la Edad Minima Requerida para la vacante";
+f003 = adtb00011.salario_sem;
+f005 = adtb00011.salario_men;
+h = adtb00011.experiencia,autonext,include = (1,2,3),
+  comments = "Digite 1 = Necesaria, 2 = Deseable, 3 = No Necesaria";
+k = formonly.descrip,noentry;
+m = adtb00011.cod_educa,autonext,comments = 
+    "Digite el Codigo del Nivel Educativo o Presione Ctrl-W para busqueda";
+n = adtb00005.nom_educa,noentry;
+f9 = adtb00006.cod_pericia,autonext,
+  comments ="Digite el Codigo de la Pericia o Presione Ctrl-W para busqueda";
+f8 = adtb00006.nom_pericia,noentry;
+a = adtb00011.status_per,autonext,upshift,
+  comments = "Digite D = Deseable o N = Necesario";
+x = adtb00011.num_emp,autonext,
+  comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
+y = adtb00011.departamento,noentry;
+r = adtb00011.nivel_emp,noentry;
+s = adtb00011.cod_puesto,noentry;
+g1 = formonly.empleado,noentry;
+x1 = adtb00011.num1_emp,autonext,
+  comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
+y1 = adtb00011.departamento1,noentry;
+r1 = adtb00011.nivel1_emp,noentry;
+s1 = adtb00011.cod1_puesto,noentry;
+g2 = formonly.empleado1,noentry;
+x2 = adtb00011.num2_emp,autonext,
+  comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
+y2 = adtb00011.departamento2,noentry;
+r2 = adtb00011.nivel2_emp,noentry;
+s2 = adtb00011.cod2_puesto,noentry;
+g3 = formonly.empleado2,noentry;
+instructions
+  screen record consart[3] (cod_pericia,nom_pericia,status_per)
+end