Go to:  Davar site entry | Site contents | Site index | Mainframe | CLIST | Text bottom

TEMPNAME  CLIST  Command

        

TEMPNAME CLIST command is used to setup a TSO/ISPF session environment so that programmer's REXX and CLIST commands could be recognized by name and get executed during this session.  This is achieved by reallocating SYSEXEC and SYSPROC library concatenations with corresponding programmer's library (or multiple libraries) placed in front of existing concatenation.  Such order ensures that in case of command (partition) name conflict, the command from the programmer's library will be executed.

Model command below also contains a setup of programmer's PANEL and LOAD libraries for use with ISPF Dialog Services (can be defined without TSO allocation) and several other commands for further environment customization.

TSO/ISPF environment setup with a single command is particularly useful for computer consultants by providing a quick way to make their productivity tools functional on any client site after uploading necessary libraries and performing a simple procedure described below.

Model TEMPNAME command should be customized to include REXX and CLIST libraries which are used on client's site (i.e.  in the TSO/ISPF logon procedure).  This customized TEMPNAME command should be executed at each LogOn in order to initialize TSO/ISPF session.

 •
Determine site-specific SYSEXEC  REXX and SYSPROC  CLIST library lists (enter  TSO ISRDDN  command and page down using [PF8] to SYSEXEC and SYSPROC DDname lines).
 •
Cut site-specific SYSEXEC/SYSPROC library lists and paste them to appropriate places into TEMPNAME command after lines with your personal REXX/CLIST libraries.  E.g.:  PGMR.REXX and PGMR.CLIST in the command text below.
 •
Place TEMPNAME CLIST command text into &SYSUID..<Infix>.CLIST(TEMPNAME) library partition.  E.g.:  &SYSUID..PGMR.CLIST(TEMPNAME)
 •
