This works. But as I recall, for a VSAM file, sometimes the last referenced date is only updated on the first volume of a multivolume dataset. And sometimes only on the DATA component, not the INDEX component. So I'd strongly suggest that the code look at all the DCOLLECT records which reference a given CLUSTER name and selected the latest last referenced date from the group!
The same applies if the OP uses CAMLIST and OBTAIN to read the DSCB records for the VSAM KSDS components. Read all of them from all volumes. IGGCSI00 itself only reads the catalog, which does not appear to contain this information. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets® 9151 Boulevard 26 . N. Richland Hills . TX 76010 (817) 255-3225 phone . john.mck...@healthmarkets.com . www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets® is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company®, Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM > -----Original Message----- > From: IBM Mainframe Discussion List > [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Mike Schwab > Sent: Wednesday, January 26, 2011 1:50 PM > To: IBM-MAIN@bama.ua.edu > Subject: Re: Dataset Last Reference Date > > Run and IDCAMS DCollect.Output record: > Offset 4 Record type, value D for datasets, > Offset 24 DSN Character 44 > Offset 112 DCDLSTRF x'yyyydddF' 4 bytes Packed decimal julian date. > > On Wed, Jan 26, 2011 at 1:34 PM, Roberto Halais > <roberto.hal...@gmail.com> wrote: > > Listers: > > > > I have been trying unsuccessfully to extract a dataset's > last reference date > > using the IGGCSI00 utility. In the IGGCSI00 utilities > documentation there is > > no mention of this field. > > > > Is there some other way "easier" way to get last reference date? > > > > Thank you for any hints. > > > > Roberto > > > > "Those who can make you believe religious absurdities, can > make you commit > > atrocities." Voltaire > > > > The philosopher has never killed any priests, whereas the priest has > > killed a great many philosophers. > > ~ Denis Diderot > > > > "I am as you, in you, for you. One as you in all, as all, > forever. My call > > is your call." > > > > > ---------------------------------------------------------------------- > > For IBM-MAIN subscribe / signoff / archive access instructions, > > send email to lists...@bama.ua.edu with the message: GET > IBM-MAIN INFO > > Search the archives at http://bama.ua.edu/archives/ibm-main.html > > > > > > -- > 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO > Search the archives at http://bama.ua.edu/archives/ibm-main.html > > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
