Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

If you could tell me the price 

I have Zpdt personal edition 

Thank you 

> On Feb 28, 2023, at 7:33 AM, Robert Shimizu  wrote:
> 
> Ed:
> 
> THANKS for being a happy z/XDC user, sir!
> 
> Sincerely,
> Bob
> 
>> On 2/27/23 8:36 AM, Ed Jaffe wrote:
>>> On 2/27/2023 2:07 AM, Rob Scott wrote:
>>> 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.
>> 
>> We are happy z/XDC users, but we also rely heavily on the z/VM TRACE command 
>> as mentioned by Jim Mulder.
>> 
>> z/VM's TRACE can be used interactively to debug literally anything -- even 
>> an interrupt handler or IOS exit. If circumstances warrant, we will let the 
>> TRACE run and SPOOL its output to z/OS (via NJE from RSCS) where we have a 
>> REXX exec that superimposes its information on assembly listings.
>> 
>> The result displayed by that REXX are 1) an annotated 
>> instruction-by-instruction trace and 2) full source program listing showing 
>> how many times each statement was executed.
>> 
>> We also use SLIP IF tracing when it makes sense to do so and superimpose 
>> that information on assembly listings in the same manner.
>> 
>> 
> 
> -- 
> 
> Robert W. Shimizu
> Partner, Concierge
> ColeSoft Marketing, Inc.
> (800) 932-5150
> (928) 771-2003
> 
> bshim...@colesoft.com 
> www.colesoft.com 
> 
> --
> 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

Re: Cant SPKA to PSW Key 4

[Jay Maynard]

Good heavens, Bob, I remember talking to you in the 80s about XDC. I'm
pleased to see you're still involved. I never had a chance to use your
product, sadly, but it has an excellent reputation. I just couldn't justify
it for the limited use it would have gotten at any of the shops I was at.

On Tue, Feb 28, 2023 at 6:32 AM Robert Shimizu 
wrote:

> Hi Mike:
>
> THANK YOU for the kind words, and your long loyalty, sir.
>
> Sincerely,
> Bob
>
> On 2/27/23 7:01 AM, Mike Shaw wrote:
> > +1
> >
> > We have been licensees of z/XDC for over 25 years. It has saved us
> > immeasurable amounts of man-hours.
> >
> > Mike Shaw
> > MVS/QuickRef Support Group
> > Chicago-Soft, Ltd.
> >
> >
> > On Mon, Feb 27, 2023 at 5:07 AM Rob Scott
> wrote:
> >
> >> 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  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>> 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>> 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://www.phoenixsoftware.com/<https://www.phoenixsoftware.com>
> >>>
> >>>
> >>> --
> >>> For IBM-MAIN subscribe / signoff / archive access instructions,
> >>> send email tolists...@listserv.ua.edu<mailto:lists...@listserv.ua.edu>
> >> with the message: INFO IBM-MAIN
> >>
> >> --
> >> For IBM-MAIN subscribe / signoff / archive access ins

Re: Cant SPKA to PSW Key 4

[Robert Shimizu]

Ed:

THANKS for being a happy z/XDC user, sir!

Sincerely,
Bob

On 2/27/23 8:36 AM, Ed Jaffe wrote:

On 2/27/2023 2:07 AM, Rob Scott wrote:
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.


We are happy z/XDC users, but we also rely heavily on the z/VM TRACE 
command as mentioned by Jim Mulder.


z/VM's TRACE can be used interactively to debug literally anything -- 
even an interrupt handler or IOS exit. If circumstances warrant, we 
will let the TRACE run and SPOOL its output to z/OS (via NJE from 
RSCS) where we have a REXX exec that superimposes its information on 
assembly listings.


The result displayed by that REXX are 1) an annotated 
instruction-by-instruction trace and 2) full source program listing 
showing how many times each statement was executed.


We also use SLIP IF tracing when it makes sense to do so and 
superimpose that information on assembly listings in the same manner.





--

Robert W. Shimizu
Partner, Concierge
ColeSoft Marketing, Inc.
(800) 932-5150
(928) 771-2003

bshim...@colesoft.com 
www.colesoft.com 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Robert Shimizu]

