Additional Administration Tasks › Send a Message to Current Users › Sample JCL to Send Message to Users

Sample JCL to Send Message to Users

The following sample JCL shows how to send a message to all users logged in to CA CSM, and to a single CA CSM user with a TSO user ID of DOEJON01:

Proclib member INFORMSM below:

//***************************************************************************        
//*****                                                                 *****        
//*****  Send Message to CA CSM users                                  *****        
//*****                                                                 *****        
//*****  SERVER= is the number of the server to receive message.        *****        
//*****  MSMMSG= is the message you want sent to the server user(s)     *****        
//*****                                                                 *****        
//*****  EXAMPLE JCL shown below how to send message to ALL users       *****        
//*****                                                                 *****        
//*****  /*JOBPARM SYSAFF=MACHINE31                                     *****        
//*****  //          EXEC INFORMSM,SERVER=2,                            *****        
//*****  // MSMMSG='CA CSM - IS SHUTTING DOWN - RESTART REQUESTED'     *****        
//*****                                                                 *****        
//*****  EXAMPLE JCL shown below how to send message to a CA CSM User  *****        
//*****                                                                 *****        
//*****  /*JOBPARM SYSAFF=MACHINE31                                     *****        
//*****  //          EXEC INFORMSM,SERVER=2,                            *****        
//*****  // MSMMSG='DOEJON01,TEST MESSAGE FROM JCL'                     *****        
//*****                                                                 *****        
//***************************************************************************        
//*                                                                            
//INFORMSM  PROC  MSMMSG=,                                                     
//             SERVER=                                                         
//*                                                                            
//OPSCMD   EXEC PGM=OPSCMD,PARM='F MF2T&SERVER.SRV,APPL=MSG,&MSMMSG.'          
//*                                                                            
//OPS$OPSP DD DUMMY         Direct request to production subsystem OPSP        
//*                                                                            
//INFORMSM  PEND                                                               
//*                                                                            


JCL to send message Below:

//INFORM5S  JOB (129300000),'Inform CA CSM user',                             
//        COND=(4,LT),                                                     
//        CLASS=A,                                                         
//        MSGCLASS=X,                                                      
//        NOTIFY=&SYSUID,                                                  
//        MSGLEVEL=(1,1)                                                   
//*                                                                        
/*JOBPARM SYSAFF=MACHINE31                                                 
//*                                                                        
// JCLLIB ORDER=(MF20.MSM.PROCLIB)                                         
//*                                                                        
//*********************************************************************    
//*****                                                           *****    
//*****  send message to CA CSM server user(s)                   *****    
//*****                                                           *****    
//*********************************************************************    
//*                                                                        
//          EXEC INFORMSM,SERVER=5,                                        
// MSMMSG='CA CSM - Server is closing down in fifteen minutes       '     
//          EXEC INFORMSM,SERVER=5,                                        
// MSMMSG='CA CSM - Server will be restarted soon after             '     
//                                                                         
//*                                                                        
// MSMMSG='DOEJON01, send a message to a user on a CA CSM server    '     
//*