Re: Error messages (a rant and an idea)

[Colin Paice]

Could someone/IBM provide a Wiki so that people can update messages and so
we build up a profile of common messages, problems, and solutions.

If you find the documentation is insufficient then you create an entry and
expand any response.  If it fixes your problem then +1 the relevant topic.
For example
I*EC143I 213-85, RC=X’0008′,RSN=X’0BFB’*
*The provided symmetric key label refers to an encrypted CCA key token, and
the CSFKEYS profile covering it does not allow its use in high performance
encrypted key operations.*
*User action: Contact your ICSF or RACF administrator*

My comments

*Define the profile with the bold text*


*RDEFINE CSFKEYS DES5 UACC(NONE) –ICSF(SYMCPACFWRAP(YES) SYMCPACFRET(YES))*



*___*
CWPKI0033E: The keystore located at safkeyringhybrid://START1/KEY did not
load because of the following error: Invalid keystore format

Change

*location="safkeyringhybrid:/*/USERID/Keyring to
*location="safkeyring:*//USERID/Keyring
to

On Mon, 18 Sept 2023 at 21:36, Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:

> On Mon, 18 Sep 2023 16:05:18 -0400, Phil Smith III wrote:
> >
> >I've decided this is supporting my thesis-can't quite tell? Or are you
> saying this is one of those cases where breaking it out into several
> messages would have made sense?
> >
> One of my pet peeves is disjunctive explanations:
> "Either X or Y occurred",
> where X and Y are utterly unrelated and could only have been
> discovered by distinct tests.
>
> But the subroutine which performs both tests returns for either
> failure with RC=4 and the caller can only report "either X or Y."
>
> --
> gil
>
> --
> 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

EDIT panel modification

[ITschak Mugzach]

I am trying to add fields to the edit panel after the zCMD field and before
the dynamic data section. The control characters _ and @ are defined in the
)ATTR section. When running the program, I am getting an error msg
"Duplicate action bar field text found in )BODY section." and

Panel line where error was detected:
.. File. Edit. Edit_Settings. Menu. Utilities. Compilers. Test. Help.

Any idea how to modify the panel to allow these extra fields?


 Command ===> Z/ / Scroll ===>
Z
 _AK@QIFZDATA _BK@CK
 ZDATA,ZSHADOW/ /
 / /

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon  *

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

z/OSMF and Zowe

[Robin Atwood]

Would it be correct to say that every shop has z/OSMF installed because that
is the only method of

updating your system that IBM now supports? Ordering CBPDOs (or whatever
they were called) is

no longer an option? OTOH, Zowe is an open-source project that the average
shop will not be using? So

if you want to ship a product that uses it, the customer will have to
install it?

 

TIA

Robin

 


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

Re: IBM-MAIN Posting Guidelines

[Sasso, Len]

Totally agree.

From: IBM Mainframe Discussion List  on behalf of 
Support, DUNNIT SYSTEMS LTD. 
Sent: Tuesday, September 19, 2023 2:03 AM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: IBM-MAIN Posting Guidelines

 [External: Use caution with links & attachments]

Hi Darren,

If possible, may I suggest that your simple 1-2 sentence guidelines be included 
at the top of the main IBM-MAIN archive web page as well as at the top of every 
digest email sent out?

Thanks for all of your efforts here over the years. This list and group of 
professionals has always been beneficial to me.

--
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: IBM-MAIN Posting Guidelines

[Rupert Reynolds]

Thanks. Well said.

Can I just add the general Internet advice "If in doubt, don't feed the
troll"? :-)

Roops.

On Sun, 17 Sep 2023, 22:48 Darren Evans-Young,  wrote:

> First, I would like to apologize to the list for not being a better list
> owner.
> Life has been busy.
>
> I've had numerous complaints about some postings on the list.
> So, here's the deal. All posts WILL be directly related to IBM Mainframe
> topics.
> No discussions of religion, politics, etc.  No name calling, insults, etc.
> Respect
> each other.
>
> Failure to adhere to these simple basic guidelines will result in being set
> to REVIEW and/or removal from the list.
>
> Darren
>
> --
> 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: z/OSMF and Zowe

[Matt Hogstrom]

If you want to ship a product that uses Zowe vendors can prereq Zowe.  I’d 
contact Bruce Armstrong at IBM to talk about that.  He is involved in the Zowe 
community and can give some guidance.  You can ask questions to the Zowe 
Community here on their Slack 
https://openmainframeproject.slack.com/archives/CBVJGPWHX

Zowe, last I saw, ships an SMP/E install as well as a “convenience” build that 
is basically a pax file.  Given that Zowe basically updates on a frequent basis 
the update is basically replacing the core software so pax is far easier.  

Matt Hogstrom

From Lord of the Rings, when Frodo decides to leave the Fellowship and go to 
Mordor alone . . . 
Frodo:  “I wish the ring had never come to me.  I wish none of this had 
happened.”  
Gandalf:  “So do all who live to see such things.  But it is not for them to 
decide.  All you have to do is decide what to do with this time that is given 
to you.”

> On Sep 19, 2023, at 5:42 AM, Robin Atwood  wrote:
> 
> 
> OTOH, Zowe is an open-source project that the average shop will not be using? 
> So if you want to ship a product that uses it, the customer will have to 
> install it?
> 
> 
> TIA
> 
> Robin
> 
> 
> 
> 
> --
> 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: Why it's important to take Seymour's advice

[Adam Johanson]

Tom Brennan wrote:

> I've never written code that runs as an SRB, but over the years I've
> read about them and seen them in action, such as Omegamon poking code
> into other address spaces to grab data or do things like zap memory.

For what it's worth, you don't need to go through all the rigamarole of an SRB 
to go poking around in another address space.

Given the proper authorization, you can:

- Issue an AXSET, specifying a value of 1
- Issue an SSAR instruction identifying the target address space as the 
secondary address space
- Use MVCP / MVCS instructions to copy data between your primary address space 
and the secondary address space


There is also the technique of using the special ALET value of x'0001' and 
using AR mode to reference data from another address space.

===
Adam Johanson
Broadcom Mainframe Software Division

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

Re: Why it's important to take Seymour's advice

[dailom...@aol.com]

 I think the other address space needs to be nonswappable.


On Tuesday, September 19, 2023 at 09:40:36 AM EDT, Adam Johanson 
<031ca9d720a7-dmarc-requ...@listserv.ua.edu> wrote:  
 
 Tom Brennan wrote:

> I've never written code that runs as an SRB, but over the years I've
> read about them and seen them in action, such as Omegamon poking code
> into other address spaces to grab data or do things like zap memory.

For what it's worth, you don't need to go through all the rigamarole of an SRB 
to go poking around in another address space.

Given the proper authorization, you can:

- Issue an AXSET, specifying a value of 1
- Issue an SSAR instruction identifying the target address space as the 
secondary address space
- Use MVCP / MVCS instructions to copy data between your primary address space 
and the secondary address space


There is also the technique of using the special ALET value of x'0001' and 
using AR mode to reference data from another address space.

===
Adam Johanson
Broadcom Mainframe Software Division

--
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: Why it's important to take Seymour's advice

[Lennie Dymoke-Bradshaw]

My experience is that in times past this was definitely true. But nowadays it 
no longer is. 
I am unsure what changed but I think there was a change somewhere, possibly in 
the cross-memory instructions.
Lennie

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
dailom...@aol.com
Sent: 19 September 2023 16:16
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

 I think the other address space needs to be nonswappable.


On Tuesday, September 19, 2023 at 09:40:36 AM EDT, Adam Johanson 
<031ca9d720a7-dmarc-requ...@listserv.ua.edu> wrote:  
 
 Tom Brennan wrote:

> I've never written code that runs as an SRB, but over the years I've 
> read about them and seen them in action, such as Omegamon poking code 
> into other address spaces to grab data or do things like zap memory.

For what it's worth, you don't need to go through all the rigamarole of an SRB 
to go poking around in another address space.

Given the proper authorization, you can:

- Issue an AXSET, specifying a value of 1
- Issue an SSAR instruction identifying the target address space as the 
secondary address space
- Use MVCP / MVCS instructions to copy data between your primary address space 
and the secondary address space


There is also the technique of using the special ALET value of x'0001' and 
using AR mode to reference data from another address space.

===
Adam Johanson
Broadcom Mainframe Software Division

--
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: EDIT panel modification

[Schmitt, Michael]

My guess is you have a stray x'15' in what you added, if the panel you're 
modifying is ISREDDE2.


Also, I'll just say that the only approved way to modify an Edit panel is to 
use the EDIT service combined with a panel that is derived from one of the 
sample panels: ISREFR01, ISREFR02, ISREFR03, or ISREFR04.

https://www.ibm.com/docs/en/zos/2.4.0?topic=edit-providing-customized-browse-panels

This is because ISPF cheats: it doesn't always follow its rules when it is 
doing its own code.


If you're using ISREFR02 then the action bar attribute is x'AB'.




-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
ITschak Mugzach
Sent: Tuesday, September 19, 2023 3:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EDIT panel modification

I am trying to add fields to the edit panel after the zCMD field and before
the dynamic data section. The control characters _ and @ are defined in the
)ATTR section. When running the program, I am getting an error msg
"Duplicate action bar field text found in )BODY section." and

Panel line where error was detected:
.. File. Edit. Edit_Settings. Menu. Utilities. Compilers. Test. Help.

Any idea how to modify the panel to allow these extra fields?


 Command ===> Z/ / Scroll ===>
Z
 _AK@QIFZDATA _BK@CK
 ZDATA,ZSHADOW/ /
 / /

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon  *

--
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: EDIT panel modification

[ITschak Mugzach]

tx Michael,

I found the problem... I used underscore as a field type and there are
titles that have underscore in it. You are correct, for testing, I am using
panel ISREDDE2 (but will use the samples you pointed me to later).

BTW, U couldn't report it as I don't see my original posts until someone
answers.

Best,
ITschak

ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon  *




On Tue, Sep 19, 2023 at 6:29 PM Schmitt, Michael 
wrote:

> My guess is you have a stray x'15' in what you added, if the panel you're
> modifying is ISREDDE2.
>
>
> Also, I'll just say that the only approved way to modify an Edit panel is
> to use the EDIT service combined with a panel that is derived from one of
> the sample panels: ISREFR01, ISREFR02, ISREFR03, or ISREFR04.
>
>
> https://www.ibm.com/docs/en/zos/2.4.0?topic=edit-providing-customized-browse-panels
>
> This is because ISPF cheats: it doesn't always follow its rules when it is
> doing its own code.
>
>
> If you're using ISREFR02 then the action bar attribute is x'AB'.
>
>
>
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of ITschak Mugzach
> Sent: Tuesday, September 19, 2023 3:52 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: EDIT panel modification
>
> I am trying to add fields to the edit panel after the zCMD field and before
> the dynamic data section. The control characters _ and @ are defined in the
> )ATTR section. When running the program, I am getting an error msg
> "Duplicate action bar field text found in )BODY section." and
>
> Panel line where error was detected:
> .. File. Edit. Edit_Settings. Menu. Utilities. Compilers. Test. Help.
>
> Any idea how to modify the panel to allow these extra fields?
>
>
>  Command ===> Z/ / Scroll ===>
> Z
>  _AK@QIFZDATA _BK@CK
>  ZDATA,ZSHADOW/ /
>  / /
>
> ITschak Mugzach
> *|** IronSphere Platform* *|* *Information Security Continuous Monitoring
> for z/OS, x/Linux & IBM I **| z/VM coming soon  *
>
> --
> 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: Why it's important to take Seymour's advice

[Joseph Reichman]

Hi just did a a SUMM TCBERROR and this is what I got 

Now I was doing something in AMODE 64 prior to the SCHEDIRD But I know I went 
back to AMODE 31

As an side is it better to  USE CRIB to schedule the IRB (in which case it 
returns to me the IRB and I can see what I am scheduling or ) SCHEDIRB

Thank you
 
  IRB: 008FB710   
 KEYSTA... 00WLIC. 00040004  EPA.. 9FF01E81   
 OPSW. 078D  9FF01EA0LINK. 008FEA90   
  
  PRB: 008FEA90   
 WLIC. 00020001  OPSW. 071C1000  852CB728 
 LINK. 018E76D0   
 EP... IKJEFT01  ENTPT 852C5000   

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lennie Dymoke-Bradshaw
Sent: Tuesday, September 19, 2023 11:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