Hi Mike:

THANK YOU for the kind words, and your long loyalty, sir.

Sincerely,
Bob

On 2/27/23 7:01 AM, Mike Shaw wrote:

+1

We have been licensees of z/XDC for over 25 years. It has saved us
immeasurable amounts of man-hours.

Mike Shaw
MVS/QuickRef Support Group
Chicago-Soft, Ltd.


On Mon, Feb 27, 2023 at 5:07 AM Rob Scott  wrote:


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  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>> 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>> 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://www.phoenixsoftware.com/<https://www.phoenixsoftware.com>


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@listserv.ua.edu<mailto:lists...@listserv.ua.edu>

with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@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://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences -
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy -
http://www.rocketsoftware.com/company/legal/privacy-policy


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 tolists...@listserv.ua.edu  with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@listserv.ua.edu  with the message: INFO IBM-MAIN



--

Robert W. Shimizu
Partner, Concierge
ColeSoft Marketing, Inc.
(800) 932-5150
(928) 771-2003

bshim...@colesoft.com <mailto:bshim...@colesoft.com>
www.colesoft.com <http://www.colesoft.com/>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Robert Shimizu]

Hi Joe:

Hello again, sir.  I've been watching this thread.

You once used z/XDC as I recall.  We DO offer a z/PDT license for the 
tool, but it is still a professional level price for a professional 
level product.  May I know more about your circumstances, please?  
Perhaps we can work something out.


Sincerely,
Bob

On 2/24/23 8:57 AM, Joseph Reichman wrote:

I think they should have the Zpdt discount price if so I’d be interested ….


On Feb 24, 2023, at 8:06 AM, Steve Thompson  wrote:

Might I suggest z/XDC from Cole Software? I've used it off and on since the 
mid-90s and it beats the snot out of TEST|Test Auth.

Steve Thompson

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@listserv.ua.edu  with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email tolists...@listserv.ua.edu  with the message: INFO IBM-MAIN



--

Robert W. Shimizu
Partner, Concierge
ColeSoft Marketing, Inc.
(800) 932-5150
(928) 771-2003

bshim...@colesoft.com 
www.colesoft.com 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Robert Shimizu]

Hi Steve:

Sir, thanks for your kind words about z/XDC.  We appreciate it over here 
a great deal.


Sincerely,
Bob

On 2/24/23 6:06 AM, Steve Thompson wrote:
Might I suggest z/XDC from Cole Software? I've used it off and on 
since the mid-90s and it beats the snot out of TEST|Test Auth.


Steve Thompson

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--

Robert W. Shimizu
Partner, Concierge
ColeSoft Marketing, Inc.
(800) 932-5150
(928) 771-2003

bshim...@colesoft.com 
www.colesoft.com 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

I asked once a while ago whether I would get a break because not only am I Zpdt 
user 

I’m not a company even though I can LLC 
My income comes from working in IT 

And don’t remember when  exactly but was a few years back but was told I would 
have to pay the going rate 

I’m not exactly sure what that was but seemed to be $10,000 yearly license 

> On Feb 27, 2023, at 11:59 AM, Ed Jaffe  wrote:
> 
> On 2/27/2023 4:51 AM, Joseph Reichman wrote:
>> I just wonder if anyone who have the Zpdt personal edition is running XDC
> 
> ISTR Cole Software is also a zPDT customer, so they are most-likely sensitive 
> to your price concerns...
> 
> 
> -- 
> 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

Re: Cant SPKA to PSW Key 4

[Ed Jaffe]

On 2/27/2023 4:51 AM, Joseph Reichman wrote:

I just wonder if anyone who have the Zpdt personal edition is running XDC


ISTR Cole Software is also a zPDT customer, so they are most-likely 
sensitive to your price concerns...



--
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

Re: Cant SPKA to PSW Key 4

[Mike Shaw]

Joseph,

Yes, but we develop on a zPDT box also. Colesoft is good about negotiating
pricing on z/XDC for small shops.

The drastic productivity improvement that occurs when debugging with z/XDC
makes the license fee worthwhile. I used TSO TEST to debug for over 12
years, then switched to z/XDC for debugging; it  is light-years ahead of
TEST.

