I believe this is the URL http://www.wavv.org/wavv2010/presentations/WAVV%202010%20Keyf.pdf
---------- Original Message ---------- From: Lizette Koehler <[email protected]> To: [email protected] Subject: Re: WAVV2010 Presentation Date: Wed, 6 Aug 2014 05:57:03 -0700 Could you provide a link to the presentation? Lizette > -----Original Message----- > From: IBM Mainframe Assembler List [mailto:ASSEMBLER- > [email protected]] On Behalf Of [email protected] > Sent: Wednesday, August 06, 2014 5:49 AM > To: [email protected] > Subject: WAVV2010 Presentation > > I discovered a presentation from 2010 > WAVV 2010 > KEY15 vs KEY0 > Author unknown > > This presentation provided some source code which I found intresting. > MODESET KEY=ZERO Switch To Key 0 00009000 > > MODESET MODE=SUP Switch To Supervisor State 00010000 > > STCTL R3,R3,WORK Control Register 3 00020000 > > OC WORK(2),=X'0003' Allow Key E and F 00030001 > > LCTL R3,R3,WORK Control Register 3 00040100 > > MODESET KEY=NZERO Return To User Key 00040202 > > MODESET MODE=PROB Return to Problem State 00040300 > > ORG *-32 00040400 > > DC X'00000008' 00040500 > > ORG 00040600 > > * 00040700 > > > My understanding is that this snipet of code allows the caller to add PSW Key E and > F to there PSWKey list. > . > Now I have no actual need for code like this but I did find it interesting. > . > Does anyone use this technique ? > . > Does anyone have a routine like this that is coded differently ? > . > Any code sharing would be appreciated . > Just curious > . > Paul D'Angelo > >
