Thank you all for your help. I managed to get the results I need using dfosrt. Regards Jack
On Wed, 9 Oct 2024 at 12:41, Jack Zukt <[email protected]> wrote: > Thank you Mike > I did not knew that. > Regards > Jack > > > On Wed, 9 Oct 2024 at 12:38, Mikael Nystrom < > [email protected]> wrote: > >> If you add the MULTIVOL keyword to LISTDSI it does include information of >> multi-volumes. >> >> //Micke >> >> Mikael Nyström >> Core Ledgers >> SEB >> >> -----Original Message----- >> From: IBM Mainframe Discussion List <[email protected]> On Behalf >> Of Jack Zukt >> Sent: den 9 oktober 2024 13:30 >> To: [email protected] >> Subject: Re: ICETOOL OCCUR statement >> >> CAUTION: This email originated from outside of the organization. >> ________________________________ >> Be cautious when clicking links and opening attachments! >> >> >> >> Hi Mike >> LISTDSI does not provide information regarding multi-volume datasets, or, >> at least, that is what happened when I tried. I had not thought about CSI. >> I will look into it, thank you. >> Regards >> Jack >> >> >> On Wed, 9 Oct 2024 at 12:20, Michael Babcock < >> [email protected]> wrote: >> >> > Have you looked at LISTDSI or the catalog search interface? >> > >> > On Wed, Oct 9, 2024 at 5:15 AM Jack Zukt < >> > [email protected]> wrote: >> > >> > > Hi Mike >> > > Thank you for your answer. >> > > Unfortunately that will give me the extent number but not over how >> > > many DASD, which is what I need for this specific case. >> > > I have a DFSORT job that gives me the number of extents for a >> > > dataset >> > using >> > > that specific field. I have been tinkering with it trying to get the >> > number >> > > of different DASD over which a dataset is allocated. It is not going >> > > very well either :( Regards Jack >> > > >> > > >> > > On Wed, 9 Oct 2024 at 11:03, Mike Schwab < >> > > [email protected]> wrote: >> > > >> > > > How about DCOLLECT Record D Either over 40? >> > > > 77(X'4D') UNSIGNED 1 DCDNMEXT NUMBER OF EXTENTS OBTAINED >> > > > 122(X'7A') CHARACTER 2 DCDVOLSQ VOLUME SEQUENCE NUMBER >> > > > >> > > > On Wed, Oct 9, 2024 at 4:26 AM Jack Zukt >> > > > <[email protected]> wrote: >> > > > > >> > > > > Hi all, >> > > > > >> > > > > I was asked to create a REXX program to identify datasets that >> > > > > are approaching the 59 volumes extent limit. >> > > > > I was trying to do that using ICETOOL OCCUR statement and a >> > > > > DCOLLECT >> > > file >> > > > > for input. So far it is geting me nowhere fast. Do you think >> > > > > that >> > this >> > > > is a >> > > > > feaseble option to get that result? >> > > > > >> > > > > The statement that I am using is >> > > > > >> > > > > OCCURS FROM (INDD01) ON(DCDDSNAM) ON(DCDVOLSR) LIST(OUT001) >> > > > > >> > > > > This is giving one line for dataset but only one volser. I was >> > > expecting >> > > > > one lline for dataset and a count for volser. So I am on the >> > > > > wrong >> > > track. >> > > > > Any ideas? >> > > > > Regards >> > > > > Jack >> > > > > >> > > > > >> > ---------------------------------------------------------------------- >> > > > > For IBM-MAIN subscribe / signoff / archive access instructions, >> > > > > send email to [email protected] with the message: INFO >> > IBM-MAIN >> > > > >> > > > >> > > > >> > > > -- >> > > > Mike A Schwab, Springfield IL USA >> > > > Where do Forest Rangers go to get away from it all? >> > > > >> > > > ------------------------------------------------------------------ >> > > > ---- For IBM-MAIN subscribe / signoff / archive access >> > > > instructions, send email to [email protected] with the >> > > > message: INFO IBM-MAIN >> > > > >> > > >> > > -------------------------------------------------------------------- >> > > -- For IBM-MAIN subscribe / signoff / archive access instructions, >> > > send email to [email protected] with the message: INFO >> > > IBM-MAIN >> > > >> > >> > ---------------------------------------------------------------------- >> > For IBM-MAIN subscribe / signoff / archive access instructions, send >> > email to [email protected] with the message: INFO IBM-MAIN >> > >> >> ---------------------------------------------------------------------- >> For IBM-MAIN subscribe / signoff / archive access instructions, send >> email to [email protected] with the message: INFO IBM-MAIN >> >> ---------------------------------------------------------------------- >> For IBM-MAIN subscribe / signoff / archive access instructions, >> send email to [email protected] with the message: INFO IBM-MAIN >> > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
