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

Reply via email to