I'm trying to test something that requires running with a (user) key other than
8. In my program:
XR R2,R2
IPK ,
DC X'00'
I have a PARMLIB member, SCHED01:
PPT PGMNAME(TESTKEYX)
KEY(E)
PRIV
I've done a SET SCH=01
TESTKEYX is in an APF-authorized library, is linkedited with SETCODE AC(1),
and run thus:
//TESTKEYX EXEC PGM=TESTKEYX
//STEPLIB DD DISP=SHR,DSN=PHS.PDS.LOAD
//ZPIDZ51N DD DUMMY
I've tried running it as a program or from a PROCLIB. In all cases:
GR 0: 00000000 1: 19E02FD0
2: 00000080 3: 00000000
So what am I missing? I think I'd expect R2 to be 000000E0, right? (Or am I
confused there?) Maybe I have the wrong options on the PPT entry?
Thanks in advance,
...phsiii
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
