Re: TSO REXX -- find absolute generation # from relative?

Al, 1) LOCATE is better than IGGCSI00. It handles accurate resolutions including wrap around for you. Both just use the catalog. Neither require allocation. 2) Dynamic allocation of the DSN=MY.GDG(rel) DISP=SHR with either BPXWDYN or SVC99 has the advantage of allowing you to specify

Re: TSO REXX -- find absolute generation # from relative?

Yes, even if there is a NEW Allocation on the GDG (creating a new G000V), as it holds an excuse enqueue on the entire GDG (though you would be able to allocate the DSN directly, but not relatively). That is why I started with the CSI (Catalog Search Interface). Possibly not 100%, but you

Re: TSO REXX -- find absolute generation # from relative?

On Wed, 21 Aug 2019 15:17:57 -0500, Al Ferguson wrote: > >My next choice would be BPXWDYN to allocate the relative DSN I am looking for >and get the INFO. I like this because it works everywhere, (MVS, TSO, USS, >SystemREXX, ….) and it is part of the Base System. ... > Can this encounter

Re: TSO REXX -- find absolute generation # from relative?

The few times I have had it wrap, you can check the highest record returned, it will be (if the -1 is 9998 you are there as well ) and then you can do a search from the bottom looking for the “Hole” in the numbering. I have had to do it a few times, but it is so infrequent (took our shop

Re: TSO REXX -- find absolute generation # from relative?

That doesn't always work Al. When the GDG has wrapped the calculation gets messed up. Best to let Catalog Management determine the absolute name for a given relative. -- For IBM-MAIN subscribe / signoff / archive access

Re: TSO REXX -- find absolute generation # from relative?

Another option would be to use the Catalog Search Interface (CSI). I have an example in CBTTape.org File #960 (the DSNLIST REXX). If you are going for just the G00V000s, then the value of the just subtract the Relative DSN from the number of records returned take that

Re: TSO REXX -- find absolute generation # from relative?

Using LOCATE/CAMLST seems better than using SVC99/BPXWDYN to resolve relative->absolute since it doesn't require allocation of the data set, which might fail. One question that I have is (I assume) that LOCATE/CAMLST will always use the latest generations ("GDGNT"), so that if what you want is a

Re: TSO REXX -- find absolute generation # from relative?

Sam just updated my CBT file today (File 452 in the Updates). I had a tool called RXLOCATE that simply does a CAMLST LOCATE for a dsname in LOCDSN variable. /*rexx*/ LOCDSN = 'userid.GDG(-1)' */ address LINK "RXLOCATE" say LOCDSN 'RC=' rc

Re: TSO REXX -- find absolute generation # from relative?

Gil, Isn't just a BPXWDYN('ALLOC ... DISP(SHR) RTDSN(absdsn) RTDDN(ddn)') enough? I don't think that INFO is required, although it doesn't matter that much. BTW: "GDGNT" is probably an option that many will want. Kirk Wolf Dovetailed Technologies http://dovetail.com On Thu, Jul 25, 2019 at

Re: TSO REXX -- find absolute generation # from relative?

haracter is what you are, reputation merely what others think you are." - John Wooden -Original Message- From: IBM Mainframe Discussion List On Behalf Of Paul Gilmartin Sent: Friday, July 26, 2019 1:56 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: TSO REXX -- find absolute generation #

Re: TSO REXX -- find absolute generation # from relative?

On Fri, 26 Jul 2019 12:37:26 -0500, Lionel B Dyck wrote: >I just submitted this RFE this morning that will address this issue (if/when): > >https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe_ID=134932 > >Note that there is another RFE for a LISTDSI enhancement for which the

Re: TSO REXX -- find absolute generation # from relative?

age- From: IBM Mainframe Discussion List On Behalf Of Seymour J Metz Sent: Friday, July 26, 2019 12:17 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: TSO REXX -- find absolute generation # from relative? I know that you don't like CSI, but IMHO that's the best way to go. Postprocessing the

Re: TSO REXX -- find absolute generation # from relative?

I know that you don't like CSI, but IMHO that's the best way to go. Postprocessing the LISTC output is easy, but will break if IBM changes the format. In the long run, have you considered asking IBM for a CI enhancement to allow both generation and member in DSN, or to allow relative

Re: TSO REXX -- find absolute generation # from relative?

On Thu, 25 Jul 2019 14:47:13 -0500, John McKown wrote: >I just don't see any _simple_ way to do this. I need to convert the >gdgbase(0) into gdgbase.GVnn absolute. Believe it or not, I have a >product which creates a number of PDS libraries (not PDSE) which are GDG. I >want to generate some

Re: TSO REXX -- find absolute generation # from relative?

Try the following: /* Rexx - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - */ /* determine the absolute generation of a GDG*/ /* Execute the rexx passing it the GDG Base and the relative */ /* generation number

Re: TSO REXX -- find absolute generation # from relative?

Sent: Friday, July 26, 2019 7:55 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: TSO REXX -- find absolute generation # from relative? Not sure if possible, but i would give a try to jcl refer back. Step 1 use the dd as dummy, but run a rexx to free and allocate the right ddname with a member name

Re: TSO REXX -- find absolute generation # from relative?

Not sure if possible, but i would give a try to jcl refer back. Step 1 use the dd as dummy, but run a rexx to free and allocate the right ddname with a member name received from jcl parm. Step 2 reference the dd, but it is now a different name. ITschak בתאריך יום ו׳, 26 ביולי 2019, 15:50, מאת

Re: TSO REXX -- find absolute generation # from relative?

On Fri, 26 Jul 2019 07:44:51 -0500, John McKown wrote: >On Thu, Jul 25, 2019 at 4:19 PM Tom Marchant < >000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote: > >> How about an IEBCOPY step where you specify GDGBASE(0) on >> INDD (or whatever) and select MEMBER to be unloaded to a >> temporary

Re: TSO REXX -- find absolute generation # from relative?

On Thu, Jul 25, 2019 at 4:19 PM Tom Marchant < 000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote: > On Thu, 25 Jul 2019 14:47:13 -0500, John McKown wrote: > > >I just don't see any _simple_ way to do this. I need to convert the > >gdgbase(0) into gdgbase.GVnn absolute. Believe it or not,

Re: TSO REXX -- find absolute generation # from relative?

On Thu, 25 Jul 2019 14:47:13 -0500, John McKown wrote: >I just don't see any _simple_ way to do this. I need to convert the >gdgbase(0) into gdgbase.GVnn absolute. Believe it or not, I have a >product which creates a number of PDS libraries (not PDSE) which are GDG. I >want to generate some

Re: TSO REXX -- find absolute generation # from relative?

On Thu, 25 Jul 2019 14:47:13 -0500, John McKown wrote: >I just don't see any _simple_ way to do this. I need to convert the >gdgbase(0) into gdgbase.GVnn absolute. Believe it or not, I have a >product which creates a number of PDS libraries (not PDSE) which are GDG. I >want to generate some

Re: TSO REXX -- find absolute generation # from relative?

I haven’t used UPDT in years Sent from my iPhone Sorry for the finger checks On Jul 25, 2019, at 15:34, Sri h Kolusu wrote: >> want to generate some JCL which is the equivalent of: > > Try this > > //STEP0100 EXEC PGM=IEBUPDTE,PARM='NEW' > //SYSPRINT DD SYSOUT=* > //SYSUT1 DD DUMMY >

Re: TSO REXX -- find absolute generation # from relative?

> want to generate some JCL which is the equivalent of: Try this //STEP0100 EXEC PGM=IEBUPDTE,PARM='NEW' //SYSPRINT DD SYSOUT=* //SYSUT1 DD DUMMY //SYSUT2 DD DISP=SHR,DSN=GDGBASE(0) //SYSINDD DATA ./ ADD NAME=MCKNOWN,LEVEL=00,SOURCE=0,LIST=ALL ABC DEF ./ENDUP The outut

Re: TSO REXX -- find absolute generation # from relative? [EXTERNAL]

Respectfully, I disagree, especially since you mention REXX. Using the WORD function, parsing is a snap. If word 1 is NONVSAM, word 3 is the dataset name. I.e., If Word(line_read,1) = 'NONVSAM' THEN gdgent = WORD(line_read,3) ; The last 'gdgent' filled in will be the last GDG. How does it

Re: TSO REXX -- find absolute generation # from relative? [EXTERNAL]

. Thanks.. Paul Feller AGT Mainframe Technical Support -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Lizette Koehler Sent: Thursday, July 25, 2019 3:17 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: TSO REXX -- find absolute generation

Re: TSO REXX -- find absolute generation # from relative? [EXTERNAL]

, July 25, 2019 4:14 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: TSO REXX -- find absolute generation # from relative? [EXTERNAL] [[ SEI WARNING *** This email was sent from an external source. Do not open attachments or click on links from unknown or suspicious senders. *** ]] {sigh} I parsing

Re: TSO REXX -- find absolute generation # from relative?

I have done a LISTC ENT('gdgname') Then parsed the output to find the gen0 Take the First entry on the GDG list GDGBASE.Gv00 + GDG limit = close to gen0 Lizette > -Original Message- > From: IBM Mainframe Discussion List On Behalf Of > John McKown > Sent: Thursday, July 25,

Re: TSO REXX -- find absolute generation # from relative? [EXTERNAL]

{sigh} I parsing LISTCAT is a bother. Using IGGCSI00 is not simple, IMO at least. I really wish there were a REXX function to do it like: absolute=RESGDG('basegdg(0)') where "absolute" would have "basegdg.gv00" in it. So much simpler. Am I am a simple person. You really _don't_ want to see

Re: TSO REXX -- find absolute generation # from relative? [EXTERNAL]

John, could you try to use the catalog interface (IGGCSI00) and do a request for the current generation with something like ABC.XYZ(0)? I would think you would then get back the fully qualified name. Thanks.. Paul Feller AGT Mainframe Technical Support -Original Message- From: IBM