{
-----------------------------------------------------------------------
 FORMULARIO        : ADFMMT001
 OBJETIVO          : Capturar registros de la Tabla de Departamentos     
 PROGRAMADOR       : Ing. Betania Guerrero Perez
 FECHA REALIZACION : Mayo 19, 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 DEPARTAMENTOS", STYLE="basic")
  
GRID

{
<G                                                         >
  Codigo del Departamento [f000   ]
  Descripcion             [f001                          ]
  Estado A                [a        ]
  Estado M                [m        ]

<G                                                                                                 >
  Estado del Registro          [j]
  Usuario Creador              [f002            ]  Usuario Modificador  [f004            ]
  Fecha Creacion               [f003            ]  Fecha Modificacion   [f005            ]
  
}
end
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";
a = formonly.m_estado_a;
m = formonly.m_estado_m;
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