{ ----------------------------------------------------------------------- FORMULARIO : nofmmt023 OBJETIVO : Capturar registros de la Tabla de Departamentos PROGRAMADOR : Ing. Betania Guerrero Perez FECHA REALIZACION : Mayo 19, 1993 ----------------------------------------------------------------------- } database smarmotech TOOLBAR ITEM nuevo (TEXT="Departamento", IMAGE="new", COMMENT="Nuevo Departamento") ITEM buscar (TEXT="Buscar Departamento", IMAGE="find", COMMENT="Criterio de busqueda") SEPARATOR ITEM salir (TEXT="Salir", IMAGE="quit") END LAYOUT (TEXT="MAESTRA DEPARTAMENTO", STYLE="basic") GRID { Codigo del Departamento [f000] Descripcion [f001 ] [j] Usuario Creador [f002 ] Usuario Modificador [f004 ] Fecha Creacion [f003 ] Fecha Modificacion [f005 ] } end tables adtb00001 attributes f000 = adtb00001.departamento,autonext, comments = "Digite el codigo del departamento"; f001 = adtb00001.nom_dpto,upshift, comments = "Digite el nombre del departamento"; j = adtb00001.status_t,noentry; f002 = adtb00001.us_crea,noentry; f003 = adtb00001.fech_crea,noentry; f004 = adtb00001.us_mod,noentry; f005 = adtb00001.fech_mod,noentry; instructions delimiters " " end