I believe your problem is that the decimal KEY has to be specified in SCHEDxx:
KEY(14) instead of KEY(E) should do it. Leo -----Original Message----- From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf Of Phil Smith Sent: Friday, March 13, 2015 2:12 PM To: [email protected] Subject: Missing something obvious... 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 ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
