That should work for Seq files. But if you have a PDS then you might need to do a bit more with a member name.
OPEN definately sets a new last ref date. I was hoping Naviquest might be usable for this process, but I have not found anything yet. Lizette -----Original Message----- >From: Tim Hare <[email protected]> >Sent: Aug 14, 2012 2:24 PM >To: [email protected] >Subject: Re: How to update the last referenced date in the VTOC > >Don't know how super-efficient it is, but use DCOLLECT input (or FDREPORT >extract if you have FDREPORT), then in Rexx under IKJEFT01 > >Read a record >set dataset_name_variable to the DSN >If you're worried about uncataloged also set unit and volume variable > >"ALLOC FI(X) DA("dataset_name_variable") SHR REUSE" <== add UNIT and VOLUME >if necessary >"EXECIO 0 DISKR X (OPEN" >"EXECIO 0 DISKW X (FINIS" > >in a loop until end of file on the input. You can of course use program logic >to just filter the volumes and/or datasets you want. > >This is based on the concept (fact, I believe) that it last referenced date is >set by OPEN. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
