Files

46 lines
1.5 KiB
Plaintext

{
---------------------------------------------------------------------------
FORMULARIO : ADFMMT009
OBJETIVO : Capturar registros de la Tabla de Profesiones
PROGRAMADOR : Ing. Betania Guerrero Perez
FECHA REALIZACION : Mayo 21, 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 >
Codigo Profesion [f00]
Descripcion [f001 ]
<G >
Estado delk Registro [j]
Usuario Creador [f002 ] Usuario Modificador [f004 ]
Fecha Creacion [f003 ] Fecha Modificacion [f005 ]
}
end
end
tables
adtb00010
attributes
f00 = adtb00010.cod_prof,autonext,
comments = "Digite el Codigo de la Profesion";
f001 = adtb00010.nom_prof,upshift,
comments = "Digite la Descripcion de la Profesion";
j = adtb00010.status_t,noentry;
f002 = adtb00010.us_crea,noentry;
f003 = adtb00010.fech_crea,noentry;
f004 = adtb00010.us_mod,noentry;
f005 = adtb00010.fech_mod,noentry;
instructions
delimiters " "
end