Jake, what you might also want to know when was the last time a GDG was 
altered.  That would be field GDGALTDT (Last alteration date. Packed decimal 
YYDDDF for 3 bytes appended with one byte century indicator. If the century 
byte is 00 then add 1900 to get the year; if 01, add 2000.)

I've run across GDGs that have not be touched for years.  When I approached the 
business unit about it, they had no idea it was still hanging around.


Paul

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of 
Lennie Bradshaw
Sent: Friday, August 8, 2025 3:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IGGCSIRX / IGGCSI00

https://rsclweb.com/downloads/#CSIREXX-position
Lenni

-----Original Message-----
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of 
Jack Zukt
Sent: 08 August 2025 19:45
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IGGCSIRX / IGGCSI00

Thank you for the suggestion Lennie. I was trying to get all the info in only 
one pass with IGGCSI00. That would be more efficient. But I might have to down 
that road.


Regards
Jack

On Fri, Aug 8, 2025, 16:47 Lennie Bradshaw <lennie-brads...@outlook.com>
wrote:

> You might be able to get the date the catalog entry was created from 
> field DSCRDT2, but the data set creation date would be in the VTOC, 
> not the catalog if it is non-SMS.
> Use LISTDSI to get such details in a REXX program.
> Lennie
>
> -----Original Message-----
> From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On 
> Behalf Of Jack Zukt
> Sent: 08 August 2025 15:44
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: IGGCSIRX / IGGCSI00
>
> Hi all,
>
> I am using the IGGCSI00 in a rexx adapted from the 
> SYS1.SAMPLIB(IGGCSIRX), to find out how many empty GDGs there are in one plex.
> Do you know if there is a way to also get the file creation date using 
> the
> IGGCSI00 program?
>
> Regards
> Jack
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to 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 with the message: INFO IBM-MAIN
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
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 with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to