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

2019-08-22 Thread Kirk Wolf
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?

2019-08-21 Thread Al Ferguson
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?

2019-08-21 Thread Paul Gilmartin
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?

2019-08-21 Thread Al Ferguson
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?

2019-08-21 Thread Dan D
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?

2019-08-21 Thread Al Ferguson
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?

2019-08-21 Thread Kirk Wolf
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?

2019-07-28 Thread Dan D
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?

2019-07-28 Thread Kirk Wolf
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?

2019-07-26 Thread Lionel B Dyck
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?

2019-07-26 Thread Paul Gilmartin
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?

2019-07-26 Thread Lionel B Dyck
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?

2019-07-26 Thread Seymour J Metz
generations in LISTDSI? -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List on behalf of John McKown Sent: Thursday, July 25, 2019 3:47 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: TSO REXX -- find absolute generation # from

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

2019-07-26 Thread Dale R. Smith
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?

2019-07-26 Thread Juan Escamilla
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?

2019-07-26 Thread Lionel B Dyck
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?

2019-07-26 Thread ITschak Mugzach
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?

2019-07-26 Thread Tom Marchant
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?

2019-07-26 Thread John McKown
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?

2019-07-25 Thread Tom Marchant
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?

2019-07-25 Thread Paul Gilmartin
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?

2019-07-25 Thread Steve Beaver
t; > Thanks, > Kolusu > > IBM Mainframe Discussion List wrote on > 07/25/2019 03:47:13 PM: > >> From: John McKown >> To: IBM-MAIN@LISTSERV.UA.EDU >> Date: 07/25/2019 03:48 PM >> Subject: [EXTERNAL] TSO REXX -- find absolute generation # from relative? >>

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

2019-07-25 Thread Sri h Kolusu
tut from this is you will have member named "Mcknown" in your GDGBASE (0) Thanks, Kolusu IBM Mainframe Discussion List wrote on 07/25/2019 03:47:13 PM: > From: John McKown > To: IBM-MAIN@LISTSERV.UA.EDU > Date: 07/25/2019 03:48 PM > Subject: [EXTERNAL] TSO REXX -- find a

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

2019-07-25 Thread Horne, Jim - James S
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]

2019-07-25 Thread Feller, Paul
hn McKown > Sent: Thursday, July 25, 2019 12:47 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: TSO REXX -- find absolute generation # from relative? > > 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? [EXTERNAL]

2019-07-25 Thread Cieri, Anthony
, 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?

2019-07-25 Thread Lizette Koehler
day, July 25, 2019 12:47 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: TSO REXX -- find absolute generation # from relative? > > 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

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

2019-07-25 Thread John McKown
gt; Behalf Of John McKown > Sent: Thursday, July 25, 2019 2:47 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: TSO REXX -- find absolute generation # from relative? [EXTERNAL] > > I just don't see any _simple_ way to do this. I need to convert the > gdgbase(0) into gdgbase.GVnn

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

2019-07-25 Thread Feller, Paul
Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John McKown Sent: Thursday, July 25, 2019 2:47 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: TSO REXX -- find absolute generation # from relative? [EXTERNAL] I just don't see any _simple_ way to do this. I need to convert

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

2019-07-25 Thread Horne, Jim - James S
John, As long as you want to generate the JCL programmatically, look at using the TSO LISTCAT command with the LVL option and processing the output. Just a thought; Jim Horne John McKown wrote: I just don't see any _simple_ way to do this. I need to convert the gdgbase(0) into gdgbase.GVnn

TSO REXX -- find absolute generation # from relative?

2019-07-25 Thread John McKown
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 JCL which is the equivalent of: //SYSUT1 DD