51 lines
1.7 KiB
Plaintext
51 lines
1.7 KiB
Plaintext
{
|
|
-----------------------------------------------------------------------
|
|
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
|