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