z/OS TSO/E REXX User's Guide
Previous topic | Next topic | Contents | Contact z/OS | Library | PDF


Checklist #4: Writing an Exec that Sets up Allocation to SYSPROC

z/OS TSO/E REXX User's Guide
SA32-0982-00

  1. Write an exec named SETUP that allocates data sets to SYSPROC.

    Create a data set member named SETUP in your exec PDS. In SETUP issue an ALLOCATE command that concatenates your PDS to the beginning of all the data sets already allocated to SYSPROC. Include the data sets allocated to SYSPROC from the list in the Preliminary Checklist. If there are no other data sets allocated to SYSPROC, specify your PDS only. Your SETUP exec could look like the following example.

    Sample SETUP Exec

    /****************************** REXX *******************************/
    /* This exec is an example of how to allocate a private PDS named  */
    /* USERID.REXX.EXEC to the beginning of a concatenation to SYSPROC */
    /* that consists of 3 other data sets named 'ICQ.INFOCNTR.ICQCLIB' */
    /* 'SYS1.TSO.CLIST', and 'ISP.ISPF.CLISTS'.  After the ALLOCATE    */
    /* command executes, a message indicates whether the command was   */
    /* successful or not.                                              */
    /*******************************************************************/
    
      "ALLOC FILE(SYSPROC) DATASET(rexx.exec,",
             "'icq.infocntr.icqclib',",
             "'sys1.tso.clist',",
             "'isp.ispf.clists') SHR REUSE"
    
      IF RC = 0 THEN
        SAY 'Allocation to SYSPROC completed.'
      ELSE
        SAY 'Allocation to SYSPROC failed.'
    Note: The order in which you list data sets in an ALLOCATE command is the order in which they are concatenated and searched. To give your execs priority in the search order, list your data set of execs before other data sets.

    Generally all the data sets in the list should have the same record format, (either RECFM=VB or RECFM=FB) and logical record length, LRECL. Also, the first data set in the list can determine the block size, BLKSIZE, for the data sets that follow. If the block size of the first data set is smaller than the block sizes of subsequent data sets, you might end in error. To avoid error, use the Preliminary Checklist and the other checklists provided, and follow directions carefully.

  2. Execute SETUP by entering the following EXEC command:
    READY
    EXEC rexx.exec(setup) exec
    If the allocation was successful, you should then see displayed on your screen:
      Allocation to SYSPROC completed.
    To have SETUP execute when you log on and automatically allocate your data set to SYSPROC, type the same EXEC command in the COMMAND field of your LOGON panel.
    ------------------------------- TSO/E LOGON ----------------------------------
    PF1/PF13 ==> Help  PF3/PF15 ==> Logoff  PA1 ==> Attention  PA2 ==> Reshow
    You may request specific HELP information by entering a '?' in
    any entry field.
    
       ENTER LOGON PARAMETERS BELOW:                  RACF LOGON PARAMETERS:
    
       USERID    ===> YOURID
    
       PASSWORD  ===>                                 NEW PASSWORD ===>
    
       PROCEDURE ===> MYPROC                          GROUP IDENT  ===>
    
       ACCT NMBR ===> 00123
    
       SIZE      ===> 5800
    
       PERFORM   ===>
    
       COMMAND   ===> EXEC rexx.exec(setup) exec
    
    
       ENTER AN 'S' BEFORE EACH OPTION DESIRED BELOW:
    
              -NOMAIL         -NONOTICE        -RECONNECT         -OIDCARD

Go to the previous page Go to the next page




Copyright IBM Corporation 1990, 2014