Installing the Dialog from ISPF

There are two methods of installing the dialog from ISPF: use the TSO/E ICF or invoke it from an ISPF selection panel.

Enter TSO ICQASRM0 from any ISPF command line, or
Invoke the dialog from an ISPF selection panel.

ISPF 2.3 or later is required to provide support for the dialog. Following are a sample ISPF selection panel definition and an actual panel that was used to invoke the dialog from ISPF.

Figure 1. Sample ISPF Panel Definition for APPC/MVS Selections

)ATTR DEFAULT(%_)
     # type(text) intens(high) color(red)
     $ type(text) intens(high) color(yellow)
     ¢ type(text) intens(low) color(green)
     ? type(text) intens(non) color(pink)
     \ type(text) intens(non) color(blue)
   )BODY
   %--------¬Software House, Inc.  APPC/MVS Development Options----
   %OPTION  ===>_ZCMD

   #APPC     - #APPC/MVS Administration Dialog     #D    - $SDSF
   #APPCAST  - #APPC Assist Dialog                 #IPCS - #I.P.C.S.
   #APPCTELL - #APPCTELL TP
   $
   )INIT
     .HELP=WSCHMODS
   )PROC
     &ZSEL=TRANS( TRUNC (&ZCMD,'.')
                                       /*APPC/MVS Options Follow ****/
                APPC,'CMD(%ICQASRM0)'                /* APPC/MVS    */
                APPCAST,'Panel(APPCAST)'             /* APPCAST   */
                APPCTELL,'CMD(%APPCTELL)'            /* APPCTELL  */
                D,'PANEL(ZSDSFOP2) NEWAPPL(ISF)'     /* S.D.S.F.  */
                IPCS,'PGM(BLSG) PARM(PANEL(BLSPRIM) NEWAPPL(BLSG)'
                X,'EXIT'
                *,'?'
     IF (&ZCMD = 'D')
        &ZSEL = 'PGM(ISFISP) NOCHECK NEWAPPL(ISF)'
     &ZTRAIL = .TRAIL
     IF (&ZCMS = ' ')
        IF (.RESP = ENTER)
           &ZPARENT = ISR@PRIM
   )END

Figure 2. Sample ISPF Selection Panel with APPC/MVS Options

--------------Software House, Inc. APPC/MVS Development Options----------
  OPTION ===>

  APPC     - APPC/MVS Administration Dialog           D    -  SDSF
  APPCAST  - APPC Assist Dialog                       IPCS - I.P.C.S.
  APPCTELL - APPCTELL TP