Vous avez lancé un job et vous voulez le suivre pour savoir lorsqu'il se termine. La solution est de lire le message CPC1221 qui est envoyé par la commande sbmjob. 

PGM                                                           
DCL &DTA   *CHAR 26                                           
DCL &MSGID *CHAR 7                                            
SBMJOB CMD( ) JOB(MONJOB)                               
             RCVMSG     MSGTYPE(*COMP) RMV(*NO)             + 
                          MSGDTA(&DTA) MSGID(&MSGID)          
             IF         COND(&MSGID = 'CPC1221') THEN(DO)      
        %SST(&DTA 1 10)   /* Nom du job */
        %SST(&DTA 11 10) /* Nom utilisateur */
        %SST(&DTA 21 6)   /* numero           */
ENDDO                                             
                           
ENDPGM