// JOB JA39016 PLF 3.9.16 APAR JA39016
* PLF 3.9.16, Issued by PRP on February 13, 2003
* Revised July 30, 2004
* Status=TESTED Type=REQUIRED
* -------------------------------------------------------------------
* Problem: Update PLF to recognize z/VSE 3.1
* Update PLF to recognize and function with z/VSE 3.1.
* -------------------------------------------------------------------
* Conditions for applying APAR:
* This APAR SUPERSEDES APARs JA39013 and JA39015 which are now
* REVOKED. If APARs JA39013 and/or JA39015 are applied to your
* system, you must UNDO them before you can apply this APAR.
*
* This APAR may be applied at any time, however its effect will
* not be experienced until the next time the system is IPL'ed.
// 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
UNDO    1975-39-PLF:JA39013 /* 1975-PLF-01-039:JA39013 FOR VSE/SP */
UNDO    1975-39-PLF:JA39015 /* 1975-PLF-01-039:JA39015 FOR VSE/SP */
CORRECT 1975-39-PLF:JA39016 /* 1975-PLF-01-039:JA39016 FOR VSE/SP */
AFFECTS PHASE=SPIPLF$A
ALTER 3C 10:FF
AFFECTS PHASE=SPIPLFAC                 /*                           */
ALTER   32 58202050     : 4580C250     /*FIX1 BAL    RE,PAT1        */
                                       /*                           */
ALTER  250 C250         : 1812         /*PAT1 LR     R1,R2          */
ALTER  252 C252C254     : 58201050     /*     L      R2,80(,R1)     */
ALTER  256 C256C258     : 91020241     /*     TM     SUPVFLAG,XAACTI*/
ALTER  25A C25A         : 0788         /*     BZR    R8             */
ALTER  25C C25CC25EC260 : D50102E4C26A /*     CLC    SUPIDREL,R65   */
ALTER  262 C262         : 0748         /*     BLR    R8             */
ALTER  264 C264C266     : 58201108     /*     L      R2,264(,R1)    */
ALTER  268 C268         : 07F8         /*     BR     R8             */
ALTER  26A C26A         : F6F5         /*R65  DC     C'65'          */
                                       /*                           /*
AFFECTS PHASE=SPIPLFRT                 /* FIX AT ACTIV591+X'0C'     */
ALTER 6AD0 4780A170 : 47B0A170         /*     BNL   ACTIV601        */
                                       /* FIX AT ACTIV600-X'04'     */
ALTER 6B08 4780A1D2 : 47B0A2A8         /*     BNL   PAT1            */
                                       /* FIX AT ACTIV608+X'0A'     */
ALTER 6B70 4770A1D2 : 4740A1D2         /*     BL    ACTIV610        */
                                       /* FIX FOR ACTIV600-X'04'    */
ALTER 6C54 A2A8A2AA : 58B0CDA8         /*PAT1 L     R11,A(PGO100)   */
ALTER 6C58 A2ACA2AE : 920CB77C         /*     MVI   PIFK210+14X,0C  */
ALTER 6C5C A2B0A2B2 : 58B0C390         /*     L     R11,A(AIF100)   */
ALTER 6C60 A2B4A2B6 : 920CB446         /*     MVI   AIF434B+0EX,0C  */
ALTER 6C64 A2B8A2BA : 920CB55E         /*     MVI   AIF520+12X,0C   */
ALTER 6C68 A2BCA2BE : 47F0A1D2         /*     B     ACTIV610        */
/*
/&