Adding DFSMSrmm to an ISPF selection panel

You can add a selection to an ISPF selection panel so that users can choose DFSMSrmm. To add the selection:

Add a selection for DFSMSrmm to the body of the chosen ISPF selection panel. For example, add:
```
R  DFSMSrmm    Invoke DFSMSrmm
```
Add one of these statements to the ZSEL processing list in the )PROC section of the chosen ISPF panel:
- If you are not using LIBDEF:
```
R,'CMD(%RMMISPF) NEWAPPL(EDG)'
```
- If you are using LIBDEF:
```
R,'CMD(%EDGRMLIB)'
```

Figure 1 shows the ISPF Utility Selection Menu with step 1 and 2 changes made. LIBDEF was not used:

Figure 1. Adding DFSMSrmm 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   - Invoke DFSMSrmm
)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) NEWAPPL(EDG)'
              ' ',' '
                *,'?' )
  &ZTRAIL = .TRAIL
)END