Starting QMF from an ISPF menu on CMS

In the definition shown below, Option 2 was added for reaching QMF through an exec.

Figure 46. ISPF on CMS sample Master Application menu

)BODY
%---------------------- MASTER APPLICATION MENU -----------------
%SELECT APPLICATION ===>_OPT   +
%                                               +USERID    -
%                                               +TIME      -
% 1 +SPF   -SPF PROGRAM DEVELOPMENT FACILITY    +TERMINAL  -
% 2 +QMF   -QMF --English                       +FUNCTION KEY -
% 3 +QMFU  -QMF --Uppercase
% 4 +QMFK  -QMF --Japanese
% P +PARMS - SPECIFY TERMINAL PARAMETERS AND LIST/LOG DEFAULTS
% X +EXIT  - TERMINATE USING LIST/LOG DEFAULTS
%       
+PRESS%END KEY+TO TERMINATE+
%                                          
)INIT
)PROC

 &SEL=TRANS( TRUNC(&OPT,'.')
             1,'PANEL(ISP@PRIM)NEWAPPL'
             2,'PGM(DSQQMFE) NEWAPPL(DSQE) PARM(DSQIROW=150)'
             3,'PGM(DSQQMFU) NEWAPPL(DSQU) PARM(DSQIROW=150)'
             4,'PGM(DSQQMFK) NEWAPPL(DSQK) PARM(DSQIROW=150)'
           /*                             */
           /* ADD OTHER APPLICATIONS HERE */
           /*                             */
              P,'PANEL(ISPOPT)'
              X,'EXIT'
            ' ',' '
              *,'?' )
)END

If you are using an NLF: You can change the definition of the Master Application menu to allow users to pick the language environment for their QMF sessions. Figure 46 is an example in which users have a choice of beginning a QMF session in English (option 2), Uppercase (option 3), or Japanese (option 4). The TRANS function in the )PROC section of the panel definition transforms options 2, 3, and 4 into the operand portions of an ISPF command that is executed like ISPSTART. The command invokes the appropriate QMF module (DSQQMFE, DSQQMFU, or DSQQMFK), and passes it the value 160 for the DSQSIROW parameter.

Tip: The direct menu approach can start QMF as much as four times faster than the exec approach. If you allocate all user resources through CMS logon procedures, then the exec that you create for the menu option has no resources to allocate. The single function, starting QMF, can be run without an exec.