My experience is that in times past this was definitely true. But nowadays it 
no longer is. 
I am unsure what changed but I think there was a change somewhere, possibly in 
the cross-memory instructions.
Lennie

-Original Message-
From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU> > On Behalf Of dailom...@aol.com 
 
Sent: 19 September 2023 16:16
To: IBM-MAIN@LISTSERV.UA.EDU  
Subject: Re: Why it's important to take Seymour's advice

 I think the other address space needs to be nonswappable.


On Tuesday, September 19, 2023 at 09:40:36 AM EDT, Adam Johanson 
<031ca9d720a7-dmarc-requ...@listserv.ua.edu 
 > wrote:  
 
 Tom Brennan wrote:

> I've never written code that runs as an SRB, but over the years I've 
> read about them and seen them in action, such as Omegamon poking code 
> into other address spaces to grab data or do things like zap memory.

For what it's worth, you don't need to go through all the rigamarole of an SRB 
to go poking around in another address space.

Given the proper authorization, you can:

- Issue an AXSET, specifying a value of 1
- Issue an SSAR instruction identifying the target address space as the 
secondary address space
- Use MVCP / MVCS instructions to copy data between your primary address space 
and the secondary address space


There is also the technique of using the special ALET value of x'0001' and 
using AR mode to reference data from another address space.

===
Adam Johanson
Broadcom Mainframe Software Division

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

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

Re: Why it's important to take Seymour's advice

[Binyamin Dissen]

Well, your WCLIC is showing a PIC-4. Wrong key.

As to which to choose, it depends on your environment. SCHEDXIT allows XM but
SCHEDIRB does not. Also, SCHEDXIT allows reuse of the IRB/IQE but SCHEDIRB
reallocates it each time.


On Tue, 19 Sep 2023 12:53:33 -0400 Joseph Reichman 
wrote:

:>Hi just did a a SUMM TCBERROR and this is what I got 
:>
:>Now I was doing something in AMODE 64 prior to the SCHEDIRD But I know I went 
back to AMODE 31
:>
:>As an side is it better to  USE CRIB to schedule the IRB (in which case it 
returns to me the IRB and I can see what I am scheduling or ) SCHEDIRB
:>
:>Thank you
:> 
:>  IRB: 008FB710   
:> KEYSTA... 00WLIC. 00040004  EPA.. 9FF01E81   
:> OPSW. 078D  9FF01EA0LINK. 008FEA90   
:>  
:>  PRB: 008FEA90   
:> WLIC. 00020001  OPSW. 071C1000  852CB728 
:> LINK. 018E76D0   
:> EP... IKJEFT01  ENTPT 852C5000   
:>
:>-Original Message-
:>From: IBM Mainframe Discussion List  On Behalf Of 
Lennie Dymoke-Bradshaw
:>Sent: Tuesday, September 19, 2023 11:25 AM
:>To: IBM-MAIN@LISTSERV.UA.EDU
:>Subject: Re: Why it's important to take Seymour's advice
:>
:>My experience is that in times past this was definitely true. But nowadays it 
no longer is. 
:>I am unsure what changed but I think there was a change somewhere, possibly 
in the cross-memory instructions.
:>Lennie
:>
:>-Original Message-
:>From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU> > On Behalf Of dailom...@aol.com 
 
:>Sent: 19 September 2023 16:16
:>To: IBM-MAIN@LISTSERV.UA.EDU  
:>Subject: Re: Why it's important to take Seymour's advice
:>
:> I think the other address space needs to be nonswappable.
:>
:>
:>On Tuesday, September 19, 2023 at 09:40:36 AM EDT, Adam Johanson 
<031ca9d720a7-dmarc-requ...@listserv.ua.edu 
 > wrote:  
:> 
:> Tom Brennan wrote:
:>
:>> I've never written code that runs as an SRB, but over the years I've 
:>> read about them and seen them in action, such as Omegamon poking code 
:>> into other address spaces to grab data or do things like zap memory.
:>
:>For what it's worth, you don't need to go through all the rigamarole of an 
SRB to go poking around in another address space.
:>
:>Given the proper authorization, you can:
:>
:>- Issue an AXSET, specifying a value of 1
:>- Issue an SSAR instruction identifying the target address space as the 
secondary address space
:>- Use MVCP / MVCS instructions to copy data between your primary address 
space and the secondary address space
:>
:>
:>There is also the technique of using the special ALET value of x'0001' 
and using AR mode to reference data from another address space.
:>
:>===
:>Adam Johanson
:>Broadcom Mainframe Software Division
:>
:>--
:>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
:>
:>--
:>For IBM-MAIN subscribe / signoff / archive access instructions,
:>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel

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

Re: Why it's important to take Seymour's advice

[Tom Brennan]

True, and I've coded cross memory accesses and POST to wake up a TCB (of 
mine) in another address space.  That's all pretty easy.  I can't fully 
remember what Omegamon needed the SRB for but I'm pretty sure I read 
about it in their doc.


On 9/19/2023 6:40 AM, Adam Johanson wrote:

Tom Brennan wrote:


I've never written code that runs as an SRB, but over the years I've
read about them and seen them in action, such as Omegamon poking code
into other address spaces to grab data or do things like zap memory.


For what it's worth, you don't need to go through all the rigamarole of an SRB 
to go poking around in another address space.

Given the proper authorization, you can:

- Issue an AXSET, specifying a value of 1
- Issue an SSAR instruction identifying the target address space as the 
secondary address space
- Use MVCP / MVCS instructions to copy data between your primary address space 
and the secondary address space


There is also the technique of using the special ALET value of x'0001' and 
using AR mode to reference data from another address space.

===
Adam Johanson
Broadcom Mainframe Software Division

--
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: Why it's important to take Seymour's advice

[Seymour J Metz]

It's best to use whichever is fitted to the task at hand. There is no one size 
fits all.


From: IBM Mainframe Discussion List  on behalf of 
Joseph Reichman 
Sent: Tuesday, September 19, 2023 12:53 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

Hi just did a a SUMM TCBERROR and this is what I got

Now I was doing something in AMODE 64 prior to the SCHEDIRD But I know I went 
back to AMODE 31

As an side is it better to  USE CRIB to schedule the IRB (in which case it 
returns to me the IRB and I can see what I am scheduling or ) SCHEDIRB

