Files
MBS/PROYECTO/addir/adfmmt003.per
T

63 lines
2.3 KiB
Plaintext

{
------------------------------------------------------------------
FORMULARIO : ADFMMT003
OBJETIVO : Capturar registros de la Tabla de Puestos
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Mayo 20, 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 PUESTOS", STYLE="basic")
GRID
{
<G >
Codigo del Puesto [f0 ]
Nombre del Puesto [f001 ]
Descripcion Alterna [k001 ]
Funcion Basica [f002 ]
[f003 ]
Nivel [c] Salario Minimo [a ] Salario Maximo [b ]
<G >
Estado del Registro[j]
Usuario Creador [f004 ] Usuario Modificador [f006 ]
Fecha Creacion [f005 ] Fecha Modificacion [f007 ]
}
end
END
tables
adtb00004
ATTRIBUTES
k001 = adtb00004.otra_descripcion,COMMENT="Digite otras descripciones relacionadas con el puesto";
f0 = adtb00004.cod_puesto,autonext,
comments = "Digite el codigo del Puesto";
f001 = adtb00004.nom_puesto,upshift,
comments = "Digite el nombre del Puesto";
f002 = adtb00004.funciones,upshift,
comments = "Digite las funciones relacionadas al Puesto";
f003 = adtb00004.funcion1,upshift,
comments = "Digite las funciones relacionadas al Puesto";
c = adtb00004.nivel_sal,autonext,
comments = "Digite el nivel salarial del Puesto";
a = adtb00004.salario_min,
comments = "Digite el Salario Minimo para el Puesto";
b = adtb00004.salario_max,
comments = "Digite el Salario Maximo para el Puesto";
j = adtb00004.status_t,noentry;
f004 = adtb00004.us_crea,noentry;
f005 = adtb00004.fech_crea,noentry;
f006 = adtb00004.us_mod,noentry;
f007 = adtb00004.fech_mod,noentry;
instructions
delimiters " "
end