// JOB XA43020 SPI 4.3.20 APAR XA43020
* SPI 4.3.20, Issued by PRP on November 13, 2000
* Revised July 30, 2004
* Status=TESTED Type=REQUIRED
* -------------------------------------------------------------------
* Problem: Support the SPI Common Interface on z/VSE 3.1
* This APAR updates SPIIFACT so that it recognizes z/VSE 3.1 and adjusts the
* location that the SPI Common Interface uses for the A(SPIIFSVA).
* -------------------------------------------------------------------
* Conditions for applying APAR:
* This APAR SUPERSEDES XA43013 which is now REVOKED. If APAR
* XA43013 is applied to your system you must UNDO it 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-43-SPI:XA43013 /* 1975-SPI-01-043:XA43013 FOR VSE/SP */
CORRECT 1975-43-SPI:XA43020 /* 1975-SPI-01-043:XA43020 FOR VSE/SP */
AFFECTS PHASE=SPISPI$A
ALTER 40 14:FF
AFFECTS PHASE=SPIIFACT                 /*                           */
ALTER  8FE 41201050     : 45E09718     /*FIX1 BAL    RE,PAT1        */
                                       /*                           */
ALTER 1780 9718971A     : 41201050     /*PAT1 LA     R2,80(,R1)     */
ALTER 1784 971C971E     : 91020241     /*     TM     SUPVFLAG,XAACTI*/
ALTER 1788 9720         : 078E         /*     BZR    RE             */
ALTER 178A 972297249726 : D50102E49730 /*     CLC    SUPIDREL,R65   */
ALTER 1790 9728         : 074E         /*     BLR    RE             */
ALTER 1792 972A972C     : 41201108     /*     LA     R2,264(,R1)    */
ALTER 1796 972E         : 07FE         /*     BR     RE             */
ALTER 1798 9730         : F6F5         /*R65  DC     C'65'          */
                                       /*                           */
/*
/&