I don't know where I got it (it's date stamp is about 4 years ago) but
here is my TOUCH EXEC.

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                                                                 

-----Original Message-----
From: The IBM z/VM Operating System [mailto:[email protected]] On
Behalf Of Tracy, David
Sent: Wednesday, December 29, 2010 4:26 PM
To: [email protected]
Subject: Setting the datetime stamp on a file

All,
   Is there a way to set the date and time stamp on a file?
Thank you...
...Dave

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.

Reply via email to