Re: DFSORT and "IF exist"

2021-09-06 Thread Bernd Oppolzer

Thanks, this looks very good;
the header on page 14 describes exactly what I had in mind:

Join fields from two files on a key
In this section, we show some tricks for joining fields from two files 
in different ways using the JOINKEYS

function of DFSORT

Radoslaw will sure be able to do the rest for his specific situation

Kind regards

Bernd


Am 07.09.2021 um 00:46 schrieb Joe Monk:

I would suggest using DFSORT with JOINKEYS.

See the example on page 15 here:
https://www.ibm.com/support/pages/system/files/inline-files/$FILE/sorttrck.pdf

Joe


On Mon, Sep 6, 2021 at 4:24 PM Bernd Oppolzer 
wrote:


Hi Radoslaw,

I am not a DFSORT wizard, but:

this is similar to a INNER JOIN SQL query;
if I had a DB2 system at hand, I would load the SUM and ABC records into
two different
DB2 tables and do a SELECT statement involving an inner join, this would
give the desired result.

Maybe the same can be done using a clever MERGE statement using DFSORT,
but I don't know the control file syntax for this;
I can imagine building the two extracts (SUM and ABC, giving two work
files),
but then a third MERGE-SORT should combine the two input files and
produce output records
only, when certain keys in the input files match.
Maybe another person knows how to do this with DFSORT;
I am almost sure that this is possible.

Kind regards

Bernd


Am 06.09.2021 um 21:41 schrieb Radoslaw Skorupka:

I have the following task to do:

PS file, VB records, different types.
Two types are in scope of interest:
SUMeeeNAME123456eee...
ABCeNAME123456e

SUM and ABC are record identifiers.
NAME123456 is 10-char field I need to analyze
e is irrelevant content.


The goal is to get list of NAMEs from ABC record, but only if exist
SUM record with same NAME value.
Example:
input file
SUM   JOHN123456
SUM   BILL123456
ABC  JOHN123456 anything
ABC  JOHN123456 anythin2
XYZ irrelevant record
ABC  MARIA23456 eee
WW$ another irrelevant record
ABC  JOHN123456 anythin3
...
NAME in SUM is (10,10) - (offset,lentgh)
NAME in ABC is (92,10)
RECFM=VB  => add 4 to offset

desired output:
ABC  JOHN123456 anything
ABC  JOHN123456 anythin2
ABC  JOHN123456 anythin3

MARIA and BILL are excluded


The only idea which come to my mind is to prepare two extracts and
then use REXX script, which is far from efficient.

Any clue?



--
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: RENT binder option - note of thanks!

2021-09-06 Thread Lennie Dymoke-Bradshaw
Doh...
Like count = Like count + 1

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Lennie Bradshaw
Sent: 07 September 2021 00:06
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RENT binder option - note of thanks!

Like count = Link count + 1

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Tom 
Brennan
Sent: 06 September 2021 22:02
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RENT binder option - note of thanks!

Like count=1

On 9/6/2021 1:15 PM, Mike Hochee wrote:
> Just a word of thanks to the IBM heavyweights (Jim, Peter, Sri, et. al.) to 
> whom a debt of gratitude is owed for their deep-water expertise, patience, 
> and willingness to share knowledge when they undoubtedly have many other 
> things to work on.
> 
> I suspect there are many subscriber motivations for posting on this forum, 
> some obvious and simple: wrestling with a problem for days and pulling hair 
> out, making known a potentially serious 'gotcha', or 'Hey, that happened to 
> me!' and therefore sharing the love. There are undoubtedly other motivations 
> for posting that are not so obvious, and disappointingly some of these often 
> muddy the waters and result in very large waste-of-time threads for the vast 
> majority of subscribers, but might however serve to satisfy the personal and 
> non-technical needs of a few folks.
> 
> Charles' suggestion of a 'Like' button hit the nail on the head. A mechanism 
> for informing personally needy folks that they are no longer enlightening, 
> but instead engaging in an unwelcome behavior. Yes, they did play well with 
> others for a while, but eventually felt a  compelling need to make love to 
> their egos in a public forum, a forum designed to assist folks with deeper 
> technical issues.
> 
> The downside is often evidenced by a dozens of emails rather than 5 or 10.  A 
> much more serious downside is that the patience of our excellent IBM 
> resources might eventually wear thin, I know mine would.
> 
> HTH,
> Mike
> 
> --
> 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: RENT binder option - note of thanks!

2021-09-06 Thread Lennie Bradshaw
Like count = Link count + 1

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Tom 
Brennan
Sent: 06 September 2021 22:02
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RENT binder option - note of thanks!

Like count=1

On 9/6/2021 1:15 PM, Mike Hochee wrote:
> Just a word of thanks to the IBM heavyweights (Jim, Peter, Sri, et. al.) to 
> whom a debt of gratitude is owed for their deep-water expertise, patience, 
> and willingness to share knowledge when they undoubtedly have many other 
> things to work on.
> 
> I suspect there are many subscriber motivations for posting on this forum, 
> some obvious and simple: wrestling with a problem for days and pulling hair 
> out, making known a potentially serious 'gotcha', or 'Hey, that happened to 
> me!' and therefore sharing the love. There are undoubtedly other motivations 
> for posting that are not so obvious, and disappointingly some of these often 
> muddy the waters and result in very large waste-of-time threads for the vast 
> majority of subscribers, but might however serve to satisfy the personal and 
> non-technical needs of a few folks.
> 
> Charles' suggestion of a 'Like' button hit the nail on the head. A mechanism 
> for informing personally needy folks that they are no longer enlightening, 
> but instead engaging in an unwelcome behavior. Yes, they did play well with 
> others for a while, but eventually felt a  compelling need to make love to 
> their egos in a public forum, a forum designed to assist folks with deeper 
> technical issues.
> 
> The downside is often evidenced by a dozens of emails rather than 5 or 10.  A 
> much more serious downside is that the patience of our excellent IBM 
> resources might eventually wear thin, I know mine would.
> 
> HTH,
> Mike
> 
> --
> 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: DFSORT and "IF exist"

2021-09-06 Thread Joe Monk
I would suggest using DFSORT with JOINKEYS.

See the example on page 15 here:
https://www.ibm.com/support/pages/system/files/inline-files/$FILE/sorttrck.pdf

Joe


On Mon, Sep 6, 2021 at 4:24 PM Bernd Oppolzer 
wrote:

> Hi Radoslaw,
>
> I am not a DFSORT wizard, but:
>
> this is similar to a INNER JOIN SQL query;
> if I had a DB2 system at hand, I would load the SUM and ABC records into
> two different
> DB2 tables and do a SELECT statement involving an inner join, this would
> give the desired result.
>
> Maybe the same can be done using a clever MERGE statement using DFSORT,
> but I don't know the control file syntax for this;
> I can imagine building the two extracts (SUM and ABC, giving two work
> files),
> but then a third MERGE-SORT should combine the two input files and
> produce output records
> only, when certain keys in the input files match.
> Maybe another person knows how to do this with DFSORT;
> I am almost sure that this is possible.
>
> Kind regards
>
> Bernd
>
>
> Am 06.09.2021 um 21:41 schrieb Radoslaw Skorupka:
> > I have the following task to do:
> >
> > PS file, VB records, different types.
> > Two types are in scope of interest:
> > SUMeeeNAME123456eee...
> > ABCeNAME123456e
> >
> > SUM and ABC are record identifiers.
> > NAME123456 is 10-char field I need to analyze
> > e is irrelevant content.
> >
> >
> > The goal is to get list of NAMEs from ABC record, but only if exist
> > SUM record with same NAME value.
> > Example:
> > input file
> > SUM   JOHN123456
> > SUM   BILL123456
> > ABC  JOHN123456 anything
> > ABC  JOHN123456 anythin2
> > XYZ irrelevant record
> > ABC  MARIA23456 eee
> > WW$ another irrelevant record
> > ABC  JOHN123456 anythin3
> > ...
> > NAME in SUM is (10,10) - (offset,lentgh)
> > NAME in ABC is (92,10)
> > RECFM=VB  => add 4 to offset
> >
> > desired output:
> > ABC  JOHN123456 anything
> > ABC  JOHN123456 anythin2
> > ABC  JOHN123456 anythin3
> >
> > MARIA and BILL are excluded
> >
> >
> > The only idea which come to my mind is to prepare two extracts and
> > then use REXX script, which is far from efficient.
> >
> > Any clue?
> >
> >
>
> --
> 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: DFSORT and "IF exist"

