Seymour thanks for your suggestion I was trying to get IDF working on Friday had problems displaying source hopefully I can resolve it
Thanks for the idea > On Feb 25, 2023, at 9:50 PM, Ed Jaffe <edja...@phoenixsoftware.com> wrote: > > On 2/23/2023 6:46 PM, Joseph Reichman wrote: >> I am trying to change psw storage key from "Normal" key 8 to Key 4 >> >> SPKA X'40' >> >> I have bit 15 of the psw 0 ,meaning I am in supervisor state and get a s0c1 >> running this code under TESTAUTH >> >> I am able to get to PSW key 0 SPKA 0 >> >> Don't get it > > ISTR discovering empirically 30+ years ago that TSO/E TEST and TESTAUTH > support only two execution keys: X'80' and X'00'. > > I wondered if in-fact they actually support whatever key is in TCBPKF and > X'00' but never experimented to see if that was the case. > > -- > Phoenix Software International > Edward E. Jaffe > 831 Parkview Drive North > El Segundo, CA 90245 > https://www.phoenixsoftware.com/ > > > -------------------------------------------------------------------------------- > This e-mail message, including any attachments, appended messages and the > information contained therein, is for the sole use of the intended > recipient(s). If you are not an intended recipient or have otherwise > received this email message in error, any use, dissemination, distribution, > review, storage or copying of this e-mail message and the information > contained therein is strictly prohibited. If you are not an intended > recipient, please contact the sender by reply e-mail and destroy all copies > of this email message and do not otherwise utilize or retain this email > message or any or all of the information contained therein. Although this > email message and any attachments or appended messages are believed to be > free of any virus or other defect that might affect any computer system into > which it is received and opened, it is the responsibility of the recipient > to ensure that it is virus free and no responsibility is accepted by the > sender for any loss or damage arising in any way from its opening or use. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN