Lionel has a REXX exec handy for every purpose... ;-) Mike Shaw MVS/QuickRef Support Group Chicago-Soft, Ltd
On Mon, Jun 26, 2023, 1:30 PM Lionel B. Dyck <lbd...@gmail.com> wrote: > You can run this exec to see what the limit is, assuming you don't have > access to parmlib: > > /* ---------- rexx ------------- * > * Get the current MAXGENS_LIMIT * > * ----------------------------- */ > NUMERIC DIGITS 10 > CVT = C2D(Storage(10,4)) > CVTDFA = C2D(Storage(D2X(CVT + 1216),4)) /* cvt + 4c0 */ > DFAMGEN = C2D(Storage(D2X(cvtdfa + 76),4)) /* dfa + 4c */ > say dfamgen > > > Lionel B. Dyck <>< > Website: https://www.lbdsoftware.com > Github: https://github.com/lbdyck > > “Worry more about your character than your reputation. Character is what > you are, reputation merely what others think you are.” - - - John Wooden > > -----Original Message----- > From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf > Of Charles Mills > Sent: Monday, June 26, 2023 12:29 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: How batch create a PDSE2 with Generations? > > Yeah, I have to run a test to see whether it will fail ugly if I exceed > the limit, or just cap it at the limit. > > Charles > > On Mon, 26 Jun 2023 11:23:32 -0500, Lionel B. Dyck <lbd...@gmail.com> > wrote: > > >Regarding MAXGENS in the JCL - be sure it is less than, or equal to the > IGDSMSxx MAXGENS_LIMIT specification. > > > > ---------------------------------------------------------------------- > 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