2021-09-06 Thread Bernd Oppolzer

Hi Radoslaw,

I am not a DFSORT wizard, but:

this is similar to a INNER JOIN SQL query;
if I had a DB2 system at hand, I would load the SUM and ABC records into 
two different
DB2 tables and do a SELECT statement involving an inner join, this would 
give the desired result.


Maybe the same can be done using a clever MERGE statement using DFSORT,
but I don't know the control file syntax for this;
I can imagine building the two extracts (SUM and ABC, giving two work 
files),
but then a third MERGE-SORT should combine the two input files and 
produce output records

only, when certain keys in the input files match.
Maybe another person knows how to do this with DFSORT;
I am almost sure that this is possible.

Kind regards

Bernd


Am 06.09.2021 um 21:41 schrieb Radoslaw Skorupka:

I have the following task to do:

PS file, VB records, different types.
Two types are in scope of interest:
SUMeeeNAME123456eee...
ABCeNAME123456e

SUM and ABC are record identifiers.
NAME123456 is 10-char field I need to analyze
e is irrelevant content.


The goal is to get list of NAMEs from ABC record, but only if exist 
SUM record with same NAME value.

Example:
input file
SUM   JOHN123456
SUM   BILL123456
ABC  JOHN123456 anything
ABC  JOHN123456 anythin2
XYZ irrelevant record
ABC  MARIA23456 eee
WW$ another irrelevant record
ABC  JOHN123456 anythin3
...
NAME in SUM is (10,10) - (offset,lentgh)
NAME in ABC is (92,10)
RECFM=VB  => add 4 to offset

desired output:
ABC  JOHN123456 anything
ABC  JOHN123456 anythin2
ABC  JOHN123456 anythin3

MARIA and BILL are excluded


The only idea which come to my mind is to prepare two extracts and 
then use REXX script, which is far from efficient.


Any clue?




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


Re: RENT binder option - note of thanks!

2021-09-06 Thread Tom Brennan

Like count=1

On 9/6/2021 1:15 PM, Mike Hochee wrote:

Just a word of thanks to the IBM heavyweights (Jim, Peter, Sri, et. al.) to 
whom a debt of gratitude is owed for their deep-water expertise, patience, and 
willingness to share knowledge when they undoubtedly have many other things to 
work on.

I suspect there are many subscriber motivations for posting on this forum, some 
obvious and simple: wrestling with a problem for days and pulling hair out, 
making known a potentially serious 'gotcha', or 'Hey, that happened to me!' and 
therefore sharing the love. There are undoubtedly other motivations for posting 
that are not so obvious, and disappointingly some of these often muddy the 
waters and result in very large waste-of-time threads for the vast majority of 
subscribers, but might however serve to satisfy the personal and non-technical 
needs of a few folks.

Charles' suggestion of a 'Like' button hit the nail on the head. A mechanism 
for informing personally needy folks that they are no longer enlightening, but 
instead engaging in an unwelcome behavior. Yes, they did play well with others 
for a while, but eventually felt a  compelling need to make love to their egos 
in a public forum, a forum designed to assist folks with deeper technical 
issues.

The downside is often evidenced by a dozens of emails rather than 5 or 10.  A 
much more serious downside is that the patience of our excellent IBM resources 
might eventually wear thin, I know mine would.

HTH,
Mike

--
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: RENT binder option - note of thanks!

2021-09-06 Thread Mike Hochee
Just a word of thanks to the IBM heavyweights (Jim, Peter, Sri, et. al.) to 
whom a debt of gratitude is owed for their deep-water expertise, patience, and 
willingness to share knowledge when they undoubtedly have many other things to 
work on. 

I suspect there are many subscriber motivations for posting on this forum, some 
obvious and simple: wrestling with a problem for days and pulling hair out, 
making known a potentially serious 'gotcha', or 'Hey, that happened to me!' and 
therefore sharing the love. There are undoubtedly other motivations for posting 
that are not so obvious, and disappointingly some of these often muddy the 
waters and result in very large waste-of-time threads for the vast majority of 
subscribers, but might however serve to satisfy the personal and non-technical 
needs of a few folks. 

