Discussion:
PDSE MAXGENS API
Add Reply
Nick Jones
2018-05-01 14:58:05 UTC
Reply
Permalink
Raw Message
Is there an API that will allow my program to establish the maximum number of member generations defined to a PDSE version 2 data set (via MAXGENS)?

I have found a SHARE presentation that states this information is stored in the PDSE itself.

The ISITMGD macro will get the PDSE version and also indicates whether that PDSE is enabled for member generations. Unfortunately, it does not get the maximum number of generations supported by the PDSE.

From what I've gathered from my Google searches, I'm beginning to suspect that this information is only available via FAMS.

Nick

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Steve Smith
2018-05-01 19:50:30 UTC
Reply
Permalink
Raw Message
You're right, that API is FAMS. I have no idea what IBM requires to grant
access, other than a signed NDA. Much less do I understand why they want
to keep it secret.

If you just want to do reporting, CatalogRecovery+ can help you out.
Otherwise you might resort to hacking up something built on IEBPDSE or TSO
LISTDS (?).

On Tue, May 1, 2018 at 10:59 AM, Nick Jones <
Post by Nick Jones
​...
From what I've gathered from my Google searches, I'm beginning to suspect
that this information is only available via FAMS.
Nick
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
--
sas

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Gord Tomlin
2018-05-01 21:56:44 UTC
Reply
Permalink
Raw Message
Post by Steve Smith
I have no idea what IBM requires to grant
access, other than a signed NDA.
FAMS is documented in the DFSMS Advanced Customization Guide, for which
a license must be purchased at a not insignificant price.

--

Regards, Gord Tomlin
Action Software International
(a division of Mazda Computer Corporation)
Tel: (905) 470-7113, Fax: (905) 470-6507
Support: https://actionsoftware.com/support/

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Nick Jones
2018-05-02 09:52:17 UTC
Reply
Permalink
Raw Message
Thanks for the confirmation, Steve.

I did consider the possible hacks you mentioned but unfortunately, neither the IEBPDSE utility nor TSO/E LISTDS (nor indeed the TSO/E REXX function, LISTDSI) have been updated to output the MAXGENS value of a PDSE V2 library.

Even if these facilities get updated via an APAR, their use would be undesirable since ours is a commercial application and the functionality being developed would become conditional on the customers' application of the APAR SYSMODs.

I think I am going to have to bite the bullet and request permission from management to get the FAMS licence.

Nick

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Dyck, Lionel B. , TRA
2018-05-02 10:56:04 UTC
Reply
Permalink
Raw Message
The ISPF command/service DSINFO will return the current maxgen for the requested dataset so if you're operating under ISPF you can check the zdsngen variable after using dsinfo.

Not ideal but it's something.

--------------------------------------------------------------------------
Lionel B. Dyck (Contractor) <sdg><
Mainframe Systems Programmer – RavenTek Solution Partners

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-***@LISTSERV.UA.EDU] On Behalf Of Nick Jones
Sent: Wednesday, May 02, 2018 4:54 AM
To: IBM-***@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: PDSE MAXGENS API

Thanks for the confirmation, Steve.

I did consider the possible hacks you mentioned but unfortunately, neither the IEBPDSE utility nor TSO/E LISTDS (nor indeed the TSO/E REXX function, LISTDSI) have been updated to output the MAXGENS value of a PDSE V2 library.

Even if these facilities get updated via an APAR, their use would be undesirable since ours is a commercial application and the functionality being developed would become conditional on the customers' application of the APAR SYSMODs.

I think I am going to have to bite the bullet and request permission from management to get the FAMS licence.

Nick

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

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Cieri, Anthony
2018-05-02 18:36:55 UTC
Reply
Permalink
Raw Message
It is not an API, but this is something that was discussed here previously..............


/* Rexx */
CVT = C2d(Storage(10,4))
CVTDFA = C2d(Storage(D2x(CVT + 1216),4)) /* cvt + 4c0 */
DFAMGEN = C2D(storage(d2x(cvtdfa + 76),4)) /* dfa + 4c */
say 'Maxgen limit is 'dfamgen
say 'PDS/E MaxGen value is 'dfamgen
exit



-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-***@LISTSERV.UA.EDU] On Behalf Of Nick Jones
Sent: Wednesday, May 02, 2018 5:54 AM
To: IBM-***@LISTSERV.UA.EDU
Subject: Re: PDSE MAXGENS API

Thanks for the confirmation, Steve.

I did consider the possible hacks you mentioned but unfortunately, neither the IEBPDSE utility nor TSO/E LISTDS (nor indeed the TSO/E REXX function, LISTDSI) have been updated to output the MAXGENS value of a PDSE V2 library.

Even if these facilities get updated via an APAR, their use would be undesirable since ours is a commercial application and the functionality being developed would become conditional on the customers' application of the APAR SYSMODs.

I think I am going to have to bite the bullet and request permission from management to get the FAMS licence.

Nick

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

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Nick Jones
2018-05-02 09:55:07 UTC
Reply
Permalink
Raw Message
Hi Gord,

Thanks for the heads-up on FAMS. Yes, I think this is going to hurt!

Nick

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Nick Jones
2018-05-03 08:25:06 UTC
Reply
Permalink
Raw Message
Many thanks, Cieri.

However, this method obtains the system wide maximum as defined by MAXGENS_LIMIT in parmlib member IGDSMSxx, not the MAXGENS value defined to an individual PDSE V2 library.

Nick

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Michael Babcock
2018-05-03 12:16:37 UTC
Reply
Permalink
Raw Message
Doesn’t the catalog search interface return this value? GDGLIMTE?

On Thu, May 3, 2018 at 3:26 AM Nick Jones <
Post by Nick Jones
Many thanks, Cieri.
However, this method obtains the system wide maximum as defined by
MAXGENS_LIMIT in parmlib member IGDSMSxx, not the MAXGENS value defined to
an individual PDSE V2 library.
Nick
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Michael Babcock
2018-05-03 12:26:14 UTC
Reply
Permalink
Raw Message
Sorry, misunderstood what you were asking. Ignore my response.
Post by Michael Babcock
Doesn’t the catalog search interface return this value? GDGLIMTE?
On Thu, May 3, 2018 at 3:26 AM Nick Jones <
Post by Nick Jones
Many thanks, Cieri.
However, this method obtains the system wide maximum as defined by
MAXGENS_LIMIT in parmlib member IGDSMSxx, not the MAXGENS value defined to
an individual PDSE V2 library.
Nick
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to ***@listserv.ua.edu with the message: INFO IBM-MAIN
Loading...