49 lines
2.0 KiB
Plaintext
49 lines
2.0 KiB
Plaintext
{
|
|
------------------------------------------------------------------------
|
|
FORMULARIO : ADFMWD004
|
|
OBJETIVO : Pantalla que muestra los empleados de la empresa
|
|
Es utilizada por: ADPRMT010,ADPRMT016,ADPRMT017,ADPRMT018
|
|
ADPRMT019,ADPRMT020,ADPRMT021
|
|
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="BUSQUEADA EMPLEADOS")
|
|
GRID
|
|
{
|
|
Busqueda de Empleados
|
|
<g >
|
|
<t >
|
|
[f1 ][f2 ][f5][f6] [f3 ] [f7 ][f4 ] [f8 ]
|
|
[f1 ][f2 ][f5][f6] [f3 ] [f7 ][f4 ] [f8 ]
|
|
[f1 ][f2 ][f5][f6] [f3 ] [f7 ][f4 ] [f8 ]
|
|
[f1 ][f2 ][f5][f6] [f3 ] [f7 ][f4 ] [f8 ]
|
|
[f1 ][f2 ][f5][f6] [f3 ] [f7 ][f4 ] [f8 ]
|
|
|
|
}
|
|
end
|
|
tables
|
|
adtb00003
|
|
attributes
|
|
f1 = adtb00003.num_emp,TITLE="FICHA EMPLEADO";
|
|
f2 = adtb00003.departamento,autonext;
|
|
f5 = adtb00003.nivel_emp,autonext;
|
|
f6 = adtb00003.cod_puesto,autonext;
|
|
f3 = adtb00003.nom1_emp,TITLE="PRIMER NOMBRE";
|
|
f7 = adtb00003.nom2_emp;
|
|
f4 = adtb00003.apell1_emp,TITLE="PRIMER APELLIDO";
|
|
f8 = adtb00003.apell2_emp;
|
|
instructions
|
|
screen record s_empleado (num_emp,departamento,nivel_emp,cod_puesto,
|
|
nom1_emp,nom2_emp,apell1_emp,apell2_emp)
|
|
delimiters " "
|
|
end
|