Charles' suggestion of a 'Like' button hit the nail on the head. A mechanism 
for informing personally needy folks that they are no longer enlightening, but 
instead engaging in an unwelcome behavior. Yes, they did play well with others 
for a while, but eventually felt a  compelling need to make love to their egos 
in a public forum, a forum designed to assist folks with deeper technical 
issues. 

The downside is often evidenced by a dozens of emails rather than 5 or 10.  A 
much more serious downside is that the patience of our excellent IBM resources 
might eventually wear thin, I know mine would.  

HTH, 
Mike  

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


DFSORT and "IF exist"

2021-09-06 Thread Radoslaw Skorupka

I have the following task to do:

PS file, VB records, different types.
Two types are in scope of interest:
SUMeeeNAME123456eee...
ABCeNAME123456e

SUM and ABC are record identifiers.
NAME123456 is 10-char field I need to analyze
e is irrelevant content.


The goal is to get list of NAMEs from ABC record, but only if exist SUM 
record with same NAME value.

Example:
input file
SUM   JOHN123456
SUM   BILL123456
ABC  JOHN123456 anything
ABC  JOHN123456 anythin2
XYZ irrelevant record
ABC  MARIA23456 eee
WW$ another irrelevant record
ABC  JOHN123456 anythin3
...
NAME in SUM is (10,10) - (offset,lentgh)
NAME in ABC is (92,10)
RECFM=VB  => add 4 to offset

desired output:
ABC  JOHN123456 anything
ABC  JOHN123456 anythin2
ABC  JOHN123456 anythin3

MARIA and BILL are excluded


The only idea which come to my mind is to prepare two extracts and then 
use REXX script, which is far from efficient.


Any clue?


--
Radoslaw Skorupka
Lodz, Poland

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


Re: RENT binder option

2021-09-06 Thread Seymour J Metz
A module in an authorized concatenation with  the RENT attribute will go into 
SP 252 key 0 storage even if it doesn't have the REFR attribute. I don't recall 
whether it will also be page protected. With some changes in detail, that 
behavior goes all the way back to OS/360 MVT.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Monday, September 6, 2021 12:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RENT binder option

On Sat, 4 Sep 2021 18:34:36 +1000, Andrew Rowley wrote:
>...
>I ran into this many years ago when I "cleaned up" and removed an empty
>library from the STEPLIB of one of our subsystems. That suddenly meant
>that the STEPLIB was considered APF authorized, which resulted in S0C4
>abends when the subsystem was started and it tried to store information
>in its RENT load module.
>]
Will a module loaded from an APF authorized library and marked RENT but
not REFR be placed in write protected storage?

It might have been cleaner yet to move the offending module to the unauthorized
library, removing the incentive for future "clean up".

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


Re: RENT binder option

2021-09-06 Thread Paul Gilmartin
On Sat, 4 Sep 2021 18:34:36 +1000, Andrew Rowley wrote:
>...
>I ran into this many years ago when I "cleaned up" and removed an empty
>library from the STEPLIB of one of our subsystems. That suddenly meant
>that the STEPLIB was considered APF authorized, which resulted in S0C4
>abends when the subsystem was started and it tried to store information
>in its RENT load module.
>]
Will a module loaded from an APF authorized library and marked RENT but
not REFR be placed in write protected storage?

It might have been cleaner yet to move the offending module to the unauthorized
library, removing the incentive for future "clean up".

-- gil

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


Re: SMP/E and RENT binder option

2021-09-06 Thread Seymour J Metz
In a PTF, I believe that you need the ++ DELETE; I believe that you can force a 
rebuild with a RESTORE and APPLY. Possibly ++ JCLIN?


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Monday, September 6, 2021 12:00 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SMP/E and RENT binder option

On Mon, 6 Sep 2021 15:19:48 +, Seymour J Metz wrote:

>Yes, BTDT,GTTS. IMHO, installing PDS86, StarTool oe whatever the current name 
>is, is a no brainer, and we owe Bruce a debt of gratitude.
>
What path does SMP/E, which does not supporrt the StarTool utility, provide
for upgrading a load module from REUS to REFR?  ++DELETE and rebuild
ab ovo?

Suppose for example that I have an LMOD which contains a single REUS MOD
and several REFR.  If I replace the only deviant MOD with a REFR version,
will Binder recognize that the only non-REFR CSECT is being replaced and
save the object as REFR?

