On Tue, 5 Feb 2008 16:08:14 +0100, Rob wrote:
>'callpipe (end \ name BC2.REXX:7)',
> '\ *: ',
> '| insert x15 after',
> '| split before anyof' xxsafe,
> '| split after anyof' xxsafe,
> '| x: if not verify' xxsafe,
> '| spec ,%, 1 1 c2x n',
> '| x:',
> '| deblock linend terminate',
> '| *:'
Instead of the complication of selecting records and fanning them back
together, my approach is generally to insert a special character so that
all records can be treated the same way:
'callpipe *:',
'| insert "%" before',
'| insert x15 after',
'| split before anyof' xxsafe,
'| specs ,%, 1 1 c2x n 2-* n',
'| deblock linend terminate',
'| not chop 3',
'| *:'
¬R
