Files
MBS/PROYECTO/otrodir/mainmenuform.per
T

85 lines
5.3 KiB
Plaintext

ACTION DEFAULTS
ACTION nextfield ( ACCELERATOR2 = Right )
ACTION prevfield ( ACCELERATOR2 = Left )
ACTION show ( TEXT="Ejecutar", ACCELERATOR = Enter, ACCELERATOR2 = Return )
ACTION close ( TEXT="Salir Sistema", ACCELERATOR = Escape )
ACTION clave ( TEXT="Cambia Clave", ACCELERATOR = Escape)
END
LAYOUT(text="MBS",VERSION="2",STYLE="main-mbs")
GRID
{
<G > <G ><G >
[img ] [ed1 ] [img20 ]
[lu ][usu ][pp ]
[lfe ][fe ]
[tas ][tas1 ]
[rt ]
<t t1 ><t t2 >
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[ddir ] [demo |prog |t |desc ]
[Description ]
[ ]
[ ]
[ :sh :ca :cl ]
}
END
END
ATTRIBUTES
IMAGE img:image="logo.png";
IMAGE img20:image="logocia.png";
ed1 = formonly.nombre_cia;
TABLE t1 : UNMOVABLECOLUMS;
TABLE t2 : UNMOVABLECOLUMS, DOUBLECLICK = show, style="detail";
rt = formonly.file_path;
pp = formonly.pperfil;
lu = formonly.lusuario;
lfe = formonly.lfecha;
usu = formonly.usuario;
fe = formonly.fecha_sistema type date,format="(ddd.) mmm. dd, yyyy";
tas = formonly.ltasa;
tas1= formonly.tasa;
EDIT ddir = FORMONLY.ddir,UNSORTABLE,noentry,TITLE="OPCIONES";
EDIT demo = FORMONLY.mbs,UNSORTABLE,STYLE="programas",TITLE="MODULOS";
EDIT prog = FORMONLY.prog,UNSORTABLE,TITLE="PROGRAMAS";
IMAGE t = FORMONLY.type,UNSORTABLE,TITLE="TIPO";
EDIT desc = FORMONLY.desc,UNSORTABLE,TITLE="DESCRIPCION";
BUTTON sh: show;
BUTTON cl: close;
BUTTON ca: clave;
TEXTEDIT description = FORMONLY.longdesc, STRETCH=BOTH, FONTPITCH=FIXED;
END
INSTRUCTIONS
SCREEN RECORD dirs(FORMONLY.ddir);
SCREEN RECORD mbs(FORMONLY.mbs,FORMONLY.prog,FORMONLY.type,FORMONLY.desc);
delimiters " "
END