08.05.2013 Views

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Index<br />

Establece el valor de índice para la parte de lista de un componente. Este valor<br />

determina el elemento que se ve afectado cuando se utilizan determinados<br />

atributos. Por ejemplo, el atributo Index debe establecerse para un elemento para<br />

que el atributo GetItem se pueda utilizar para recuperarlo.<br />

Tipo Numérico<br />

Se aplica a los componentes<br />

Recuadro de<br />

combinación<br />

Códigos de operación<br />

Recuadro de lista Subarchivo de<br />

mensajes<br />

Subarchivo<br />

SETATR<br />

Operativo en tiempo de ejecución<br />

sí<br />

GETATR sí<br />

Valor permitido<br />

Valor de índice<br />

Ejemplo de formato libre<br />

*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8<br />

CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----<br />

*<br />

C<br />

*<br />

EVAL %setatr('win01': 'LB1': 'Index') = 4<br />

C<br />

*<br />

EVAL index = %getatr('win01': 'LB1': 'Index')<br />

Ejemplo de formato fijo<br />

Guardar el valor de índice actual para un recuadro de lista y, a<br />

continuación, cambiarlo:<br />

*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8<br />

CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----<br />

*<br />

C 'LB1' GETATR 'INDEX' OldIndex 2 0<br />

C 'LB1' SETATR NewIndex 'INDEX' 2 0<br />

*<br />

Capítulo 2. Atributos de componente 253

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!