Figure 18 is an example of a simple CLIST that redefines PF9 using Session Manager commands. After the CLIST is executed, pressing PF9 causes the MAIN window to display the MESSAGE stream so you can see the messages from other TSO/E users, the operator, or background jobs. Pressing PF9 again repositions the MAIN window at its previous location and restores the previous PF9 definition. The steps in the CLIST are as follows:
/*********************************************************************/
/* THIS CLIST SETS UP A SESSION MANAGER PROGRAM FUNCTION KEY. */
/* IT ASSUMES THE IBM-SUPPLIED DEFAULT SCREEN LAYOUT IS THE CURRENT */
/* SCREEN LAYOUT WHEN IT IS INVOKED: */
/* - THE "MSG" FUNCTION IS CHANGED TO SEND MESSAGES FROM OTHER TSO/E */
/* USERS TO THE "MESSAGE" STREAM, SOUNDING THE ALARM WHEN A */
/* MESSAGE IS RECEIVED. */
/* - PF KEY 9 IS DEFINED TO MAKE THE "MAIN" WINDOW VIEW THE MESSAGE */
/* STREAM WHEN PRESSED. IF PRESSED AGAIN, PF 9 RETURNS THE "MAIN" */
/* WINDOW TO VIEWING THE STREAM IT WAS VIEWING WHEN PF 9 WAS FIRST */
/* PRESSED. */
/* - THE EXISTING PF KEYS ARE SAVED BEFORE THE SCREEN IS MODIFIED. */
/*********************************************************************/
/* */
SMPUT /SAVE.PFK;+
CHANGE.FUNCTION MSG OUTPUT(MESSAGE 1) ALARM(OUTPUT);+
CHANGE.PFK 9 'SAVE.PFK;SAVE.WINDOW MAIN;+
CHANGE.WINDOW MAIN VIEW(MESSAGE);+
CHANGE.PFK 9 ''RESTORE.PFK;RESTORE.WINDOW MAIN'' +
SMIN' SMIN/ SMIN
Figure 18. A TSO/E CLIST that Redefines PF Key 9
© Copyright IBM Corp. 1988, 2000
Return to library: [ OS/390 | TPF | VM | VSE | IBM Hardware | S/390 Redbooks | RS/6000 SP ]
Glossary - IBM Dictionary of Computing
How to: [ Order publications | Contact OS/390 ]