Besides, if you are an independent developer operating as an LLC, you could
deduct the annual license fee as a business expense on your tax return.

Mike

On Mon, Feb 27, 2023, 9:05 AM Joseph Reichman  wrote:

> When you say we you are referring to your company
>
> Not you yourself correct ?
>
> > On Feb 27, 2023, at 9:03 AM, Mike Shaw  wrote:
> >
> > +1
> >
> > We have been licensees of z/XDC for over 25 years. It has saved us
> > immeasurable amounts of man-hours.
> >
> > Mike Shaw
> > MVS/QuickRef Support Group
> > Chicago-Soft, Ltd.
> >
> >
> >> On Mon, Feb 27, 2023 at 5:07 AM Rob Scott 
> wrote:
> >>
> >> 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  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>> 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>> 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://www.phoenixsoftware.com/<https://www.phoenixsoftware.com>
> >>>
> >>>
> >>> --
> >>> For IBM-MAIN subscribe / signoff / archive access instructions,
> >>> send email 

Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

Rob

Dave Cole gets emails from IBMMAIN 

My suggestion was discounted pricing for Zpdt users

There are 2 groups of people 
One who would never pay and IBM recognized that with the learners edition 
And the other ( which I include myself in ) 

Who have the personal edition and would pay a reasonable price to date I’m not 
aware of any pricing discounts for Zpdt users 

Thanks 

> On Feb 27, 2023, at 10:37 AM, Ed Jaffe  wrote:
> 
> On 2/27/2023 2:07 AM, Rob Scott wrote:
>> 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.
> 
> We are happy z/XDC users, but we also rely heavily on the z/VM TRACE command 
> as mentioned by Jim Mulder.
> 
> z/VM's TRACE can be used interactively to debug literally anything -- even an 
> interrupt handler or IOS exit. If circumstances warrant, we will let the 
> TRACE run and SPOOL its output to z/OS (via NJE from RSCS) where we have a 
> REXX exec that superimposes its information on assembly listings.
> 
> The result displayed by that REXX are 1) an annotated 
> instruction-by-instruction trace and 2) full source program listing showing 
> how many times each statement was executed.
> 
> We also use SLIP IF tracing when it makes sense to do so and superimpose that 
> information on assembly listings in the same manner.
> 
> 
> -- 
> 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

Re: Cant SPKA to PSW Key 4

[Ed Jaffe]

On 2/27/2023 2:07 AM, Rob Scott wrote:

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.


We are happy z/XDC users, but we also rely heavily on the z/VM TRACE 
command as mentioned by Jim Mulder.


z/VM's TRACE can be used interactively to debug literally anything -- 
even an interrupt handler or IOS exit. If circumstances warrant, we will 
let the TRACE run and SPOOL its output to z/OS (via NJE from RSCS) where 
we have a REXX exec that superimposes its information on assembly listings.


The result displayed by that REXX are 1) an annotated 
instruction-by-instruction trace and 2) full source program listing 
showing how many times each statement was executed.


We also use SLIP IF tracing when it makes sense to do so and superimpose 
that information on assembly listings in the same manner.



--
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

Re: Cant SPKA to PSW Key 4

[Rob Scott]

Joseph

>> I have gotten to a point where in my code I have written a number of SRB’s 
>> and other types of code that run in Supervisor state and / or key 0

>>To protect my control blocks I wanted to put them in key 4 so that 
>>inadvertent access would get a s0c4 pic 4

My gut feeling here is you should concentrate on executing in Key4 and avoid 
running in Key0 as much as possible.

(Having your control blocks in key4 does not prevent accidental reference or  
overlay from key0 code unless you take other measures to protect the memory).

Normal methods of running in key4 (or maybe key2) would involve an entry in 
SCHEDxx for your server jobstep program which would in turn own PC routines 
with ETDEF entries for any client caller that would declare the execution key.

(I do have some sample code on GitHub that demonstrates this)

Execution key switch would be made by the PC instruction – there would be no 
need to issue SPKAs unless you called a system service  within the server (or 
PC routine)  that explicitly only supported key0 (and there are not too many of 
those).