Thank you

  IRB: 008FB710
 KEYSTA... 00WLIC. 00040004  EPA.. 9FF01E81
 OPSW. 078D  9FF01EA0LINK. 008FEA90

  PRB: 008FEA90
 WLIC. 00020001  OPSW. 071C1000  852CB728
 LINK. 018E76D0
 EP... IKJEFT01  ENTPT 852C5000

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lennie Dymoke-Bradshaw
Sent: Tuesday, September 19, 2023 11:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

My experience is that in times past this was definitely true. But nowadays it 
no longer is.
I am unsure what changed but I think there was a change somewhere, possibly in 
the cross-memory instructions.
Lennie

-Original Message-
From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU> > On Behalf Of dailom...@aol.com 

Sent: 19 September 2023 16:16
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Why it's important to take Seymour's advice

 I think the other address space needs to be nonswappable.


On Tuesday, September 19, 2023 at 09:40:36 AM EDT, Adam Johanson 
<031ca9d720a7-dmarc-requ...@listserv.ua.edu 
 > wrote:

 Tom Brennan wrote:

> I've never written code that runs as an SRB, but over the years I've
> read about them and seen them in action, such as Omegamon poking code
> into other address spaces to grab data or do things like zap memory.

For what it's worth, you don't need to go through all the rigamarole of an SRB 
to go poking around in another address space.

Given the proper authorization, you can:

- Issue an AXSET, specifying a value of 1
- Issue an SSAR instruction identifying the target address space as the 
secondary address space
- Use MVCP / MVCS instructions to copy data between your primary address space 
and the secondary address space


There is also the technique of using the special ALET value of x'0001' and 
using AR mode to reference data from another address space.

===
Adam Johanson
Broadcom Mainframe Software Division

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

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

Test site for certificate revocation?

[Charles Mills]

Does anyone know of a server URL that will present a revoked certificate (for 
my testing purposes)?

There are several that a Google search turns up but

- https://revoked.badssl.com/ is expired and expired certificates are never 
revoked
- https://www.digicert.com/kb/digicert-root-certificates.htm has a bunch of 
revoked test URLs but my client fails on the SNI name, not on revocation. I 
guess I could add an option to make SNI optional but I would rather not do that.

Does anyone have another test site?

You should be able to test it with any browser (assuming it is an https site). 
If you try to open the URL in your browser you should get a "revoked" error.

Thanks!

Charles

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

Re: Why it's important to take Seymour's advice

[Joseph Reichman]

I am looking at the TCB/rb chain in the SVC dump the IRB epa has a 1 as the 
last digit 
I was in amode 31 when I issued schedirb 
The irb address last digit was a 0 before it pc to schedirb 

At this point I’m thinking of using the crib macro to build the irb as it gives 
me more control ie I can look at the irb before it goes to schedirb

Thanks 

> On Sep 19, 2023, at 4:20 PM, Seymour J Metz  wrote:
> 
> It's best to use whichever is fitted to the task at hand. There is no one 
> size fits all.
> 
> 
> From: IBM Mainframe Discussion List  on behalf of 
> Joseph Reichman 
> Sent: Tuesday, September 19, 2023 12:53 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Why it's important to take Seymour's advice
> 
> Hi just did a a SUMM TCBERROR and this is what I got
> 
> Now I was doing something in AMODE 64 prior to the SCHEDIRD But I know I went 
> back to AMODE 31
> 
> As an side is it better to  USE CRIB to schedule the IRB (in which case it 
> returns to me the IRB and I can see what I am scheduling or ) SCHEDIRB
> 
> Thank you
> 
>  IRB: 008FB710
> KEYSTA... 00WLIC. 00040004  EPA.. 9FF01E81
> OPSW. 078D  9FF01EA0LINK. 008FEA90
> 
>  PRB: 008FEA90
> WLIC. 00020001  OPSW. 071C1000  852CB728
> LINK. 018E76D0
> EP... IKJEFT01  ENTPT 852C5000
> 
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Lennie Dymoke-Bradshaw
> Sent: Tuesday, September 19, 2023 11:25 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Why it's important to take Seymour's advice
> 
> My experience is that in times past this was definitely true. But nowadays it 
> no longer is.
> I am unsure what changed but I think there was a change somewhere, possibly 
> in the cross-memory instructions.
> Lennie
> 
> -Original Message-
> From: IBM Mainframe Discussion List   > On Behalf Of dailom...@aol.com 
> 
> Sent: 19 September 2023 16:16
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Subject: Re: Why it's important to take Seymour's advice
> 
> I think the other address space needs to be nonswappable.
> 
> 
>>On Tuesday, September 19, 2023 at 09:40:36 AM EDT, Adam Johanson 
>> <031ca9d720a7-dmarc-requ...@listserv.ua.edu 
>>  > wrote:
>> 
>> Tom Brennan wrote:
>> 
>> I've never written code that runs as an SRB, but over the years I've
>> read about them and seen them in action, such as Omegamon poking code
>> into other address spaces to grab data or do things like zap memory.
> 
> For what it's worth, you don't need to go through all the rigamarole of an 
> SRB to go poking around in another address space.
> 
> Given the proper authorization, you can:
> 
> - Issue an AXSET, specifying a value of 1
> - Issue an SSAR instruction identifying the target address space as the 
> secondary address space
> - Use MVCP / MVCS instructions to copy data between your primary address 
> space and the secondary address space
> 
> 
> There is also the technique of using the special ALET value of x'0001' 
> and using AR mode to reference data from another address space.
> 
> ===
> Adam Johanson
> Broadcom Mainframe Software Division
> 
> --
> 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
> 
> --
> 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: Why it's important to take Seymour's advice

[Seymour J Metz]

Show the code.


From: IBM Mainframe Discussion List  on behalf of 
Joseph Reichman 
Sent: Tuesday, September 19, 2023 7:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

I am looking at the TCB/rb chain in the SVC dump the IRB epa has a 1 as the 
last digit
I was in amode 31 when I issued schedirb
The irb address last digit was a 0 before it pc to schedirb

At this point I’m thinking of using the crib macro to build the irb as it gives 
me more control ie I can look at the irb before it goes to schedirb

Thanks