Or must I start afresh?

>
>From: David Spiegel
>Sent: Sunday, September 5, 2021 8:49 PM
>
>Hi R'Shmuel AMV"SH,
>You said: "... That's why you have to rebuild from the object modules if
>a reentrant module was incorrectly linked as REUS. ...".
>If you have the PDS Command Processor (CBT File 182) or Startool, you
>can "edit" the directory entry to add/remove these and other attributes
>(e.g. AC(0)/AC(1)).

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


Re: RENT binder option

2021-09-06 Thread Seymour J Metz
Earlier statements in this thread? No. Earlier statements in other threads? 
Many times.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
לְשָׁנָה טוֹבָה תִכָּתֵבוּ וְתֵּחָתֵמוּ


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
David Spiegel [dspiegel...@hotmail.com]
Sent: Monday, September 6, 2021 11:33 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RENT binder option

Hi R'Shmuel AMV"SH,
Don't you agree that your earlier statement has been refuted?
Please see:  פרקי אבות  5:9
שׁוֹאֵל כְּעִנְיָן וּמֵשִׁיב כַּהֲלָכָה

Regards,
David

On 2021-09-06 11:19, Seymour J Metz wrote:
> Yes, BTDT,GTTS. IMHO, installing PDS86, StarTool oe whatever the current name 
> is, is a no brainer, and we owe Bruce a debt of gratitude.
>
>
> --
> Shmuel (Seymour J.) Metz
> https://na01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fmason.gmu.edu%2F~smetz3data=04%7C01%7C%7Cbb061cfc01ee4f1b0d8508d97149cfef%7C84df9e7fe9f640afb435%7C1%7C0%7C637665384157520184%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000sdata=7iVN0eFx0pCBOfyM7InLeG9PxyCy9E4c9yNjIhtCy6c%3Dreserved=0
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> David Spiegel [dspiegel...@hotmail.com]
> Sent: Sunday, September 5, 2021 8:49 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: RENT binder option
>
> Hi R'Shmuel AMV"SH,
> You said: "... That's why you have to rebuild from the object modules if
> a reentrant module was incorrectly linked as REUS. ...".
> If you have the PDS Command Processor (CBT File 182) or Startool, you
> can "edit" the directory entry to add/remove these and other attributes
> (e.g. AC(0)/AC(1)).
>
> Shana Tovah
>
> Regards,
> David
>
> On 2021-09-05 17:44, Seymour J Metz wrote:
>> There used to be a children's game called telegram, where a group of 
>> children sat in a circle, one got a text and quietly read a short text to an 
>> adjacent chile, who quietly repeated it to the next child, etc., until it 
>> came back to the first child, who compared it to the original text. Those 
>> who know wrote what they aactually wrote, not what was attributed to them.
>>
>> BTW, the text that you cited is incorrect;it's not whether the icluded 
>> module actually is refreshable or reentrant that affects the linkage editor, 
>> it's whether it is flagged with the attribute. That's why you have to 
>> rebuild from the object modules if a reentrant module was incorrectly linked 
>> as REUS.
>>
>>
>> --
>> Shmuel (Seymour J.) Metz
>> https://na01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fmason.gmu.edu%2F~smetz3data=04%7C01%7C%7Cbb061cfc01ee4f1b0d8508d97149cfef%7C84df9e7fe9f640afb435%7C1%7C0%7C637665384157520184%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000sdata=7iVN0eFx0pCBOfyM7InLeG9PxyCy9E4c9yNjIhtCy6c%3Dreserved=0
>>
>> 
>> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
>> CM Poncelet [ponce...@bcs.org.uk]
>> Sent: Saturday, September 4, 2021 8:06 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: RENT binder option
>>
>> Sure. Thank you for confirming that those who know agree with what I
>> have said - for the benefit of those who do not know and who might
>> otherwise be misled into thinking that REFR and RENT LMODs need to be
>> 'protected' from modifying themselves and/or can modify themselves or
>> whatever nonsense else.
>>
>> BTW Off-topic, my hard-copy "MVS/Extended Architecture Linkage Editor
>> and Loader Users's Guide" version 2 release 2.0 (order number
>> GC26-4143-1) second edition (June 1986) agrees with your MVS/370 linkage
>> editor user's guide from 1985, as quoted. And I would most respectfully
>> point out that e.g. "If the refreshable attribute is specified, and any
>> load modules that are not refreshable become a part of the input to the
>> linkage editor, the attribute is negated" does indeed apply if any
>> module's OBJ code has not been link-edited with the REFR attribute but
>> is then included in the LMOD's link-edit SYSLIN cards, *then* the
>> resulting LMOD is marked not REFR regardless of all other link-edited
>> modules included in the said SYSLIN cards having been marked REFR.
>>
>> Thanks again for 'absolving' me from having to defend and protect
>> systems programming from being reduced to mere systems administration,
>> then to level-2 and then level-1 tech support, then to help-desk support
>> - as per Micro$oft Windoze. I thoroughly appreciate your supporting
>> mainframe systems programming.
>>
>> I can now gladly drop out of this thread.
>>
>> Cheers, Chris Poncelet (retired etc.)
>>
>>
>> On 04/09/2021 11:31, Joe Monk wrote:
>>> "A module is REFR or RENT - not if it is link-edited as REFR or RENT, but
>>> if it never modifies its own storage."
>>>
>>> Why do you 

