> And that converter might be written as a pipeline. Primarily because
> Pipelines addresses Rexx's lack of instream data capability by providing
> the BEGOUTPUT command. Too often I've had to write an EXEC/XEDIT pair,
> one to launch XEDIT naming the other as a profile. Instream data could
> reduce this to a single EXEC. The command stack is a cumbersome
> alternative.
Those who've been on the other side may appreciate this approach:
//JOBLIB DD DSN=RVDHEIJ.TSOPIPE.LOAD,DISP=SHR
//PIPE EXEC PGM=PIPE,
// PARM='< dd=pipe1 | join * , , | runpipe | > dd=sysprint'
//SYSPRINT DD SYSOUT=*
//CONS DD SYSOUT=*
//PIPE1 DD DATA
(END \)
\ query | cons
\ strliteral /Now is the time for all /
| xlate e2a
| strliteral x0123456789abcdef
| o: fanout
| cipher des encrypt
| i: fanin
| spec 1-* c2x
| xlate lower
| vchar 64 72 pad 40
| cons
\ o:
| buffer
| cipher des encrypt cbc iv x1234567890abcdef
| i:
/*