I'm not aware of anything distributed by IBM. Why not just write some REXX code to use IGGCSI00 to find the DSNs you want (or parse a LISTCAT) and use that to generate a series of jobs. Each job just does something like:
//JOBNAME JOB ... //TOUCH EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //INDSN DD DISP=SHR,DSN=<dsn> //SYSIN DD * PRINT INFILE(INDSN) COUNT(1) /* // Submit those from your REXX simply by using EXECIO to a DD name such as: //SUBMIT DD SYSOUT=(*,INTRDR) Now for my obligatory weird way to use UNIX to do this. Install Dovetailed Technologies' Data Set Pipes and Co:Z launcher. In fact, get all their stuff. It's really great and is freely licensed (you don't even need to register, or give them an email address or anything). Run a job such as: //TOUCH EXEC PROC=COZPROC //STDOUT DD SYSOUT=* //STDERR DD SYSOUT=* //SYSOUT DD SYSOUT=* //SYSIN DD * catsearch -l 'HLQ.**'|\ awk '$9 == "PS" && $1 != "MIGRAT" {print $NF;}' |\ while read i;do fromdsn "$i"|head -1 >/dev/null 2>&1 done /* // No, I don't suggest doing this! I just sometimes like to mess around with some of the other members' minds. You know who you are! <grin> http://www.dovetail.com -- 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 John Dawes > Sent: Thursday, May 10, 2012 7:02 AM > To: IBM-MAIN@bama.ua.edu > Subject: UPDATING LAST REFERNCE DATE > > G'Day To All, > > Is there a batch job/utility I could use to update the last > reference date of a dsn? I understand that I can do it by > browsing the dsn, however since I have about 335 dsns it > would be cumbersome. I tried a LISTCAT but it did not change > the last reference date. The reason why I want to do this is > to prevent the expiration of these dsns. I realise that SMS > management class modification would do the trick but these > dsns are not in a SMS managed environment. There is a DFDSS > job which runs to delete these dsns if they haven't been > referred for 6 months. > > Thanks. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN