{
------------------------------------------------------------------------
 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