> On Sep 19, 2023, at 4:20 PM, Seymour J Metz  wrote:
>
> It's best to use whichever is fitted to the task at hand. There is no one 
> size fits all.
>
> 
> From: IBM Mainframe Discussion List  on behalf of 
> Joseph Reichman 
> Sent: Tuesday, September 19, 2023 12:53 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Why it's important to take Seymour's advice
>
> Hi just did a a SUMM TCBERROR and this is what I got
>
> Now I was doing something in AMODE 64 prior to the SCHEDIRD But I know I went 
> back to AMODE 31
>
> As an side is it better to  USE CRIB to schedule the IRB (in which case it 
> returns to me the IRB and I can see what I am scheduling or ) SCHEDIRB
>
> Thank you
>
>  IRB: 008FB710
> KEYSTA... 00WLIC. 00040004  EPA.. 9FF01E81
> OPSW. 078D  9FF01EA0LINK. 008FEA90
>
>  PRB: 008FEA90
> WLIC. 00020001  OPSW. 071C1000  852CB728
> LINK. 018E76D0
> EP... IKJEFT01  ENTPT 852C5000
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Lennie Dymoke-Bradshaw
> Sent: Tuesday, September 19, 2023 11:25 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Why it's important to take Seymour's advice
>
> My experience is that in times past this was definitely true. But nowadays it 
> no longer is.
> I am unsure what changed but I think there was a change somewhere, possibly 
> in the cross-memory instructions.
> Lennie
>
> -Original Message-
> From: IBM Mainframe Discussion List   > On Behalf Of dailom...@aol.com 
> 
> Sent: 19 September 2023 16:16
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Subject: Re: Why it's important to take Seymour's advice
>
> I think the other address space needs to be nonswappable.
>
>
>>On Tuesday, September 19, 2023 at 09:40:36 AM EDT, Adam Johanson 
>> <031ca9d720a7-dmarc-requ...@listserv.ua.edu 
>>  > wrote:
>>
>> Tom Brennan wrote:
>>
>> I've never written code that runs as an SRB, but over the years I've
>> read about them and seen them in action, such as Omegamon poking code
>> into other address spaces to grab data or do things like zap memory.
>
> For what it's worth, you don't need to go through all the rigamarole of an 
> SRB to go poking around in another address space.
>
> Given the proper authorization, you can:
>
> - Issue an AXSET, specifying a value of 1
> - Issue an SSAR instruction identifying the target address space as the 
> secondary address space
> - Use MVCP / MVCS instructions to copy data between your primary address 
> space and the secondary address space
>
>
> There is also the technique of using the special ALET value of x'0001' 
> and using AR mode to reference data from another address space.
>
> ===
> Adam Johanson
> Broadcom Mainframe Software Division
>
> --
> 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
>
> --
> 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: Test site for certificate revocation?

[Tom Brennan]

I have at least one expired cert on a web site I can use for testing, 
but that doesn't seem to be what you want.  You want something 
specifically marked as revoked, right?


So I just went to zerossl.com (what I use) and issued a revoke for a 
cert.  Zerossl's web site marks it as revoked.  Of course that doesn't 
affect the use of that cert on the web site, so I basically don't 
understand what the use of "revoked" might be.  If zerossl DID mark the 
actual certificate file/key, I'll never know because there's no option 
to download once revoked.


And just do Darren doesn't banish me, these are certs running on an x86 
Linux box under my desk, but I'm thinking of moving them to a new z16. 
It will have to be the new AGZ rack-mount in order to fit under my desk.


On 9/19/2023 3:37 PM, Charles Mills wrote:

Does anyone know of a server URL that will present a revoked certificate (for 
my testing purposes)?

There are several that a Google search turns up but

- https://revoked.badssl.com/ is expired and expired certificates are never 
revoked
- https://www.digicert.com/kb/digicert-root-certificates.htm has a bunch of 
revoked test URLs but my client fails on the SNI name, not on revocation. I 
guess I could add an option to make SNI optional but I would rather not do that.

Does anyone have another test site?

You should be able to test it with any browser (assuming it is an https site). If you try 
to open the URL in your browser you should get a "revoked" error.

Thanks!

Charles

--
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: Test site for certificate revocation?

[Charles Mills]

Ditto -- my client is running on z/OS, Darren! System SSL and RACF!

Seriously, if you have revoked the certificate used by a Web server then a 
conforming browser should refuse to connect, of at least complain loudly.

Can you give me the URL and port? Off-list if you prefer. I will let you know 
what I see.

Charles

On Tue, 19 Sep 2023 17:12:04 -0700, Tom Brennan  
wrote:

>So I just went to zerossl.com (what I use) and issued a revoke for a
>cert.  Zerossl's web site marks it as revoked.  Of course that doesn't
>affect the use of that cert on the web site, so I basically don't
>understand what the use of "revoked" might be.  If zerossl DID mark the
>actual certificate file/key, I'll never know because there's no option
>to download once revoked.
>
>And just do Darren doesn't banish me, these are certs running on an x86
>Linux box under my desk, but I'm thinking of moving them to a new z16.

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

Re: Test site for certificate revocation?

[Tom Brennan]

I'll email...

On 9/19/2023 5:23 PM, Charles Mills wrote:

Ditto -- my client is running on z/OS, Darren! System SSL and RACF!

Seriously, if you have revoked the certificate used by a Web server then a 
conforming browser should refuse to connect, of at least complain loudly.

Can you give me the URL and port? Off-list if you prefer. I will let you know 
what I see.

Charles

On Tue, 19 Sep 2023 17:12:04 -0700, Tom Brennan  
wrote:


So I just went to zerossl.com (what I use) and issued a revoke for a
cert.  Zerossl's web site marks it as revoked.  Of course that doesn't
affect the use of that cert on the web site, so I basically don't
understand what the use of "revoked" might be.  If zerossl DID mark the
actual certificate file/key, I'll never know because there's no option
to download once revoked.

And just do Darren doesn't banish me, these are certs running on an x86
Linux box under my desk, but I'm thinking of moving them to a new z16.


--
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: Why it's important to take Seymour's advice

[Joseph Reichman]

Here it is 

As it was recommended to issue SCHEDIRB From an IRB I issue it from a STIMER 
routine

