VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM VisualAge RPG Parts Reference - IBM

as400bks.rochester.ibm.com
from as400bks.rochester.ibm.com More from this publisher
08.05.2013 Views

NbrOfSel Devuelve el número de elementos seleccionados en la parte de lista de un componente. Si no hay ningún elemento seleccionado actualmente, se devuelve el valor cero. Tipo Numérico Se aplica a los componentes Recuadro de lista Subarchivo de mensajes Códigos de operación Subarchivo SETATR Operativo en tiempo de ejecución no GETATR sí Ejemplo de formato libre Obtener el número de elementos seleccionados en un recuadro de lista: *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C * EVAL num=%getatr('win01':'LB1':'NbrOfSel') C num IFEQ *ZERO C EVAL %setatr('win01':'MSG1':'AddMsgText')='None' C * ENDIF Ejemplo de formato fijo *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C 'LB1' GETATR 'NBROFSEL' NbrSelected 2 0 * 302 VisualAge RPG Manual de consulta de componentes

NextLine Si este atributo se establece en 1, el graduador de la barra de desplazamiento se traslada a una posición que representa la siguiente línea dentro de una lista de elementos. El movimiento descrito por el graduador es relativo al atributo Range establecido para el componente barra de desplazamiento. Por ejemplo, supongamos que tiene un componente subarchivo y desea indicar dónde se halla un usuario dentro de un conjunto de registros cuando se pulsa una tecla de movimiento del cursor o de mandato. El componente barra de desplazamiento conectado a un subarchivo indica únicamente dónde se encuentra el usuario tomando como base el número de registros que hay actualmente en el subarchivo. Al capturar el evento VKeyPress, se puede establecer el atributo de graduador pertinente. Cuando el graduador queda situado en su nueva posición, se señala un evento Scroll y se actualiza el atributo del evento %Position. El atributo PageSize determina el tamaño de página visible de los elementos visualizados. El atributo Range determina el límite superior correspondiente al número de elementos por los que se pasará al realizar el desplazamiento. Tipo Numérico Se aplica a los componentes Barra de desplazamiento horizontal Códigos de operación Barra de desplazamiento vertical SETATR Operativo en tiempo de ejecución sí GETATR no Ejemplo de formato libre *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C EVAL %setatr('win01':'VSC1':'NextLine')=1 * Ejemplo de formato fijo *...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8 CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq---- * C 'VSC1' SETATR 1 'NEXTLINE' * Capítulo 2. Atributos de componente 303

NbrOfSel<br />

Devuelve el número de elementos seleccionados en la parte de lista de un<br />

componente.<br />

Si no hay ningún elemento seleccionado actualmente, se devuelve el valor cero.<br />

Tipo Numérico<br />

Se aplica a los componentes<br />

Recuadro de lista Subarchivo de<br />

mensajes<br />

Códigos de operación<br />

Subarchivo<br />

SETATR<br />

Operativo en tiempo de ejecución<br />

no<br />

GETATR sí<br />

Ejemplo de formato libre<br />

Obtener el número de elementos seleccionados en un recuadro de lista:<br />

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

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

*<br />

C<br />

*<br />

EVAL num=%getatr('win01':'LB1':'NbrOfSel')<br />

C num IFEQ *ZERO<br />

C EVAL %setatr('win01':'MSG1':'AddMsgText')='None'<br />

C<br />

*<br />

ENDIF<br />

Ejemplo de formato fijo<br />

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

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

*<br />

C 'LB1' GETATR 'NBROFSEL' NbrSelected 2 0<br />

*<br />

302 <strong>VisualAge</strong> <strong>RPG</strong> Manual de consulta de componentes

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

Saved successfully!

Ooh no, something went wrong!