// JOB RA38074 SPRI 3.8.74 APAR RA38074
* SPRI 3.8.74, Issued by GSS on March 03, 2006
* Revised March 22, 2006
* Status=TESTED Type=REQUIRED
* -------------------------------------------------------------------
* Problem: Coorect SPRISUB locate processing
* Change SPRISUB to correctly validate Repositoning scan block
* and text. SPRI is incorrectly assumes the control block and
* text reside in the SPRI partition.
*
* This error can lead to CICS abends when using QView.
* -------------------------------------------------------------------
* Conditions for applying APAR:
* The phases affected by this APAR normally are loaded resident
* in the processing region during activation. This allows the
* APAR to be applied at any time, however its effect will not be
* experienced until the product is reactivated.
// 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:RA38074 /* 1975-SPR-01-038:RA38074 for VSE/SP */
AFFECTS PHASE=SPRISS$A
ALTER 76 4A:FF
AFFECT PHASE=SPRISBEX
ALTER  918  4A201008  :  47F03CD0
ALTER  CD0  3CD03CD2  :  9110B1A6  /* SCAN IN USER PART? */
ALTER  CD4  3CD43CD6  :  47803CE4  /* NO */
ALTER  CD8  3CD83CDA  :  45E05068  /* GO ARMOD */
ALTER  CDC  3CDC3CDE  :  B24D0017
ALTER  CE0  3CE03CE2  :  B24D0070
ALTER  CE4  3CE43CE6  :  4A201008   /* + TEXT LENGTH */
ALTER  CE8  3CE83CEA  :  9110B1A6  /* SCAN IN USER PART? */
ALTER  CEC  3CEC3CEE  :  4780391C  /* NO  RETURN */
ALTER  CF0  3CF03CF2  :  45E0506C  /* GOPRIME      */
ALTER  CF4  3CF43CF6  :  47F0391C  /* RETURN */
/*
/&