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,93 @@
+{
+------------------------------------------------------------------------
+ FORMULARIO        : ADFMMT016
+ OBJETIVO          : Pantalla para introducir las informaciones del
+                     proceso de seleccion y contratacion de empleados. 
+                     Es utilizada por: ADPRMT016
+ 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
+
+LAYOUT (TEXT="FORMULARIO MANTENIMIENTO PROFESIONES", STYLE="basic")
+  
+GRID
+{
+<G                                                                                   >
+  Fecha [f000      ] Expediente de [f009] [g                                     ]
+  A     [f001]-[f002]-[f3]-[f4]  [n                                              ]
+  De    [f1  ]-[f02 ]-[b ]-[c ]  [d                                              ]
+  Recomendacion    [f][h                    ]
+  Comentarios      [f011                                                         ]
+  Entrevistado Por [f014]-[f015]-[f6]-[f7] [p                                    ]
+  Aprobado Por     [f018]-[f019]-[f2]-[f5] [p1                                   ]
+      Acciones           Descripcion                            Accion 
+        [f13]  [m                             ]         [a]
+        [f13]  [m                             ]         [a]
+        [f13]  [m                             ]         [a]
+    
+}
+end
+end
+tables
+adtb00018,adtb00008
+attributes
+dateedit f000 = adtb00018.fecha,format = "dd/mm/yyyy";
+f009 = adtb00018.cod_sol,autonext,
+ comments = "Digite el codigo del solicitante";
+g = formonly.descrip3,noentry;
+f001 = adtb00018.num_emp,autonext,
+ comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
+f002 = adtb00018.departamento,autonext,
+ comments = "Digite el departamento del empleado";
+f3 = adtb00018.nivel_emp,autonext,
+ comments = "Digite el nivel del empleado";
+f4 = adtb00018.cod_puesto,autonext,
+ comments = "Digite el puesto del empleado";
+n = formonly.descrip1,noentry;
+f1 = formonly.num3_emp,autonext,
+ comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
+f02 = formonly.departamento3,autonext,
+ comments = "Digite el departamento del empleado";
+b = formonly.nivel3_emp,autonext,
+ comments = "Digite el nivel del empleado";
+c = formonly.cod3_puesto,autonext,
+ comments = "Digite el puesto del empleado";
+d = formonly.descrip2,noentry;
+f = adtb00018.recomendacion,autonext,include = (1,2,3),
+ comments = "Digite 1= Aceptarlo, 2= Mantenerlo en Archivo, 3= No le interesa";
+h = formonly.descrip,noentry;
+f011 = adtb00018.otros_com,upshift;
+f014 = adtb00018.num1_emp,autonext,
+ comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
+f015 = adtb00018.departamento1,autonext,
+comments ="Digite el departamento del empleado";
+f6 = adtb00018.nivel1_emp,autonext,
+ comments = "Digite el nivel del empleado";
+f7 = adtb00018.cod1_puesto,autonext,
+ comments = "Digite el puesto del empleado";
+p = formonly.descrip4,noentry;
+f018 = adtb00018.num2_emp,autonext,
+ comments = "Digite la ficha del empleado o Presione Ctrl-W para busqueda";
+f019 = adtb00018.departamento2,autonext,
+ comments = "Digite el departamento del empleado";
+f2 = adtb00018.nivel2_emp,autonext,
+ comments = "Digite el nivel del empleado";
+f5 = adtb00018.cod2_puesto,autonext,
+ comments = "Digite el puesto del empleado";
+p1 = formonly.descrip5,noentry;
+f13 = adtb00018.cod_requi,autonext,
+ comments = "Digite el codigo del requisito o Presione Ctrl-W para busqueda";
+m = adtb00008.requisito,noentry;
+a = adtb00018.ind_requi,upshift,autonext,include = ("S","N"),
+ comments = "Digite S o N";
+instructions
+ screen record consart[3] (cod_requi,requisito,ind_requi)
+end