User Exits › EXIT Routine Programming Considerations › GCMCMDXT Exit › Issuing Messages from the GCMCMDXT Exit

Issuing Messages from the GCMCMDXT Exit

If you need to send a message from the GCMCMDXT routine to the console or TSO user that issued a command, then use the message subroutine provided. The following illustration shows you mandatory code for the message subroutine:

GCMCMDXT SAVE  (14,12)   
 
*
         LR    R12,R15            R12 -> Base reg          
         USING GCMCMDXT,R12                                
*                                                          
         LA    R2,SAVEAREA        R2 -> Our Save Area      
         ST    R13,4(,R2)         Save -> H.S.A.           
         ST    R2,8(,R13)         Save -> O.S.A. in H.S.A  
         LR    R13,R2             R13 -> Our Save Area     
*                                                          
         LR    R2,R1              R2 -> Common exit parm list
         USING UXPARM,R2                                   

         ...

         LA    R1,LFORMWTO                                   
         SLR   R0,R0               Clears register           
         L     R0,CMDXSID          Loads command issuer     
         L     R15,CMDXMSG@        Points to the message     
         BASR  R14,R15             Calls the message subroutine

         ...

SAVEAREA DS    72F                Big Save Area so we can call
                                  ..the message routine     
                                  ..pointed to by CMDXMSG@. 
*                                                           
LFORMWTO WTO   'Any User Defined Text',        
               MCSFLAG=(RESP),CONSID=,MF=L

CA MIC includes these messages in the MIMTRACE data set if the TRACE feature is active.