SMP/E and RENT binder option

2021-09-06 Thread Paul Gilmartin
On Mon, 6 Sep 2021 15:19:48 +, Seymour J Metz wrote:

>Yes, BTDT,GTTS. IMHO, installing PDS86, StarTool oe whatever the current name 
>is, is a no brainer, and we owe Bruce a debt of gratitude.
>
What path does SMP/E, which does not supporrt the StarTool utility, provide
for upgrading a load module from REUS to REFR?  ++DELETE and rebuild
ab ovo?

Suppose for example that I have an LMOD which contains a single REUS MOD
and several REFR.  If I replace the only deviant MOD with a REFR version,
will Binder recognize that the only non-REFR CSECT is being replaced and
save the object as REFR?

Or must I start afresh?

>
>From: David Spiegel
>Sent: Sunday, September 5, 2021 8:49 PM
>
>Hi R'Shmuel AMV"SH,
>You said: "... That's why you have to rebuild from the object modules if
>a reentrant module was incorrectly linked as REUS. ...".
>If you have the PDS Command Processor (CBT File 182) or Startool, you
>can "edit" the directory entry to add/remove these and other attributes
>(e.g. AC(0)/AC(1)).

-- gil

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


Re: RENT binder option

2021-09-06 Thread David Spiegel

Hi R'Shmuel AMV"SH,
Don't you agree that your earlier statement has been refuted?
Please see:  פרקי אבות  5:9
שׁוֹאֵל כְּעִנְיָן וּמֵשִׁיב כַּהֲלָכָה

Regards,
David

On 2021-09-06 11:19, Seymour J Metz wrote:

Yes, BTDT,GTTS. IMHO, installing PDS86, StarTool oe whatever the current name 
is, is a no brainer, and we owe Bruce a debt of gratitude.


--
Shmuel (Seymour J.) Metz
https://na01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fmason.gmu.edu%2F~smetz3data=04%7C01%7C%7Cbb061cfc01ee4f1b0d8508d97149cfef%7C84df9e7fe9f640afb435%7C1%7C0%7C637665384157520184%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000sdata=7iVN0eFx0pCBOfyM7InLeG9PxyCy9E4c9yNjIhtCy6c%3Dreserved=0


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
David Spiegel [dspiegel...@hotmail.com]
Sent: Sunday, September 5, 2021 8:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RENT binder option

Hi R'Shmuel AMV"SH,
You said: "... That's why you have to rebuild from the object modules if
a reentrant module was incorrectly linked as REUS. ...".
If you have the PDS Command Processor (CBT File 182) or Startool, you
can "edit" the directory entry to add/remove these and other attributes
(e.g. AC(0)/AC(1)).

Shana Tovah

Regards,
David

On 2021-09-05 17:44, Seymour J Metz wrote:

There used to be a children's game called telegram, where a group of children 
sat in a circle, one got a text and quietly read a short text to an adjacent 
chile, who quietly repeated it to the next child, etc., until it came back to 
the first child, who compared it to the original text. Those who know wrote 
what they aactually wrote, not what was attributed to them.

