08.05.2013 Views

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

VisualAge RPG Parts Reference - IBM

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

WeekDay<br />

Indica el día de la semana que está seleccionado.<br />

Tipo Numérico<br />

Se aplica a los componentes<br />

Calendario<br />

Códigos de operación<br />

SETATR<br />

Operativo en tiempo de ejecución<br />

no<br />

GETATR sí<br />

Valor devuelto<br />

Uno de los siguientes:<br />

0 Domingo<br />

1 Lunes<br />

2 Martes<br />

3 Miércoles<br />

4 Jueves<br />

5 Viernes<br />

6 Sábado<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 index = %getatr('win01': 'CAL1': 'WeekDay')<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 'CAL1' GETATR 'WEEKDAY' 02<br />

*<br />

Capítulo 2. Atributos de componente 451

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

Saved successfully!

Ooh no, something went wrong!