Replace the !SPECS 16-1 by !SPECS X05 1 W1 Next x05 Next W2 Next 2008/12/16 Wilson, Roger <[email protected]>: > Ok, now one step further. I have e rexx exec that uses piped instead of > the Stack. I write out a line, but what I need is the records that > contain the values CICS, DOSVSE and COMP be prefaced with the x'05' also > between the CICS, DOSVSE or COMP and the numbers. > > > > Example: > > /*VMC INTERFACE FOR MONITOR CPU */ > rundate = date(weekday) > tab = '05'x > parse arg where > I = 1 > parse arg where > if where = '' then where = 'PERFSVM ' > 'PIPE (end ?) VMC ' where ' USER ', > '|O: Fanout', /* Make a second copy of the data */ > '| all /CICS/ ! /DOSVSE/ ! /COMP/' , > '| SPECS 1-16 1', > '| LITERAL' rundate DATE() TIME(), > '| >> CPUUTIL LOG B ' > EXIT > > Generates this file > Tuesday 16 Dec 2008 15:22:25 > CICS 9.37 > DOSVSE .25 > COMP .18 > Tuesday 16 Dec 2008 15:26:43 > CICS 19.5 > DOSVSE .25 > COMP .19 > > > I need a tab before CICS, DOSVSE or COMP and the numbers. >
-- Kris Buelens, IBM Belgium, VM customer support
