++USERMOD(UMJES01) REWORK(2002247)                                              
 /*                                                                             
  MODIFY JES2-SOURCE TO ALLOW CONCURRENT TSO LOGONS ON DIFFERENT                
  MVS-IMAGES IN A MAS.                                                          
  SOURCE UPDATE ORIGINALLY DOCUMENTED IN RTA000089663                           
 */ .                                                                           
++VER(Z038) FMID(HJE7705).                                                      
++SRCUPD (HASPCNVT) .                                                           
./ CHANGE NAME=HASPCNVT                                                         
*        JZ    XTDUPEND     ** DUP CHECK COMMENTED OUT BY UMJES01 **    05991100
         J     XTDUPEND  ** ALLOW DUP TSO LOGON - MODIFIED BY UMJES01   05991101
./ ENDUP