VisualAge RPG Parts Reference - IBM

Hidden
Determina si una columna de un subarchivo será visible. El atributo ColNumber
debe estar establecido para indicar a qué columna afecta.
Tipo Numérico
Se aplica a los componentes
Subarchivo
Códigos de operación
SETATR
Operativo en tiempo de ejecución
sí
GETATR sí
Valor permitido
El valor de Hidden puede ser uno de los siguientes:
0 La columna no está oculta
1 La columna está oculta
Ejemplo de formato libre
Cambiar el estado Hidden de una columna
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----
*
C
*
EVAL rc = %getatr('win01': 'SF1': 'Hidden')
C rc IFEQ 0
C
*
EVAL %setatr('win01': 'SF1': 'Hidden') = 1
C ELSE
C EVAL %setatr('win01': 'SF1': 'Hidden') = 0
C
*
ENDIF
Ejemplo de formato fijo
Cambiar el estado Hidden de un atributo
*...1....+....2....+....3....+....4....+....5....+....6....+....7....+....8
CSRN01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq----
*
C 'SF1' GETATR 'HIDDEN' IsHidden 1 0
C IsHidden IFEQ 1
C
*
'SF1' SETATR 0 'HIDDEN'
C ELSE
C 'SF1' SETATR 1 'HIDDEN'
C
*
ENDIF
Capítulo 2. Atributos de componente 245