How about this:
rundate = date(weekday)
say rundate
parse arg where
if where = '' then where = 'PERFSVM '
'PIPE (endchar $) VMC ' where ' USER | all /Interval' ,
'| specs 35-65 1',
'| literal' rundate, /* Add rundate as first line */
'| a: fanin', /* Append data from the next stream */
'| > COMBINED LOG A ', /* Replace existing file with the new file
*/
'$',
'VMC ' where ' USER | all /CICS/ ! /DOSVSE/ ! /COMP/' ,
'| specs 1-16 1',
'| a:'
EXIT
Peter
-----Original Message-----
From: The IBM z/VM Operating System [mailto:[email protected]] On
Behalf Of Wilson, Roger
Sent: December 12, 2008 16:14
To: [email protected]
Subject: Re: Using REXX/VM
I want to put rundate as a line, the value of Interval log a as the
next line then the values from 'PIPE VMC ' where ' USER | all /CICS/ !
/DOSVSE/ ! /COMP/' into one file, how would I do that?
This is what I have:
rundate = date(weekday)
say rundate
parse arg where
if where = '' then where = 'PERFSVM '
'PIPE VMC ' where ' USER | all /Interval' ,
'| specs 35-65 1',
'| >> INTERVAL LOG A '
'PIPE VMC ' where ' USER | all /CICS/ ! /DOSVSE/ ! /COMP/' ,
'| specs 1-16 1',
'| >> CPUUTIL LOG A '
EXIT
The information transmitted is intended only for the person or entity to which
it is addressed and may contain confidential and/or privileged material. Any
review retransmission dissemination or other use of or taking any action in
reliance upon this information by persons or entities other than the intended
recipient or delegate is strictly prohibited. If you received this in error
please contact the sender and delete the material from any computer. The
integrity and security of this message cannot be guaranteed on the Internet.
The sender accepts no liability for the content of this e-mail or for the
consequences of any actions taken on the basis of information provided. The
recipient should check this e-mail and any attachments for the presence of
viruses. The sender accepts no liability for any damage caused by any virus
transmitted by this e-mail. This disclaimer is property of the TTC and must
not be altered or circumvented in any manner.
