79 lines
2.3 KiB
Plaintext
79 lines
2.3 KiB
Plaintext
SCHEMA FORMONLY
|
|
|
|
LAYOUT( TEXT="Perfiles")
|
|
VBOX vb1
|
|
GRID gr3
|
|
{
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
}
|
|
END -- GRID
|
|
FOLDER pc1
|
|
PAGE Listaperfiles( TEXT="Lista Perfiles")
|
|
GRID gr4
|
|
{
|
|
|
|
[aa0 ] [aa1 ] [aa2 ]
|
|
|
|
<T tb3 >
|
|
[aa3 |aa4 ]
|
|
[aa3 |aa4 ]
|
|
[aa3 |aa4 ]
|
|
< >
|
|
|
|
|
|
}
|
|
END -- GRID
|
|
END -- PAGE
|
|
PAGE Page3( TEXT="Actualizacion")
|
|
GRID gr7
|
|
{
|
|
<G gb3 >
|
|
[aa5 |aa6 |aa7 ][aa8 ]
|
|
< >
|
|
Codigo [aa9 ] Descripcion [ab0 ]
|
|
Programa[ab1 ] Sistema [ab2 ]
|
|
<G gb4 >
|
|
Usuario Creador [ab3 ] Usuario Modificador [ab4 ]
|
|
|
|
Fecha Creacion [ab5 ] Fecha Modificacion [ab6 ]
|
|
< >
|
|
|
|
}
|
|
END -- GRID
|
|
END -- PAGE
|
|
END -- FOLDER
|
|
END -- VBOX
|
|
END
|
|
ATTRIBUTES
|
|
LABEL aa0:lb1, TEXT="CRITERIO";
|
|
EDIT aa1=FORMONLY.criterio, TABINDEX=1;
|
|
BUTTON aa2 : bt1, TEXT="Buscar";
|
|
TABLE tb3 : tb3;
|
|
EDIT aa3=FORMONLY.acodigo, TABINDEX=2, TITLE="Codigo";
|
|
EDIT aa4=FORMONLY.pperfil, TABINDEX=3, TITLE="Perfil";
|
|
GROUP gb3 : gb3, TEXT="Opciones";
|
|
BUTTON aa5 : bt5, IMAGE="new";
|
|
BUTTON aa6 : bt6, IMAGE="filesave";
|
|
BUTTON aa7 : bt7, IMAGE="edit";
|
|
BUTTON aa8 : bt8, IMAGE="eraser";
|
|
EDIT aa9=FORMONLY.pcodigo, TABINDEX=4;
|
|
EDIT ab0=FORMONLY.pdescripcion, TABINDEX=5;
|
|
COMBOBOX ab1=FORMONLY.pprograma TYPE CHAR, SCROLL, TABINDEX=7;
|
|
TEXTEDIT ab2=FORMONLY.psistema, TABINDEX=6;
|
|
GROUP gb4 : gb4, TEXT="Auditoria";
|
|
EDIT ab3=FORMONLY.puscrea, TABINDEX=10;
|
|
EDIT ab4=FORMONLY.pusmod, TABINDEX=8;
|
|
EDIT ab5=FORMONLY.pfechcrea, TABINDEX=11;
|
|
EDIT ab6=FORMONLY.pfechamod, TABINDEX=9;
|
|
END
|
|
|
|
INSTRUCTIONS
|
|
SCREEN RECORD tb3 (FORMONLY.acodigo, FORMONLY.pperfil)
|
|
END
|