User Exits › Exit Routine Programming Considerations › MIMCMDXT Exit › Issuing Messages From MIMCMDXT

Issuing Messages From MIMCMDXT

If you need to send a message from the MIMCMDXT routine to the console or TSO user who issued a command, then use the message subroutine provided at offset +C of the exit-specific parameter list. This message is recorded in the MIMTRACE data set if the TRACE feature is active. The next example shows mandatory code for the message subroutine:

CMDEXIT  SAVE   (14,12)
                 LR      R12,R15
                 USING   CMDEXIT,R12
                 LR      R5,R1             *Saves input parameters
                 ST      R13,BIGSAVE+4     *Preserves the save area pointer
                 LA      R13,BIGSAVE       *Points to the large save area
                 LA      R1,LFORMWTO       *Points at the list-form of the WTO message
                 L       R15,12(R5)        *Points to the message subroutine
                 BALR    R14,R15           *Calls the message subroutine
BIGSAVE          DS      72F               *Save area and workspace
LFORMWTO         WTO     'message text',MF=L,MCSFLAG=(RESP,REG0)