On Thu, Aug 20, 2009 at 8:12 PM, Frank M. Ramaekers<[email protected]> wrote:
> I need something like a PARSE (REXX) for PIPEs. Take the following > example: > > Data: > 7000 CUTYPE = 2107-E8, DEVTYPE = 3390-0C, VOLSER =, CYLS = 30051 > 06FE CUTYPE = 2107-E8, DEVTYPE = 3390-0A, VOLSER = 540RES, CYLS = 3339 > 7001 CUTYPE = 2107-E8, DEVTYPE = 3390-0C, VOLSER =, CYLS = 30051 > 7002 CUTYPE = 2107-E8, DEVTYPE = 3390-0C, VOLSER =, CYLS = 30051 > > I need to extract the CCUU (first field) DEVTYPE, VOLSER and CYLS > fields. Notice that three of the devices above don't have FOLSERs. So, > extracting this information by column is impossible. I would probably do something like this (quick & dirty) spec fs , ws = substr w2 of f2 1 substr w2 of f3 10 substr w2 of f4 20.6 r Rob