I'll start with the STIMERM I use STIMERM as opposed to STIMER because it lets 
my pass a parameter (which is the save area for 13)

 STIMERM SET,  X
   ID=TIMER,   X
   BINTVL=NOW, X
   ERRET=ERROR,X
   EXIT=STIMER,X
   PARM=TIMER_PLIST,   X
   WAIT=NO,MF=(E,TIMERLST)


STIMER   DS   0D
  STM  R14,R12,12(R13)   
 *   
  LRR4,R15   
  DROP  R3   
  USING STIMER,R4
  LRR10,R13  
  L R13,4(,R1)Get Save area  
  DROP  R13  
  USING TIMERSVE,R13 
  STR10,4(R13)   
 *   
  SETLOCK OBTAIN,TYPE=LOCAL,MODE=UNCOND,REGS=SAVE
 *   
 *   
 *  Chain rb pointer to put this IRB as next 
 * 
  LAR5,IRBPTR
  O R5,=X'8000'  
  STR5,IRBADD
  L R6,PSATOLD   
  USING TCB,R6   
  L R6,TCBJSTCB   Get the Job Step tcb   
  STR6,JSTCB 
  SCHEDIRB EPPTR=IRBADD,X
TCBPTR=JSTCB,   X
SVAREA=YES, X
MODE=SUPR,  X
KEY=SUPR,   X
PARAMPTR=PLIST, X
MF=(E,IRBLST)
  SETLOCK RELEASE,TYPE=LOCAL,REGS=SAVE   
 *   
 *   
  LR13,4(,R13)   
  XR   R15,R14  
  LR14,12(R13)   
  LM   R0,R12,20(R13)
  BR   R14   
  DROP  R13  
  USING WORKAREA,R13 
  DROP  R4   
 IRBPTR   DS0D   
 *   
  STM  R14,R12,12(R13)   
  LRR5,R15   
  USING IRBPTR,R5
  LRR10,R1Save Plist pointer 
  LOAD  EP=GETVECT   
  STR0,0(R10) Store Pointer  
  XRR15,R15  
  L R14,12(R13)  
  LMR0,R12,20(R13)   
  BRR14  
  DROP  R5


 WORKAREA DSECT  
 SAVEAREA DS 18F 
 TIMERSVE DS 18F 
  DS 0D  
 TIMERDSF 

Re: Test site for certificate revocation?

[Andrew Rowley]

On 20/09/2023 8:37 am, Charles Mills wrote:

Does anyone know of a server URL that will present a revoked certificate (for 
my testing purposes)?


Can you create a certificate for your own test site with Lets Encrypt, 
then revoke it?


--
Andrew Rowley
Black Hill Software

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

Re: Test site for certificate revocation?

[Charles Mills]

Yes, that should work. However I don't have an appropriate test server. 

Yes, I could set one up ...

Charles

On Wed, 20 Sep 2023 10:36:30 +1000, Andrew Rowley 
 wrote:

>On 20/09/2023 8:37 am, Charles Mills wrote:
>> Does anyone know of a server URL that will present a revoked certificate 
>> (for my testing purposes)?
>
>Can you create a certificate for your own test site with Lets Encrypt,
>then revoke it?

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

Re: Why it's important to take Seymour's advice

[Seymour J Metz]

> 
As it was recommended to issue SCHEDIRB From an IRB I issue it from a STIMER 
routine

The devil is in the details. As coded that does not apply.

>SVAREA=YES,
>MODE=SUPR,  

One or the other but not both.

>  XR   R15,R14

  XR   R15,R15

Your choice of names and your comments are confusing; IRBPTR is code, not a 
pointer, and you're not doing anything with an RB when the comment says "Chain 
rb pointer to put this IRB as next".

Note: if you really need the exit to get control in SM then you shouldn't save 
the registers. The manual spells that out.

That said, I don't see what's setting bit 31.


From: IBM Mainframe Discussion List  on behalf of 
Joseph Reichman 
Sent: Tuesday, September 19, 2023 8:29 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

Here it is

As it was recommended to issue SCHEDIRB From an IRB I issue it from a STIMER 
routine

I'll start with the STIMERM I use STIMERM as opposed to STIMER because it lets 
my pass a parameter (which is the save area for 13)

 STIMERM SET,  X
   ID=TIMER,   X
   BINTVL=NOW, X
   ERRET=ERROR,X
   EXIT=STIMER,X
   PARM=TIMER_PLIST,   X
   WAIT=NO,MF=(E,TIMERLST)


STIMER   DS   0D
  STM  R14,R12,12(R13)
 *
  LRR4,R15
  DROP  R3
  USING STIMER,R4
  LRR10,R13
  L R13,4(,R1)Get Save area
  DROP  R13
  USING TIMERSVE,R13
  STR10,4(R13)
 *
  SETLOCK OBTAIN,TYPE=LOCAL,MODE=UNCOND,REGS=SAVE
 *
 *
 *  Chain rb pointer to put this IRB as next
 *
  LAR5,IRBPTR
  O R5,=X'8000'
  STR5,IRBADD
  L R6,PSATOLD
  USING TCB,R6
  L R6,TCBJSTCB   Get the Job Step tcb
  STR6,JSTCB
  SCHEDIRB EPPTR=IRBADD,X
TCBPTR=JSTCB,   X
SVAREA=YES, X
MODE=SUPR,  X
KEY=SUPR,   X
PARAMPTR=PLIST, X
MF=(E,IRBLST)
  SETLOCK RELEASE,TYPE=LOCAL,REGS=SAVE
 *
 *
  LR13,4(,R13)
  XR   R15,R14
  LR14,12(R13)
  LM   R0,R12,20(R13)
  BR   R14
  DROP  R13
  USING WORKAREA,R13
  DROP  R4
 IRBPTR   DS0D
 *
  STM  R14,R12,12(R13)
  LRR5,R15
  USING IRBPTR,R5
  LRR10,R1Save Plist pointer
  LOAD  EP=GETVECT
  STR0,0(R10) Store Pointer
  XRR15,R15
  L R14,12(R13)
  LMR0,R12,20(R13)
  BRR14
  DROP  R5


 WORKAREA DSECT
 SAVEAREA DS 18F
 TIMERSVE DS 18F
  DS 0D
 TIMERDSF
 PARMPTR  DSA
 FADDRDSA
 DEPARM   DESERV MF=L
 CSVLMPEA DSCL(LPMEA_LEN)
 DELENEQU   *-DEPARM
  SCHEDIRB MF=(L,IRBLST)
  CSVQUERY MF=(L,CSVQUERY)
 TIMERLST STIMERM SET,MF=L
 PLISTDS0A
  DSA
 TIMER_PLIST DS  A
 DESPTR   DSA
 IRBADD   DSA
