Here is the TOUCH EXEC I have used in the past. I am certain others also
have such an animal.
David Wakser
/* */
address command
parse upper arg fn ft fm StampIt
if StampIt = '' then do
StampIt = date('U') time()
end
'PIPE',
'COMMAND LISTFILE' fn ft fm '( NOHEADER|',
'STATEW|',
'SPECS ?DMSPLU? 1 W1-3 NW ?' StampIt '? NW|',
'COMMAND|',
'CONSOLE'
if rc <> 0 then do
say 'Must specify date/time stamp as: mm/dd/yy hh:mm:ss'
end
From: The IBM z/VM Operating System [mailto:[email protected]] On
Behalf Of Mark Pace
Sent: Tuesday, August 17, 2010 3:14 PM
To: [email protected]
Subject: CMS file date
Can I manipulate the date of a CMS file? I want to test a program that
deletes files older than a certain date. In linux I can use touch to set
the date to whatever I choose.
--
Mark D Pace
Senior Systems Engineer
Mainline Information Systems
Confidentiality Note: This e-mail, including any attachment to it, may contain
material that is confidential, proprietary, privileged and/or "Protected Health
Information," within the meaning of the regulations under the Health Insurance
Portability & Accountability Act as amended. If it is not clear that you are
the intended recipient, you are hereby notified that you have received this
transmittal in error, and any review, dissemination, distribution or copying of
this e-mail, including any attachment to it, is strictly prohibited. If you
have received this e-mail in error, please immediately return it to the sender
and delete it from your system. Thank you.
