To expand on that, never throw out debug scaffolding after you go production; keep the test cases and AIF out anything that you want to disable rather than deleting it.
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Rob Scott [rsc...@rocketsoftware.com] Sent: Monday, February 27, 2023 5:07 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Cant SPKA to PSW Key 4 Joseph As others might have suggested, if you are even semi-serious about writing authorized code then I think it would be worth your time talking to Cole Software about getting z/XDC. Independently of that discussion, it might be a good idea to take stock of your current software’s own trace abilities (and I mean something more than just putting the odd WTO out). It would be a very good investment in your time to build a comprehensive internal trace capability for your software, something that can support all environments that it can be executed in. Even if you are writing authorized code for your own interest/hobby, then believe me that solving this issue is extremely interesting (and rewarding). The return on investment for this is huge if your code ever reaches a customer site and you are trying to resolve a problem. Rob Scott Rocket Software From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Joseph Reichman Sent: 26 February 2023 22:36 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Cant SPKA to PSW Key 4 EXTERNAL EMAIL Jim How about IDF or tool debug I have been trying to get IDF running so I can debug code running in key 4 but if you say I’m wasting my time ? > On Feb 26, 2023, at 5:18 PM, Jim Mulder > <d10j...@us.ibm.com<mailto:d10j...@us.ibm.com>> wrote: > > They do not support whatever is in TCBPKF. I have seen code in TSO which has > hardcoded x'80'. > > Jim Mulder > > -----Original Message----- > From: IBM Mainframe Discussion List > <IBM-MAIN@LISTSERV.UA.EDU<mailto:IBM-MAIN@LISTSERV.UA.EDU>> On Behalf Of Ed > Jaffe > Sent: Saturday, February 25, 2023 9:50 PM > To: IBM-MAIN@LISTSERV.UA.EDU<mailto:IBM-MAIN@LISTSERV.UA.EDU> > Subject: Re: Cant SPKA to PSW Key 4 > >> 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://secure-web.cisco.com/1Fy8Gw-9vhBQBgeJhqtayl34t6eGNe3MJfwiwKBGXtIr3SdVPKArvm2n4bNK1UdigF931FgIXmPZGZnSI9eV28ixKcXDQ7Xn4XHBA0sL_wSh3sfeSydMxqD4svkwOQeBHjZAPVZzWXHc5qLtfqIjI6yvi0EyEfb4aY1Nn1oZlOylb-eyvj4WOP3nk3K8xN2lqZ2rVeKnYzlxoM9DwlJP2m2d0tjxBjfltHap3tJDWfxXpdC333dKhdGybAPTK3O-AK2Yovw5nUBq1O_YCasCV-PPguSfLJ3PKBRHVLeb08TM7wHAstgPYHK2CmCSDF47o5PgKOc08_NCYDiH3g8wSKyKyhS2jiC5mzbrA160azpdtcYJJF3Fig66EzkLnCyjaZ7DLqXLmPdkSfYOE9ksz8L7rkfPlb6XJU6VdV7Tv5Vg/https%3A%2F%2Fwww.phoenixsoftware.com%2F<https://secure-web.cisco.com/1HlrTjm1d-4gleZsm32JFmvn6MOXUjvhxM2DJaakY4qHsaFNmnYG8w6ljTrtlOk9uq7Z-ExN-n7NrNfiKjpDvoXvWMFoUIs_1LaAT09uRQ2ssfODox3OTVRrfHsLbb5YRTbvq7chMECV5Y9U-ZCf0VIKH1-UVjR5jLCU1N13X8e7LNyCIaG1XHX3mKsgPYRcCnA2QB7R0wEclTmk2UfFMH9x5Gt-zd8AqpQgFUq2L8jPiyODuzqq7nMIrEpqkiykXSCiCzayXUBO-ySrNy3tWAqUMVLlMXa3CXrfAfcejsCWQeXIrMBLQStQDPHEVaE5JhvwlsV4KzG6Eh-LjbeKaymRK_ZgNj68FVY7NVyyQIMkABxMzH43bb-v8rX8dWw3OEKkWGj3C1ub3uM1svAA_j1r9OIGkRSfmaNWXSsOri9w/https%3A%2F%2Fwww.phoenixsoftware.com> > > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu<mailto: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<mailto:lists...@listserv.ua.edu> with the message: INFO IBM-MAIN ================================ Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■ Main Office Toll Free Number: +1 855.577.4323 Contact Customer Support: https://nam11.safelinks.protection.outlook.com/?url=https%3A%2F%2Fmy.rocketsoftware.com%2FRocketCommunity%2FRCEmailSupport&data=05%7C01%7Csmetz3%40gmu.edu%7C5ca0a54c290e4bb11e2d08db18aa9324%7C9e857255df574c47a0c00546460380cb%7C0%7C0%7C638130893285480126%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C2000%7C%7C%7C&sdata=oN8IpgYzIqaDFgHrZJH7W0nAgZtnebdyyDG9V6Ht4LU%3D&reserved=0 Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - https://nam11.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.rocketsoftware.com%2Fmanage-your-email-preferences&data=05%7C01%7Csmetz3%40gmu.edu%7C5ca0a54c290e4bb11e2d08db18aa9324%7C9e857255df574c47a0c00546460380cb%7C0%7C0%7C638130893285480126%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C2000%7C%7C%7C&sdata=AeDBtfoOgYR%2FDujWPZDRPT%2BBDD%2BVxnK8G%2F7mTMvvJrM%3D&reserved=0 Privacy Policy - https://nam11.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.rocketsoftware.com%2Fcompany%2Flegal%2Fprivacy-policy&data=05%7C01%7Csmetz3%40gmu.edu%7C5ca0a54c290e4bb11e2d08db18aa9324%7C9e857255df574c47a0c00546460380cb%7C0%7C0%7C638130893285480126%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C2000%7C%7C%7C&sdata=NzfemXFthR7%2Bk%2BwUn2bNW7lE52t3dDlUuVPZwLs4Isg%3D&reserved=0 ================================ This communication and any attachments may contain confidential information of Rocket Software, Inc. All unauthorized use, disclosure or distribution is prohibited. If you are not the intended recipient, please notify Rocket Software immediately and destroy all copies of this communication. Thank you. ---------------------------------------------------------------------- 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