Enter  TSO EX <Infix>  command to setup TSO session environment (at Command field of any panel).  This abbreviation takes advantage ot three TSO defaults for EX command:  name (called here <Infix>) is prefixed by TSO PREFIX value (which is normally equals to &SYSUID. value), and is suffixed by CLIST, executing by default a CLIST from TEMPNAME partition of thus defined library. 
E.g.:  Enter  TSO EX PGMR  to execute &SYSUID..PGMR.CLIST(TEMPNAME) library partition with TEMPNAME CLIST command; this will provide access to commands from &SYSUID..PGMR.REXX and &SYSUID..PGMR.CLIST libraries.  Enter it normally as the very first command upon entering ISPF; better yet add it to your 3270 emulator logon macro to be executed at session start).
Note:
The name of the CLIST TEMPNAME is chosen to be a TSO default (for libray prefix and suffix and partition name) in order to simplify the  TSO  EX  <Infix>  command.  However, any other name can be used by specifying both library and partition names,
E.g.:  TSO  EX  PGMR.ANYLIB(ANYPART).



     /* TEMPNAME  Setup TSO/ISPF Session Environment   09/02/199312/16/1998
     /* --------------------------------------------------------------------
     /* Copyright (C) 19931998 by Vladimir Veytsel            www.davar.net
     /* Cut-n-Paste site-specific library lists from the  TSO ISRDDN  output
     /* Enter  TSO EX <infix>  to setup TSO session.  E.g.:  TSO EX PGMR  to
     /* get access to &SYSUID..PGMR.REXX  and  &SYSUID..PGMR.CLIST  commands
     /* (normally as the very first command upon entering ISPF;   better yet
     /* add it to your 3270 emulator logon macro to be run at session start)

        ALLOCATE FILE   (SYSEXEC)         +
                 DATASET(PGMR.REXX        +
                        'SYS1.REXX'       +
                        'SYS1.QMF.REXX'   +
                        'SYS1.USER.REXX'  +
                        )REUSE,SHR

        ALLOCATE FILE   (SYSPROC)         +
                 DATASET(PGMR.CLIST       +
                        'SYS1.CLIST'      +
                        'SYS1.USER.CLIST' +
                        )REUSE,SHR

        ISPEXEC LIBDEF ISPPLIB DATASET ID(PGMR.PANEL)
        ISPEXEC LIBDEF ISPLLIB DATASET ID(PGMR.LOAD)

        %SC S  /* Set customized commands for ISPF sessions
        %SK    /* Set standard and customized PF key commands
        %SS    /* Start multiple ISPF logical sessions
  


Example of  TSO  ISRDDN  command output:



                             Current Data Set Allocations           Line 47 of 69
   Command ===> ________________________________________________ Scroll ===> PAGE
    
    Volume   Disposition Act DDname   Data Set Name   List Actions:  B E V F C I Q
    TSO003   SHR,KEEP   > _  ISPPROF  MYUSERID.ISPF.PROFILE
    MVS002   SHR,KEEP   > _  ISPSLIB  SYS1.SKEL
    USR003   SHR,KEEP   > _           SYS1.USER.SKEL
    MVS001   SHR,KEEP   > _           SYS1.ISRSLIB
    MVS002   SHR,KEEP   > _  ISPTLIB  SYS1.TABLE
    USR008   SHR,KEEP   > _           SYS1.USER.TABLE
    USR012   SHR,KEEP   > _           SYS2.USER.TABLE
    MVS001   SHR,KEEP   > _           SYS1.ISRTLIB
    TSO001   SHR,KEEP   > _  SYSEXEC  MYUSERID.PGMR.REXX
    MVS003   SHR,KEEP   > _           SYS1.REXX
    TSO007   SHR,KEEP   > _           SYS1.QMF.REXX
    USR004   SHR,KEEP   > _           SYS1.USER.REXX
    MVS001   SHR,KEEP   > _  SYSHELP  SYS1.HELP
             NEW,DEL    > _  SYSIN    ---------- Allocated to the terminal -------
    MVS001   SHR,KEEP   > _  SYSLBC   SYS1.BRODCAST
             NEW,DEL    > _  SYSPRINT ---------- Allocated to the terminal -------
    TSO005   SHR,KEEP   > _  SYSPROC  MYUSERID.PGMR.CLIST
    MVS002   SHR,KEEP   > _           SYS1.CLIST
    USR001   SHR,KEEP   > _           SYS1.USER.CLIST
             NEW,DEL    > _  SYSTERM  ---------- Allocated to the terminal -------
   -------------------------- End of Allocation List -----------------------------
            

Possible problem with TSO/ISPF session setup:



     Menu  Utilities  Compilers  Options  Status  Help 
   ------------------------------------------------------------------------------
                              ISPF Primary Option Menu
   Option ===> TSO EX PGMR_______________________________________________________
                                              More:      +
      0  ISPF PARMS                                         User ID   :  MYUSERID
      1  VIEW                                               Time      :  14:32  
      2  EDIT                                               Terminal  :  3278   
      3  IBM UTILITIES                                      Screen    :  1      
      4  FOREGROUND                                         Language  :  ENGLISH
      5  BATCH                                              Appl ID   :  ISP    
      6  COMMAND                                            TSO logon :  $ISPF  
      7  DIALOG TEST                                        TSO prefix:
      8  LM UTILITIES
      9  IBM PRODUCTS 
  +----------------------------------------------+
  | Licensed Materials - Property of IBM         |
  | 5647-A01 (C) Copyright IBM Corp. 1980, 1997. |
  | All rights reserved.                         |
  | US Government Users Restricted Rights -      | 
   DATA SET PGMR.CLIST NOT IN CATALOG OR CATALOG CAN NOT BE ACCESSED
   ***
            

Profile request shows that no prefix is specified for data set names:



     Menu  Utilities  Compilers  Options  Status  Help 
   ------------------------------------------------------------------------------
                              ISPF Primary Option Menu
   Option ===> TSO PROFILE_______________________________________________________
                                              More:      +
      0  ISPF PARMS                                         User ID   :  MYUSERID
      1  VIEW                                               Time      :  14:32  
      2  EDIT                                               Terminal  :  3278   
      3  IBM UTILITIES                                      Screen    :  1      
      4  FOREGROUND                                         Language  :  ENGLISH
      5  BATCH                                              Appl ID   :  ISP    
      6  COMMAND                                            TSO logon :  $ISPF  
      7  DIALOG TEST                                        TSO prefix:
      8  LM UTILITIES
      9  IBM PRODUCTS
      W  WORKPLACE
      C  CHANGES
      T  TUTORIAL
      X  EXIT
      S  SDSF         
    CHAR(0)  LINE(0)    PROMPT   INTERCOM   NOPAUSE NOMSGID NOMODE  NOWTPMSG NORECO
   VER NOPREFIX        PLANGUAGE(ENU) SLANGUAGE(ENU)
    DEFAULT LINE/CHARACTER DELETE CHARACTERS IN EFFECT FOR THIS TERMINAL
   ***
            

Problem can be fixed by setting (just once) prefix value (normally equal to user ID):



     Menu  Utilities  Compilers  Options  Status  Help 
   ------------------------------------------------------------------------------
                              ISPF Primary Option Menu
   Option ===> TSO PROFILE PREFIX(MYUSERID)_______________________________________
                                              More:      +
      0  ISPF PARMS                                         User ID   :  MYUSERID
      1  VIEW                                               Time      :  14:32  
      2  EDIT                                               Terminal  :  3278   
      3  IBM UTILITIES                                      Screen    :  1      
      4  FOREGROUND                                         Language  :  ENGLISH
      5  BATCH                                              Appl ID   :  ISP    
      6  COMMAND                                            TSO logon :  $ISPF  
      7  DIALOG TEST                                        TSO prefix:
      8  LM UTILITIES
      9  IBM PRODUCTS
      W  WORKPLACE
      C  CHANGES
      T  TUTORIAL
      X  EXIT
      S  SDSF
      J  JOBSCAN
      D  DB2I

         Enter X to Terminate using log/list defaults
            

Profile request shows that prefix for data set names is set up; it also could be seen as "TSO prefix" field value:



     Menu  Utilities  Compilers  Options  Status  Help 
   ------------------------------------------------------------------------------
                              ISPF Primary Option Menu
   Option ===> TSO PROFILE_______________________________________________________
                                              More:      +
      0  ISPF PARMS                                         User ID   :  MYUSERID
      1  VIEW                                               Time      :  14:32  
      2  EDIT                                               Terminal  :  3278   
      3  IBM UTILITIES                                      Screen    :  1      
      4  FOREGROUND                                         Language  :  ENGLISH
      5  BATCH                                              Appl ID   :  ISP    
      6  COMMAND                                            TSO logon :  $ISPF  
      7  DIALOG TEST                                        TSO prefix:  MYUSERID
      8  LM UTILITIES
      9  IBM PRODUCTS
      W  WORKPLACE
      C  CHANGES
      T  TUTORIAL
      X  EXIT
      S  SDSF         
    CHAR(0)  LINE(0)    PROMPT   INTERCOM   NOPAUSE NOMSGID NOMODE  NOWTPMSG NORECO
   VER PREFIX(MYUSERID) PLANGUAGE(ENU) SLANGUAGE(ENU)
    DEFAULT LINE/CHARACTER DELETE CHARACTERS IN EFFECT FOR THIS TERMINAL
   ***
            

It is possible to enter  EX PGMR  command in the "Command" field of the TSO/E LOGON screen as it is shown on the screen below.  Unfortunately it is useful only if this command will be executed before the ISPF session.  If it will be executed after it, it is useless.  Since TSO/ISPF user has no control over Command execution time, adding  TSO EX PGMR  command to your 3270 emulator logon macro is generally a better way, which doesn't depend on the TSO logon procedure setup and can be used consistently on any client site.



   ------------------------------- TSO/E LOGON -----------------------------------


      Enter LOGON parameters below:                    RACF LOGON parameters:

      Userid    ===> MYUSERID

      Password  ===>                                  New Password ===>

      Procedure ===> $ISPF                            Group Ident  ===>

      Acct Nmbr ===> HOST

      Size      ===> 100000

      Perform   ===>

      Command   ===> EX PGMR

      Enter an 'S' before each option desired below:
              -Nomail         -Nonotice      S -Reconnect        -OIDcard

   PF1/PF13 ==> Help    PF3/PF15 ==> Logoff    PA1 ==> Attention    PA2 ==> Reshow
   You may request specific help information by entering a '?' in any entry field
            


View [and save] TEMPNAME.CLS text
(Use [Back] button or [Alt]+[CL] to return here from the viewed text)
Copyright © 19932001 by
Go to:  Davar site entry | Site contents | Site index | Mainframe | CLIST | Text top