Installing Online Interfaces › How to Configure the Online Interfaces Without CA CSM › Optional Initialization Parameter Statements › (Optional) Step 1: Add STEPLIB Statements › Example 2

Example 2

This example shows you how to add selection code 3.R as a sub-option to the utilities menu ISPUTIL for ISPF.

The offset lines are the inserted lines.

%-----------------------  UTILITY SELECTION MENU  --------- -----------
%OPTION  ===>_OPT         +                                            
%                                                                    + 
%   1 +LIBRARY     - LIBRARY UTILITY:
+                    PRINT INDEX LISTING OR ENTIRE DATASET
+                    PRINT, RENAME, DELETE, OR BROWSE MEMBERS
+                    COMPRESS DATASET
%   2 +DATASET     - DATASET UTILITY:
+                    DISPLAY DATASET INFORMATION
+                    ALLOCATE, RENAME, OR DELETE ENTIRE DATASET
+                    CATALOG OR UNCATALOG DATASET
%   3 +MOVE/COPY   - MOVE OR COPY MEMBERS OR DATASETS
%   4 +CATALOG     - CATALOG MANAGEMENT:
+                    DISPLAY OR PRINT CATALOG ENTRIES
+                    INITIALIZE OR DELETE USER CATALOG ALIAS
%   5 +RESET       - RESET STATISTICS FOR MEMBERS OF ISPF LIBRARY
%   6 +HARDCOPY    - INITIATE HARDCOPY OUTPUT
%   7 +VTOC        - DISPLAY OR PRINT VTOC ENTRIES FOR A DASD VOLUME
%   8 +OUTLIST     - DISPLAY, DELETE, OR PRINT HELD JOB OUTPUT
%   9 +SCRIPT/VS   - FORMAT,DISPLAY, AND OPTIONALLY PRINT SCRIPT TEXT
%   R +RMOSPF      - DELIVER ADMINISTRATION                                      

)INIT                                                                     
  .HELP = TU                                                              
)PROC                                                                     
  &SEL = TRANS( TRUNC (&OPT,'.')                                          
                1,'PGM(ISPUDA) PARM(UDA1)'                                
                2,'PGM(ISPUDA) PARM(UDA1)'                                
                3,'PGM(ISPUMC)'                                           
                4,'PGM(ISPUCA)'                                           
                5,'PGM(ISPURS)'                                           
                6,'PGM(ISPUHC)'                                           
                7,'PGM(ISPUVT)'                                           
                8,'PGM(ISPUOL) PARM(UOL01)'                               
                9,'PGM(ISPUSC) PARM(SCRPTA)'                              
             R,'PGM(RMOSPF) PARM(RMO.SYSTEM1) NEWAPPL(RMO)'                         
               ' ',' '                                                    
                 *,'?' )                                                  
 )END