Another option would be to use the Catalog Search Interface (CSI). I have an example in CBTTape.org <http://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 record. For example if you get 32 records returned, and you want the “-1”th relative DSN, then the (32-1) or 31st record will have you full DSN.
This does no allocations and just returns values from the Catalog, about as efficient as you are going to get. No need to load the RXLOCATE Module, initialize LE, and return the value, as the CSI is always available and running. _______________ Al Ferguson | mailto:afergu...@neptunescove.org <mailto:afergu...@neptunescove.org> Milwaukee, WI USA | http://www.neptunescove.org Dulcius ex Asperis > On 21 August 2019, at 13:19, Kirk Wolf <k...@wolf-associates.com > <mailto:k...@wolf-associates.com>> wrote: > > 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 stable > "current" generation then it won't do the job. With SVC99/BPXWDYN, you > can set or not set the "GDGNT" flag. > > Does anyone know how to resolve relative->absolute without allocation > without "GDGNT" ? > > > On Sun, Jul 28, 2019 at 4:01 PM Dan D <zos.j...@gmail.com > <mailto:zos.j...@gmail.com>> wrote: > >> 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 >> Exit >> >> After the LINK to RXLOCATE the LOCDSN variable will have the absolute name >> or true name. >> >> Dan >> >> ---------------------------------------------------------------------- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to lists...@listserv.ua.edu <mailto: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 <mailto:lists...@listserv.ua.edu> with > the message: INFO IBM-MAIN > _______________ Al Ferguson | mailto:afergu...@neptunescove.org Milwaukee, WI USA | http://www.neptunescove.org Dulcius ex Asperis ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