JSTCBDSA
T
T
T
-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Tuesday, September 19, 2023 8:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

Show the code.


From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU> > on behalf of Joseph Reichman 
mailto:reichman...@gmail.com> >
Sent: Tuesday, September 19, 2023 7:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Why it's important to take Seymour's advice

I am looking at the TCB/rb chain in the SVC dump the IRB epa has a 1 as the 
last digit I was in amode 31 when I issued schedirb The irb address last digit 
was a 0 before it pc to schedirb

At this point I’m thinking of using the crib macro to build the irb as it gives 
me more control ie I can look at the irb before it goes to schedirb

Thanks

> On Sep 19, 2023, at 4:20 PM, Seymour J Metz   > wrote:
>
> It's best to use whichever is fitted to the task at hand. There is no one 
> size fits all.
>
> 
> From: IBM Mainframe Discussion List

Re: Why it's important to take Seymour's advice

[Joseph Reichman]

I have a O R5,=X’8000’
To set bit 31

Not home now but I’ll look up and check the SCHEDIRB again

Get Outlook for iOS

From: IBM Mainframe Discussion List  on behalf of 
Seymour J Metz 
Sent: Tuesday, September 19, 2023 9:07:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Why it's important to take Seymour's advice

>
As it was recommended to issue SCHEDIRB From an IRB I issue it from a STIMER 
routine

The devil is in the details. As coded that does not apply.

>SVAREA=YES,
>MODE=SUPR,

One or the other but not both.

>  XR   R15,R14

  XR   R15,R15

Your choice of names and your comments are confusing; IRBPTR is code, not a 
pointer, and you're not doing anything with an RB when the comment says "Chain 
rb pointer to put this IRB as next".

Note: if you really need the exit to get control in SM then you shouldn't save 
the registers. The manual spells that out.

That said, I don't see what's setting bit 31.


From: IBM Mainframe Discussion List  on behalf of 
Joseph Reichman 
Sent: Tuesday, September 19, 2023 8:29 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

Here it is

As it was recommended to issue SCHEDIRB From an IRB I issue it from a STIMER 
routine

I'll start with the STIMERM I use STIMERM as opposed to STIMER because it lets 
my pass a parameter (which is the save area for 13)

 STIMERM SET,  X
   ID=TIMER,   X
   BINTVL=NOW, X
   ERRET=ERROR,X
   EXIT=STIMER,X
   PARM=TIMER_PLIST,   X
   WAIT=NO,MF=(E,TIMERLST)


STIMER   DS   0D
  STM  R14,R12,12(R13)
 *
  LRR4,R15
  DROP  R3
  USING STIMER,R4
  LRR10,R13
  L R13,4(,R1)Get Save area
  DROP  R13
  USING TIMERSVE,R13
  STR10,4(R13)
 *
  SETLOCK OBTAIN,TYPE=LOCAL,MODE=UNCOND,REGS=SAVE
 *
 *
 *  Chain rb pointer to put this IRB as next
 *
  LAR5,IRBPTR
  O R5,=X'8000'
  STR5,IRBADD
  L R6,PSATOLD
  USING TCB,R6
  L R6,TCBJSTCB   Get the Job Step tcb
  STR6,JSTCB
  SCHEDIRB EPPTR=IRBADD,X
TCBPTR=JSTCB,   X
SVAREA=YES, X
MODE=SUPR,  X
KEY=SUPR,   X
PARAMPTR=PLIST, X
MF=(E,IRBLST)
  SETLOCK RELEASE,TYPE=LOCAL,REGS=SAVE
 *
 *
  LR13,4(,R13)
  XR   R15,R14
  LR14,12(R13)
  LM   R0,R12,20(R13)
  BR   R14
  DROP  R13
  USING WORKAREA,R13
  DROP  R4
 IRBPTR   DS0D
 *
  STM  R14,R12,12(R13)
  LRR5,R15
  USING IRBPTR,R5
  LRR10,R1Save Plist pointer
  LOAD  EP=GETVECT
  STR0,0(R10) Store Pointer
  XRR15,R15
  L R14,12(R13)
  LMR0,R12,20(R13)
  BRR14
  DROP  R5


 WORKAREA DSECT
 SAVEAREA DS 18F
 TIMERSVE DS 18F
  DS 0D
 TIMERDSF
 PARMPTR  DSA
 FADDRDSA
 DEPARM   DESERV MF=L
 CSVLMPEA DSCL(LPMEA_LEN)
 DELENEQU   *-DEPARM
  SCHEDIRB MF=(L,IRBLST)
  CSVQUERY MF=(L,CSVQUERY)
 TIMERLST STIMERM SET,MF=L
 PLISTDS0A
  DSA
 TIMER_PLIST DS  A
 DESPTR   DSA
 IRBADD   DSA
JSTCBDSA
T
T
T
-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Tuesday, September 19, 2023 8:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

Show the code.


From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU> > on behalf of Joseph Reichman 
mailto:reichman...@gmail.com> >
Sent: Tuesday, September 19, 2023 7:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Why it's important to take Seymour's advice

I am looking at the TCB/rb chain in the SVC dump the IRB epa has a 1 as the 
last digit I was in amode 31 when I issued schedirb The irb address last digit 
was a 0 before it pc to schedirb

At this point I’m thinking of using the crib macro to build the irb as it gives 
me more control ie I can look at the irb before i

Re: Why it's important to take Seymour's advice

[Seymour J Metz]

That's bit 0.


From: IBM Mainframe Discussion List  on behalf of 
Joseph Reichman 
Sent: Tuesday, September 19, 2023 9:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

I have a O R5,=X’8000’
To set bit 31

Not home now but I’ll look up and check the SCHEDIRB again

Get Outlook for iOS

From: IBM Mainframe Discussion List  on behalf of 
Seymour J Metz 
Sent: Tuesday, September 19, 2023 9:07:18 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Why it's important to take Seymour's advice