>> I have Zpdt personal edition

If this was me, I would still start a dialog with Cole Software.

Rob Scott
Rocket Software


From: IBM Mainframe Discussion List  On Behalf Of 
Joseph Reichman
Sent: 27 February 2023 12:51
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cant SPKA to PSW Key 4

EXTERNAL EMAIL



Rob

I have Zpdt personal edition

I have gotten to a point where in my code I have written a number of SRB’s and 
other types of code that run in Supervisor state and / or key 0

To protect my control blocks I wanted to put them in key 4 so that inadvertent 
access would get a s0c4 pic 4

I am not rocket software and I don’t have what I think is the yearly fee of XDC 
which about $10,000 which is a lot of money for a working stiff like me

I just wonder if anyone who have the Zpdt personal edition is running XDC

As far as this latest hurdle

The only time test / TESTAUTH has a problem with my code is when I am at a 
breakpoint and am not in key 8 or 0

I am first begging to think that right before I enter SVC 97 I could change 
back to key 8 and when I resume go back to key 4

Haven’t thought this through as I just read your email and I’m and starting my 
day

Thanks for your help

If Dave come gives me a discounted price I would be willing to listen

> On Feb 27, 2023, at 5:56 AM, Seymour J Metz 
> mailto:sme...@gmu.edu>> wrote:
>
> 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<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<mailto: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 
> mailto:IBM-MAIN@LISTSERV.UA.EDU>> On Behalf Of 
> Joseph Reichman
> Sent: 26 February 2023 22:36
> To: IBM-MAIN@LISTSERV.UA.EDU<mailto: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 
>> mailto:d10j...@us.ibm.com<mailto:d10j...@us.ibm.com%3cmailto: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: I

Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

When you say we you are referring to your company 

Not you yourself correct ?

> On Feb 27, 2023, at 9:03 AM, Mike Shaw  wrote:
> 
> +1
> 
> We have been licensees of z/XDC for over 25 years. It has saved us
> immeasurable amounts of man-hours.
> 
> Mike Shaw
> MVS/QuickRef Support Group
> Chicago-Soft, Ltd.
> 
> 
>> On Mon, Feb 27, 2023 at 5:07 AM Rob Scott  wrote:
>> 
>> 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  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>> 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>> 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://www.phoenixsoftware.com/<https://www.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://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
>> Unsubscribe from Marketing Messages/Manage Your Subscription Preferences -
>> http://www.rocketsoftware.com/manage-your-email-preferences
>> Privacy Policy -
>> http://www.rocketsoftware.com/company/legal/privacy-policy
>> 
>> 
>> 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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Mike Shaw]

+1

We have been licensees of z/XDC for over 25 years. It has saved us
immeasurable amounts of man-hours.

Mike Shaw
MVS/QuickRef Support Group
Chicago-Soft, Ltd.


On Mon, Feb 27, 2023 at 5:07 AM Rob Scott  wrote:

> 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  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>> 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>> 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://www.phoenixsoftware.com/<https://www.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://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
> Unsubscribe from Marketing Messages/Manage Your Subscription Preferences -
> http://www.rocketsoftware.com/manage-your-email-preferences
> Privacy Policy -
> http://www.rocketsoftware.com/company/legal/privacy-policy
> 
>
> 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

Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

Rob

I have Zpdt personal edition 

I have gotten to a point where  in my code I have written a number of SRB’s and 
other types of code that run in Supervisor state and / or  key 0

To protect my control blocks I wanted to put them in key 4 so that inadvertent 
access would get a s0c4 pic 4 

I am not rocket software and I don’t have what I think is the yearly fee of XDC 
which about $10,000 which is a lot of money for a working stiff  like me 

I just wonder if anyone who have the Zpdt personal edition is running XDC 

As far as this latest hurdle 

The only time test / TESTAUTH has a problem with my code is when I am at a 
breakpoint and am not in key 8 or 0 

I am first begging to think that right before I enter SVC 97 I could change 
back to key 8 and when I resume go back to key 4 

Haven’t thought this through as I just read your email and   I’m and starting  
my day 

