Normally, when you enter the DFSMSrmm ISPF dialog, the first panel
you see is the Primary Option Menu. You can change this initial entry
point so tape librarians always see the Librarian Menu when they enter
DFSMSrmm or general users see the DFSMSrmm User Menu.
To change the initial entry point, use the RMMISPF exec with one
of its optional parameters which changes the panel navigation to go directly to a lower
level. Figure 1 shows the operands you can use with
the RMMISPF exec.
Figure 1. RMMISPF exec syntax diagram
>>---RMMISPF----+-----------+--+-------------------+-----------><
+-ADMIN-----+ '---TRACE(option)---'
+-COMMAND---+
+-CONTROL---+
+-DATASET---+
+-LIBRARIAN-+
+-LOCAL-----+
+-OWNER-----+
+-PRODUCT---+
+-RACK------+
+-REPORT----+
+-SUPPORT---+
+-USER------+
+-VOLUME----+
'-VRS-------'
Each of the operands, except for TRACE, represents a specific user
or function menu from which you can request functions. Use the TRACE(option)
operand to diagnose problems in any of the REXX execs supplied in
the dialog. For more information about using TRACE, see z/OS DFSMSrmm Diagnosis Guide.
To start the librarian at the Librarian Menu, add this line to
the ISPF selection panel as shown in
Figure 2.
% R +DFSMSrmm - Librarian dialog
Although the example shows the ISRUTIL panel, you can use any
other selection panel to make the changes.
Figure 2. Adding DFSMSrmm Librarian Option
to ISPF%------------------------- UTILITY SELECTION MENU ---------------------
%OPTION ===>_ZCMD
%
% 1 +LIBRARY - Compress or print data set. Print index listing.
+ Print, rename, delete, or browse members
% 2 +DATASET - Allocate, rename, delete, catalog, uncatalog, or
+ display information of an entire data set
% 3 +MOVE/COPY - Move, copy, or promote members or data sets
% 4 +DSLIST - Print or display (to process) list of data set names
+ Print or display VTOC information
% 5 +RESET - Reset statistics for members of ISPF library
% 6 +HARDCOPY - Initiate hardcopy output
% 8 +OUTLIST - Display, delete, or print held job output
% 9 +COMMANDS - Create/change an application command table
% 10 +CONVERT - Convert old format menus/messages to new format
% 11 +FORMAT - Format definition for formatted data Edit/Browse
% 12 +SUPERC - Compare data sets (Standard dialog)
% 13 +SUPERCE - Compare data sets (Extended dialog)
% 14 +SEARCH-FOR - Search data sets for strings of data
% R +DFSMSrmm - Librarian dialog
)INIT
.HELP = ISR30000
)PROC
&ZSEL = TRANS( TRUNC (&ZCMD,'.')
1,'PGM(ISRUDA) PARM(ISRUDA1)'
2,'PGM(ISRUDA) PARM(ISRUDA2)'
3,'PGM(ISRUMC)'
4,'PGM(ISRUDL) PARM(ISRUDLP)'
5,'PGM(ISRURS)'
6,'PGM(ISRUHC)'
8,'PGM(ISRUOLP)'
9,'PANEL(ISPUCMA)'
10,'PGM(ISRQCM) PARM(ISRQCMP)'
11,'PGM(ISRFMT)'
12,'PGM(ISRSSM)'
13,'PGM(ISRSEPRM) NOCHECK'
14,'PGM(ISRSFM)'
R,'CMD(%RMMISPF LIBRARIAN) NEWAPPL(EDG)'
' ',' '
*,'?' )
&ZTRAIL = .TRAIL
)END