>
As it was recommended to issue SCHEDIRB From an IRB I issue it from a STIMER 
routine

The devil is in the details. As coded that does not apply.

>SVAREA=YES,
>MODE=SUPR,

One or the other but not both.

>  XR   R15,R14

  XR   R15,R15

Your choice of names and your comments are confusing; IRBPTR is code, not a 
pointer, and you're not doing anything with an RB when the comment says "Chain 
rb pointer to put this IRB as next".

Note: if you really need the exit to get control in SM then you shouldn't save 
the registers. The manual spells that out.

That said, I don't see what's setting bit 31.


From: IBM Mainframe Discussion List  on behalf of 
Joseph Reichman 
Sent: Tuesday, September 19, 2023 8:29 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

Here it is

As it was recommended to issue SCHEDIRB From an IRB I issue it from a STIMER 
routine

I'll start with the STIMERM I use STIMERM as opposed to STIMER because it lets 
my pass a parameter (which is the save area for 13)

 STIMERM SET,  X
   ID=TIMER,   X
   BINTVL=NOW, X
   ERRET=ERROR,X
   EXIT=STIMER,X
   PARM=TIMER_PLIST,   X
   WAIT=NO,MF=(E,TIMERLST)


STIMER   DS   0D
  STM  R14,R12,12(R13)
 *
  LRR4,R15
  DROP  R3
  USING STIMER,R4
  LRR10,R13
  L R13,4(,R1)Get Save area
  DROP  R13
  USING TIMERSVE,R13
  STR10,4(R13)
 *
  SETLOCK OBTAIN,TYPE=LOCAL,MODE=UNCOND,REGS=SAVE
 *
 *
 *  Chain rb pointer to put this IRB as next
 *
  LAR5,IRBPTR
  O R5,=X'8000'
  STR5,IRBADD
  L R6,PSATOLD
  USING TCB,R6
  L R6,TCBJSTCB   Get the Job Step tcb
  STR6,JSTCB
  SCHEDIRB EPPTR=IRBADD,X
TCBPTR=JSTCB,   X
SVAREA=YES, X
MODE=SUPR,  X
KEY=SUPR,   X
PARAMPTR=PLIST, X
MF=(E,IRBLST)
  SETLOCK RELEASE,TYPE=LOCAL,REGS=SAVE
 *
 *
  LR13,4(,R13)
  XR   R15,R14
  LR14,12(R13)
  LM   R0,R12,20(R13)
  BR   R14
  DROP  R13
  USING WORKAREA,R13
  DROP  R4
 IRBPTR   DS0D
 *
  STM  R14,R12,12(R13)
  LRR5,R15
  USING IRBPTR,R5
  LRR10,R1Save Plist pointer
  LOAD  EP=GETVECT
  STR0,0(R10) Store Pointer
  XRR15,R15
  L R14,12(R13)
  LMR0,R12,20(R13)
  BRR14
  DROP  R5


 WORKAREA DSECT
 SAVEAREA DS 18F
 TIMERSVE DS 18F
  DS 0D
 TIMERDSF
 PARMPTR  DSA
 FADDRDSA
 DEPARM   DESERV MF=L
 CSVLMPEA DSCL(LPMEA_LEN)
 DELENEQU   *-DEPARM
  SCHEDIRB MF=(L,IRBLST)
  CSVQUERY MF=(L,CSVQUERY)
 TIMERLST STIMERM SET,MF=L
 PLISTDS0A
  DSA
 TIMER_PLIST DS  A
 DESPTR   DSA
 IRBADD   DSA
JSTCBDSA
T
T
T
-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Seymour J Metz
Sent: Tuesday, September 19, 2023 8:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Why it's important to take Seymour's advice

Show the code.


From: IBM Mainframe Discussion List mailto:IBM-MAIN@LISTSERV.UA.EDU> > on behalf of Joseph Reichman 
mailto:reichman...@gmail.com> >
Sent: Tuesday, September 19, 2023 7:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Why it's important to take Seymour's advice

I am looking at the TCB/rb chain in the SVC dump the IRB epa has a 1

Re: Is SMP/E needed for installs?

[Peter Hannigan]

> -Original Message-
> 
> Date:Tue, 5 Sep 2023 17:34:17 -0400
> From:Phil Smith III 
> Subject: Re: Is SMP/E needed for installs?
> 
.
.
> 2.On the SMP/E RECEIVE command, I believe that in 99.44% (or higher)
> cases, an RPREFIX will be needed. And I can specify this using a variable
> (now!). In the unlikely event that no RPREFIX is needed, it appears from
> my testing that you cannot just say
>RECEIVE SYSMODS RFPREFIX() .
> or, more precisely:
>   RECEIVE SYSMODS RFPREFIX(&RPREFIX) .
> where &RPREFIX is null. Is that correct? I can handle this via doc and
> comments, but of course would rather not if there's a way around it.
> 

If the length of the prefix can be limited to seven characters then this can be 
used:

// SET Q=
// SET RPREFIX=
// SET RFPFXPRM=
.
.
// SET RPREFIX=prefix  When needed
.
.
// SET A=&RPREFIX
// SET A&RPREFIX=' '
// SET O=&A,RFPFXPRM=&Q.RFPREFIX(&RPREFIX)&Q
.
.
RECEIVE SYSMODS &RFPFXPRM .


If an eight character prefix must be allowed then use a blank as its default 
value:

// SET Q=
// SET RPREFIX=' '
// SET RFPFXPRM=
.
.
// SET RPREFIX=prefix  When needed
.
.
// SET O=&RPREFIX,RFPFXPRM=&Q.RFPREFIX(&RPREFIX)&Q
.
.
RECEIVE SYSMODS &RFPFXPRM .


I've used both techniques, the second often, the first not so much.


Peter Hannigan
Kyndryl


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

Re: z/OSMF and Zowe

[Brian Westerman]

I believe you can still order CBIPO, but z/OSMF does (unfortunately) seem to be 
the way IBM wants everyone to go.  I personally disagree with z/OSMF for many 
reasons (most of them due to overhead and capability restrictions), but mine 
seems to be a waste of breath.  :)

Any way ZOWE is open source, and many shops won't allow that.  It's actually a 
pretty good idea, but still some shops see open source as inherently evil. 

Brian

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