BTW, the text that you cited is incorrect;it's not whether the icluded module 
actually is refreshable or reentrant that affects the linkage editor, it's 
whether it is flagged with the attribute. That's why you have to rebuild from 
the object modules if a reentrant module was incorrectly linked as REUS.


--
Shmuel (Seymour J.) Metz
https://na01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fmason.gmu.edu%2F~smetz3data=04%7C01%7C%7Cbb061cfc01ee4f1b0d8508d97149cfef%7C84df9e7fe9f640afb435%7C1%7C0%7C637665384157520184%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000sdata=7iVN0eFx0pCBOfyM7InLeG9PxyCy9E4c9yNjIhtCy6c%3Dreserved=0


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of CM 
Poncelet [ponce...@bcs.org.uk]
Sent: Saturday, September 4, 2021 8:06 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RENT binder option

Sure. Thank you for confirming that those who know agree with what I
have said - for the benefit of those who do not know and who might
otherwise be misled into thinking that REFR and RENT LMODs need to be
'protected' from modifying themselves and/or can modify themselves or
whatever nonsense else.

BTW Off-topic, my hard-copy "MVS/Extended Architecture Linkage Editor
and Loader Users's Guide" version 2 release 2.0 (order number
GC26-4143-1) second edition (June 1986) agrees with your MVS/370 linkage
editor user's guide from 1985, as quoted. And I would most respectfully
point out that e.g. "If the refreshable attribute is specified, and any
load modules that are not refreshable become a part of the input to the
linkage editor, the attribute is negated" does indeed apply if any
module's OBJ code has not been link-edited with the REFR attribute but
is then included in the LMOD's link-edit SYSLIN cards, *then* the
resulting LMOD is marked not REFR regardless of all other link-edited
modules included in the said SYSLIN cards having been marked REFR.

Thanks again for 'absolving' me from having to defend and protect
systems programming from being reduced to mere systems administration,
then to level-2 and then level-1 tech support, then to help-desk support
- as per Micro$oft Windoze. I thoroughly appreciate your supporting
mainframe systems programming.

I can now gladly drop out of this thread.

Cheers, Chris Poncelet (retired etc.)


On 04/09/2021 11:31, Joe Monk wrote:

"A module is REFR or RENT - not if it is link-edited as REFR or RENT, but
if it never modifies its own storage."

Why do you keep lecturing us on things we already know?

Jim Mulder knows it best as he is the frickin author of z/OS (well he and
Peter Relson).

Please stop.

"But it is the
programmer/developer who is responsible for ensuring that the module's
code is indeed REFR or RENT - and it is not the linkage-editor or
binder's responsibility."

To quote the MVS/370 linkage editor user's guide from 1985:

"If the reenterable attribute is specified, and any load modules that are
not reenterable become a part of the input to the linkage editor, the
attribute is negated."

"If the refreshable attribute is specified, and any load modules that are
not refreshable become a part of 

Re: RENT binder option

2021-09-06 Thread Seymour J Metz
Yes, BTDT,GTTS. IMHO, installing PDS86, StarTool oe whatever the current name 
is, is a no brainer, and we owe Bruce a debt of gratitude.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
David Spiegel [dspiegel...@hotmail.com]
Sent: Sunday, September 5, 2021 8:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RENT binder option

Hi R'Shmuel AMV"SH,
You said: "... That's why you have to rebuild from the object modules if
a reentrant module was incorrectly linked as REUS. ...".
If you have the PDS Command Processor (CBT File 182) or Startool, you
can "edit" the directory entry to add/remove these and other attributes
(e.g. AC(0)/AC(1)).

Shana Tovah

Regards,
David