Thanks for your help 

If Dave come gives me a discounted price I would be willing to listen 

> On Feb 27, 2023, at 5:56 AM, Seymour J Metz  wrote:
> 
> 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  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 
>> 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 
>> 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_NCYDiH3g8wSKyKyh

Re: Cant SPKA to PSW Key 4

[Seymour J Metz]

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  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 
> 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 
> 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%7C5ca0a54c290e4bb11e

Re: Cant SPKA to PSW Key 4

[Rob Scott]

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  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 
> 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 
> 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://www.phoenixsoftware.com/<https://www.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://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy


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

Re: Cant SPKA to PSW Key 4

[Jim Mulder]

 I have never used IDF.  When I want to trace through authorized code, 
I run z/OS under z/VM and use the TRACE command.

Jim Mulder 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Joseph Reichman
Sent: Sunday, February 26, 2023 5:36 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cant SPKA to PSW Key 4

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  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  On 
> Behalf Of Ed Jaffe
> Sent: Saturday, February 25, 2023 9:50 PM
> To: 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://www.phoenixsoftware.com/
> 
> 
> --
> 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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

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  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  On Behalf Of 
> Ed Jaffe
> Sent: Saturday, February 25, 2023 9:50 PM
> To: 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://www.phoenixsoftware.com/
> 
> 
> --
> 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

Re: Cant SPKA to PSW Key 4

[Jim Mulder]

  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  On Behalf Of Ed 
Jaffe
Sent: Saturday, February 25, 2023 9:50 PM
To: 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://www.phoenixsoftware.com/


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

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  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

Re: Cant SPKA to PSW Key 4

[Ed Jaffe]

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

Re: Cant SPKA to PSW Key 4

[Seymour J Metz]

The S0C1 is almost certainly a bug in TESTAUTH, not in his code, and I wouldn't 
expect him to track down the bug in TEST, nor is it his responsibility. If he's 
not already licensed, think of this as a marketing opportunity.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
David Cole [dbc...@colesoft.com]
Sent: Saturday, February 25, 2023 5:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cant SPKA to PSW Key 4

Hi Joe,

Tony is right. It is not possible for SPKA to throw an 0C1.
Therefore, the 0C1 has to be occurring somewhere else.

When the 0C1 occurs, are you put back into TEST? Or are you blown all
the way out to READY?

If you're still in TEST, issue WHERE to see where execution is now.
WHERE will display a message that looks something like:
* "address. LOCATED AT +offset IN modulename .csectname UNDER TCB
LOCATED AT whocares."
It is vary likely that the "modulename" and "csectname" are not what
you will expect them to be.



The location given by "address." will be at the end of the bad
instruction. To see the bad instruction itself, you will have to back
up -2, -4 or -6 bytes. To display that, use "LIST address.-6 LENGTH(32)".



So, now you know (more or less) where the 0C1 happened. Now comes the
hard part: Figuring out WHY it happened.


There basically only three possibilities:
* 1) A wild jump occurred that took execution to god knows where.
* 2) Corruption occurred that overwrote good code with bad data.
* 3) Or both: A corruption occurred that causes a wild jump.
I will have to leave it to you to figure that out.


Best,
Dave Cole, Developer

dbc...@gmail.com (personal)
dbc...@colesoft.com (business)
540-456-6518 (cell)








At 2/23/2023 10:54 PM, Tony Harminc wrote:
>On Thu, 23 Feb 2023 at 21:47, 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
>> >
>A program check 1 is not possible if you execute an SPKA, no matter what
>state you're in, and what the content of R0 (the implied register) is. So
>I'd say you didn't actually execute it. How, I have no idea. When you say
>"running this code", presumably there is more code than the one SPKA
>instruction. Please make sure it isn't e.g. the instruction right before
>the SPKA that's failing - that could show you the address of the SPKA as
>the failing address, depending on how it fails. Perhaps you're branching
>into the middle of an instruction somewhere nearby?
>TSO TEST[AUTH] does overlay instructions where you have set a breakpoint
>with an SVC 97, so if your code is fetching from or storing into the
>instruction stream where there's a breakpoint, all bets are off.
>I am able to get to PSW key 0 SPKA 0
> > Don't get it
> >
>Neither do I. But architecturally, SPKA can't fail that way. If you got an
>S0C2 that would make sense.
>Tony H.

