Hi Jack,
Could you please send me a copy of your JCL etc.?
My email address is [email protected]
Thanks and regards,
David
On 10/9/2024 10:38, Jack Zukt wrote:
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
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN