I am told that APAR OA20761 fixed the IEFACTRT sample exit (named
IEEACTRT), among other things.  This fix is in the GA version of z/OS 1.9
and does not need to be "installed". You could not order the GA z/OS 1.9
without that fix being part of it. However, if the displays shown are from
an IEFACTRT routine based on an incorrect IEEACTRT, then that IEFACTRT exit
routine will have to be fixed.

Code prior to OA20761 in IEEACTRT:
L     R01,PARMSTPC        LOAD STEP TCB CPU TIME ADDR
ICM   R01,K7,K0(R01)      LOAD STEP TCB CPU TIME
LA    R01,K0(,R01)        ZERO HIGH ORDER BYTE

Oops, the last statement zeroes only the high bit for AMODE 31.

If you look at the corrected IEEACTRT, it ends up clearing the reg before
doing the ICM. Alternately, it could have used (and you could use)
NILH  R01,X'00FF'
to clear the high byte. If the PARMSTPC field happend to point below 16M,
the error would not surface.

Peter Relson
z/OS Core Technology Design
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to