Files

40 lines
1.3 KiB
Plaintext

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
screen size 24 by 80
{
<G >
Codigo de la Seccion [a0]
Codigo del Departamento [f000] [b ]
Nombre de la Seccion [f001 ]
<G >
Estado del Registro [j]
Usuario Creador [f002 ] Usuario Modificador [f004 ]
Fecha Creacion [f003 ] Fecha Modificacion [f005 ]
}
end
tables
adtb00002
attributes
a0 = adtb00002.cod_seccion,autonext,
comments = "Digite el codigo de la Seccion";
f000 = adtb00002.departamento,autonext,
comments = "Digite el codigo del departamento";
b = formonly.nombre,noentry;
f001 = adtb00002.nom_seccion,upshift,
comments = "Digite el nombre de la Seccion";
f002 = adtb00002.us_crea,noentry;
f003 = adtb00002.fech_crea,noentry;
f004 = adtb00002.us_mod,noentry;
f005 = adtb00002.fech_mod,noentry;
j = adtb00002.status_t,noentry;
instructions
delimiters " "
end