IBM SC34-5764-01 Manual de usuario Pagina 339

  • Descarga
  • Añadir a mis manuales
  • Imprimir
  • Pagina
    / 481
  • Tabla de contenidos
  • MARCADORES
  • Valorado. / 5. Basado en revisión del cliente
Vista de pagina 338
(SUBSTR(DATE_SAVE,7,2)+FIRST_WEEKDAY_SAVE);
ATTR_STRING = 'ATTRIB(' CUR_DAY_FIELD 'RED )' ;
END;
END; /* select */
'PANEL RECEIVE CALENDAR'
END; /* do forever loop */
ERROR:
SAY 'RETURN CODE ' RC
SAY 'REA CODE ' PAN.REA
SAY 'LOC CODE ' PAN.LOC
EXIT;
EXIT_ROUTINE:
'PANEL END';
SENDE;
EXIT;
each definition needs to be in a separate RFS file.
******************************************************
Panel Facility
Chapter 24. REXX/CICS Panel Facility 317
Vista de pagina 338
1 2 ... 334 335 336 337 338 339 340 341 342 343 344 ... 480 481

Comentarios a estos manuales

Sin comentarios