[Library] [Contents] [Revisions] [Prev Topic] [Next Topic] [Search] [Search Results] [Prev Topic Match] [Next Topic Match] [Notes] [List Notes] [Print] [Download] [Help]

4.2.3.13.1 Using CLISTs to Redefine Program Function (PF) Keys



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:

  1. Uses the SMPUT command to place the commands in the SMIN stream.
    
    
  2. Saves the definitions of the existing PF keys on the PF key stack.
    
    
  3. Changes the MSG function so that any messages from other TSO/E users, the operator, or background jobs are displayed in the message stream at normal intensity. The terminal's audible alarm is to sound when a message enters the stream.
    
    
  4. PF9 then does the following:
    
    
    

     /*********************************************************************/ 
     /* 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 




[Prev Topic] [Next Topic] © Copyright IBM Corp. 1988, 2000

IBM BookManager® BookServer Copyright 1989, 1999 IBM Corporation. All rights reserved.


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 ]