// JOB RA38042 SPRI 3.8.42 APAR RA38042                                         
* SPRI 3.8.42, Issued by GSS on July 29, 2004                                   
* Revised August 19, 2004                                                       
* Status=TESTED Type=REVOKED                                                    
* -------------------------------------------------------------------           
* Problem: Change SPRIJCLE to keep POWER JOB accounting and comment             
* Change SPRIJCLE to keep POWER Job accounting field and any                    
* comments. Any SPRI operands will be cleared.                                  
* -------------------------------------------------------------------           
* Conditions for applying APAR:                                                 
* The phases affected by this APAR reside in the SVA. This                      
* allows the APAR to be applied at any time, however its effect                 
* will not be experienced until the next IPL is performed. Do                   
* not attempt reactivation without re-loading the phases                        
* affected into the SVA.                                                        
// PAUSE *** Enter CANCEL to bypass APAR.  Press ENTER to apply.                
// LIBDEF CL,TO=IJSYSRS,FROM=IJSYSRS (target lib) MVT/VSE systems only.         
// DEFINE GETVIS=200K                             MVT/VSE systems only.         
// EXEC MSHP,SIZE=900K                                                          
CORRECT 1975-38-SPR:RA38042 /* 1975-SPR-01-038:RA38042 for VSE/SP */            
AFFECTS PHASE=SPRISS$A                                                          
ALTER 56 2A:FF                                                                  
AFFECTS PHASE=SPRIJCLE                                                          
ALTER 1384  D210F001F000  :  47F0C3E00700                                       
ALTER 3E0  C3E0C3E2  :  9035C416    /* STM 3,5,  */                             
ALTER 3E4  C3E4C3E6  :  50F0C422    /* ST 15,XXX */                             
ALTER 3E8  C3E8C3EA  :  4570BC00    /* BAL R7,SCANR2 */                         
ALTER 3EC  C3ECC3EE  :  9540D136    /* BLANK? */                                
ALTER 3F0  C3F0C3F2  :  4780C406    /* YES - DONE */                            
ALTER 3F4  C3F4C3F6C3F8  :  D200F001F000  /* CLEAR THIS OPERAND */              
ALTER 3FA  C3FAC3FC  :  4450C3F4      /* CLEAR FIELD */                         
ALTER 3FE  C3FEC400  :  41F5F001                                                
ALTER 402  C402C404  :  47F0C3E8      /* NEXT FIELD */                          
ALTER 406  C406C408  :  9835C416      /* LM  3,5,XXX */                         
ALTER 40A  C40AC40C  :  58F0C422      /* L 15,XXX */                            
ALTER 40E  C40EC410  :  9034D074      /* STM 3,4,TMPAR1 */                      
ALTER 412  C412C414  :  47F0B384      /* RETURN */                              
ALTER 416  C416C418  :  00000000      /* R3 SAVE */                             
ALTER 41A  C41AC41C  :  00000000      /* R4 SAVE */                             
ALTER 41E  C41EC420  :  00000000      /* R5 SAVE */                             
ALTER 422  C422C424  :  00000000      /* R15 SAVE */                            
/*                                                                              
/&