On 2021-09-05 17:44, Seymour J Metz wrote:
> There used to be a children's game called telegram, where a group of children 
> sat in a circle, one got a text and quietly read a short text to an adjacent 
> chile, who quietly repeated it to the next child, etc., until it came back to 
> the first child, who compared it to the original text. Those who know wrote 
> what they aactually wrote, not what was attributed to them.
>
> BTW, the text that you cited is incorrect;it's not whether the icluded module 
> actually is refreshable or reentrant that affects the linkage editor, it's 
> whether it is flagged with the attribute. That's why you have to rebuild from 
> the object modules if a reentrant module was incorrectly linked as REUS.
>
>
> --
> Shmuel (Seymour J.) Metz
> https://na01.safelinks.protection.outlook.com/?url=http%3A%2F%2Fmason.gmu.edu%2F~smetz3data=04%7C01%7C%7C843fac68f3a241365cd808d970b6669c%7C84df9e7fe9f640afb435%7C1%7C0%7C637664751026547371%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000sdata=OKM89FQ1NHIocWcpseIqFif00l3K4gvK1QpKtrha4AQ%3Dreserved=0
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> CM Poncelet [ponce...@bcs.org.uk]
> Sent: Saturday, September 4, 2021 8:06 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: RENT binder option
>
> Sure. Thank you for confirming that those who know agree with what I
> have said - for the benefit of those who do not know and who might
> otherwise be misled into thinking that REFR and RENT LMODs need to be
> 'protected' from modifying themselves and/or can modify themselves or
> whatever nonsense else.
>
> BTW Off-topic, my hard-copy "MVS/Extended Architecture Linkage Editor
> and Loader Users's Guide" version 2 release 2.0 (order number
> GC26-4143-1) second edition (June 1986) agrees with your MVS/370 linkage
> editor user's guide from 1985, as quoted. And I would most respectfully
> point out that e.g. "If the refreshable attribute is specified, and any
> load modules that are not refreshable become a part of the input to the
> linkage editor, the attribute is negated" does indeed apply if any
> module's OBJ code has not been link-edited with the REFR attribute but
> is then included in the LMOD's link-edit SYSLIN cards, *then* the
> resulting LMOD is marked not REFR regardless of all other link-edited
> modules included in the said SYSLIN cards having been marked REFR.
>
> Thanks again for 'absolving' me from having to defend and protect
> systems programming from being reduced to mere systems administration,
> then to level-2 and then level-1 tech support, then to help-desk support
> - as per Micro$oft Windoze. I thoroughly appreciate your supporting
> mainframe systems programming.
>
> I can now gladly drop out of this thread.
>
> Cheers, Chris Poncelet (retired etc.)
>
>
> On 04/09/2021 11:31, Joe Monk wrote:
>> "A module is REFR or RENT - not if it is link-edited as REFR or RENT, but
>> if it never modifies its own storage."
>>
>> Why do you keep lecturing us on things we already know?
>>
>> Jim Mulder knows it best as he is the frickin author of z/OS (well he and
>> Peter Relson).
>>
>> Please stop.
>>
>> "But it is the
>> programmer/developer who is responsible for ensuring that the module's
>> code is indeed REFR or RENT - and it is not the linkage-editor or
>> binder's responsibility."
>>
>> To quote the MVS/370 linkage editor user's guide from 1985:
>>
>> "If the reenterable attribute is specified, and any load modules that are
>> not reenterable become a part of the input to the linkage editor, the
>> attribute is negated."
>>
>> "If the refreshable attribute is specified, and any load modules that are
>> not refreshable become a part of the input to the linkage editor, the
>> attribute is negated."
>>
>> So, it has been the case since 1985 that the linkage editor does check the
>> input load modules, and will not mark a non-RENT/REFR load module as having
>> those attributes. Jim Mulder has been at IBM for 42 years, so 1985 ... yeah
>> he would've been working on MVS then.
>>
>> Thanks.
>>
>> Joe
>>
>>
>>
>> On 

Re: SMF field data

2021-09-06 Thread Martin Packer
Glad you found it. Seems your Db2 subsystems aren't entirely cloned...

... I was pondering Datasharing Group level things versus Subsystem 
things. DSNZPARM is, of course, a Subsystem thing - so members even in the 
same Datasharing Group can have different DSNZPARM values, such as this 
one.

Cheers, Martin

Martin Packer

WW z/OS Performance, Capacity and Architecture, IBM Technology Sales

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker

Blog: https://mainframeperformancetopics.com

Mainframe, Performance, Topics Podcast Series (With Marna Walle): 
https://anchor.fm/marna-walle

Youtube channel: https://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA



From:   "Bill Giannelli" 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   05/09/2021 19:29
Subject:[EXTERNAL] Re: SMF field data
Sent by:"IBM Mainframe Discussion List" 



finally found out that I had a zparm accumuid set to 1 once I changed it 
to 0 the data started showing up.
Bill

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



Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU


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