Example initialization exit

Figure 1 shows an example initialization exit. The exit indicates to Session Manager that line mode output should be logged while in a full-screen program.
Figure 1. Initialization exit to log line mode output while in full-screen programs
*********************************************************************
*                                                                   *
* MODULE NAME = ADFEXIT1                                            *
*                                                                   *
* DESCRIPTIVE NAME = INSTALLATION MANAGEMENT INITIALIZATION EXIT    *
*                                                                   *
* FUNCTION = EXAMPLE EXIT OF HOW TO INDICATE TO SESSION MANAGER     *
*            TO LOG LINE MODE OUTPUT WHILE IN FULL-SCREEN PROGRAMS  *
*                                                                   *
* INPUT =                                                           *
*      REG 1 - POINTER TO A LIST OF ADDRESSES OF THE FOLLOWING      *
*              PARAMETERS:                                          *
*                1) USERID                                          *
*                2) INSTALLATION DATA                               *
*                3) STREAM AND OUTPUT AND LOGGING INDICATOR BIT:    *
*                     BIT 0 - MONITOR TSO/E INPUT STREAM            *
*                     BIT 1 - MONITOR TSO/E OUTPUT STREAM           *
*                     BIT 2 - MONITOR SESSION MANAGER INPUT STREAM  *
*                     BIT 3 - MONITOR SESSION MANAGER OUTPUT STREAM *
*                     BIT 4 - MONITOR MSG OUTPUT STREAM             *
*                     BIT 5 - TURN ON LOGGING OF LINE MODE OUTPUT   *
*                             WHILE IN FULL-SCREEN PROGRAMS         *
*      REG 14 - RETURN ADDRESS TO SESSION MANAGER MAINLINE          *
*      REG 15 - ENTRY POINT ADDRESS                                 *
*                                                                   *
* PROCESSING =                                                      *
*      1) RETRIEVE ADDRESS OF THIRD PARAMETER                       *
*      2) TURN ON BIT 5 TO INDICATE TO TURN ON LOGGING OF OUTPUT    *
*      3) RETURN TO SESSION MANAGER MAINLINE                        *
*                                                                   *
*********************************************************************
ADFEXIT1  CSECT                   INSTALLATION INITIALIZATION EXIT
          USING  *,15
          STM    14,12,12(13)
          L      1,8(1)           3RD PARM IS PTR TO INDICATOR BITS
          OI     0(1),B'00000100' BIT 5 INDICATES TO LOG ISPF OUTPUT
          LM     14,12,12(13)
          BR     14               RETURN TO SESSION MANAGER MAINLINE
          END