--
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

Re: Cant SPKA to PSW Key 4

[David Cole]

Hi Joe,

Tony is right. It is not possible for SPKA to throw an 0C1. 
Therefore, the 0C1 has to be occurring somewhere else.


When the 0C1 occurs, are you put back into TEST? Or are you blown all 
the way out to READY?


If you're still in TEST, issue WHERE to see where execution is now. 
WHERE will display a message that looks something like:
   * "address. LOCATED AT +offset IN modulename .csectname UNDER TCB 
LOCATED AT whocares."
It is vary likely that the "modulename" and "csectname" are not what 
you will expect them to be.




The location given by "address." will be at the end of the bad 
instruction. To see the bad instruction itself, you will have to back 
up -2, -4 or -6 bytes. To display that, use "LIST address.-6 LENGTH(32)".




So, now you know (more or less) where the 0C1 happened. Now comes the 
hard part: Figuring out WHY it happened.



There basically only three possibilities:
   * 1) A wild jump occurred that took execution to god knows where.
   * 2) Corruption occurred that overwrote good code with bad data.
   * 3) Or both: A corruption occurred that causes a wild jump.
I will have to leave it to you to figure that out.


Best,
Dave Cole, Developer

dbc...@gmail.com (personal)
dbc...@colesoft.com (business)
540-456-6518 (cell)








At 2/23/2023 10:54 PM, Tony Harminc wrote:

On Thu, 23 Feb 2023 at 21:47, 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
>

A program check 1 is not possible if you execute an SPKA, no matter what
state you're in, and what the content of R0 (the implied register) is. So
I'd say you didn't actually execute it. How, I have no idea. When you say
"running this code", presumably there is more code than the one SPKA
instruction. Please make sure it isn't e.g. the instruction right before
the SPKA that's failing - that could show you the address of the SPKA as
the failing address, depending on how it fails. Perhaps you're branching
into the middle of an instruction somewhere nearby?
TSO TEST[AUTH] does overlay instructions where you have set a breakpoint
with an SVC 97, so if your code is fetching from or storing into the
instruction stream where there's a breakpoint, all bets are off.
I am able to get to PSW key 0 SPKA 0
> Don't get it
>
Neither do I. But architecturally, SPKA can't fail that way. If you got an
S0C2 that would make sense.
Tony H.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

I think they should have the Zpdt discount price if so I’d be interested ….

> On Feb 24, 2023, at 8:06 AM, Steve Thompson  wrote:
> 
> Might I suggest z/XDC from Cole Software? I've used it off and on since the 
> mid-90s and it beats the snot out of TEST|Test Auth.
> 
> Steve Thompson
> 
> --
> 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

Re: Cant SPKA to PSW Key 4

[Steve Thompson]

Might I suggest z/XDC from Cole Software? I've used it off and on 
since the mid-90s and it beats the snot out of TEST|Test Auth.


Steve Thompson

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Tony Harminc]

On Thu, 23 Feb 2023 at 23:19, Joseph Reichman  wrote:

> Seymour was right there is something wrong with TEST or in my case
> TESTAUTH I made breakpoint way after SPKA X'40' did a listpsw and saw the
> PSW key of 4
>
> However now I am getting an invalid address when trying to set breakpoints
> am using the AT + and its giving me invalid address
>

Are you sure your understanding of TEST's "current address" is correct? It
is often the case that the offset shown in a bare WHERE command will not
match what you get if you issue AT +nnn. It pays to use QUALIFY to be sure.
I typically use Q 12r? (where R12 is my code base). Then issue W just to be
sure. Any calls to other modules will require issuing a new Qualify if you
want the offsets to match the listing.

AT will complain if there is an invalid opcode at the place you are trying
to put the breakpoint. There are other reasons too, but you won't know
which it is unless you use a ? to get the second level message.

Tony H.

-Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Tony Harminc
> Sent: Thursday, February 23, 2023 10:55 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Cant SPKA to PSW Key 4
>
> On Thu, 23 Feb 2023 at 21:47, 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
> >
>
> A program check 1 is not possible if you execute an SPKA, no matter what
> state you're in, and what the content of R0 (the implied register) is. So
> I'd say you didn't actually execute it. How, I have no idea. When you say
> "running this code", presumably there is more code than the one SPKA
> instruction. Please make sure it isn't e.g. the instruction right before
> the SPKA that's failing - that could show you the address of the SPKA as
> the failing address, depending on how it fails. Perhaps you're branching
> into the middle of an instruction somewhere nearby?
>
> TSO TEST[AUTH] does overlay instructions where you have set a breakpoint
> with an SVC 97, so if your code is fetching from or storing into the
> instruction stream where there's a breakpoint, all bets are off.
>
> I am able to get to PSW key 0 SPKA 0
> > Don't get it
> >
>
> Neither do I. But architecturally, SPKA can't fail that way. If you got an
> S0C2 that would make sense.
>
> Tony H.
>
> --
> 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
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

Seymour was right there is something wrong with TEST or in my case TESTAUTH I 
made breakpoint way after SPKA X'40' did a listpsw and saw the PSW key of 4 

However now I am getting an invalid address when trying to set breakpoints am 
using the AT + and its giving me invalid address



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Tony Harminc
Sent: Thursday, February 23, 2023 10:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cant SPKA to PSW Key 4

On Thu, 23 Feb 2023 at 21:47, 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
>

A program check 1 is not possible if you execute an SPKA, no matter what state 
you're in, and what the content of R0 (the implied register) is. So I'd say you 
didn't actually execute it. How, I have no idea. When you say "running this 
code", presumably there is more code than the one SPKA instruction. Please make 
sure it isn't e.g. the instruction right before the SPKA that's failing - that 
could show you the address of the SPKA as the failing address, depending on how 
it fails. Perhaps you're branching into the middle of an instruction somewhere 
nearby?

TSO TEST[AUTH] does overlay instructions where you have set a breakpoint with 
an SVC 97, so if your code is fetching from or storing into the instruction 
stream where there's a breakpoint, all bets are off.

I am able to get to PSW key 0 SPKA 0
> Don't get it
>

Neither do I. But architecturally, SPKA can't fail that way. If you got an
S0C2 that would make sense.

Tony H.

--
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

Re: Cant SPKA to PSW Key 4

[Tony Harminc]

On Thu, 23 Feb 2023 at 21:47, 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
>

A program check 1 is not possible if you execute an SPKA, no matter what
state you're in, and what the content of R0 (the implied register) is. So
I'd say you didn't actually execute it. How, I have no idea. When you say
"running this code", presumably there is more code than the one SPKA
instruction. Please make sure it isn't e.g. the instruction right before
the SPKA that's failing - that could show you the address of the SPKA as
the failing address, depending on how it fails. Perhaps you're branching
into the middle of an instruction somewhere nearby?

TSO TEST[AUTH] does overlay instructions where you have set a breakpoint
with an SVC 97, so if your code is fetching from or storing into the
instruction stream where there's a breakpoint, all bets are off.

I am able to get to PSW key 0 SPKA 0
> Don't get it
>

Neither do I. But architecturally, SPKA can't fail that way. If you got an
S0C2 that would make sense.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Joseph Reichman]

Ill give it a shot hold on   

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Seymour J Metz
Sent: Thursday, February 23, 2023 9:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cant SPKA to PSW Key 4

This sounds like a problem with TEST. Have you tried a different debugger?


From: IBM Mainframe Discussion List  on behalf of
Joseph Reichman 
Sent: Thursday, February 23, 2023 9:46 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Cant SPKA to PSW Key 4

Hi



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



Thanks


--
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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cant SPKA to PSW Key 4

[Seymour J Metz]

This sounds like a problem with TEST. Have you tried a different debugger?


From: IBM Mainframe Discussion List  on behalf of 
Joseph Reichman 
Sent: Thursday, February 23, 2023 9:46 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Cant SPKA to PSW Key 4

Hi



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



Thanks


--
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