Here is a sample of what I have working:
/* */
Signal on novalue
"peekto $data"
Do while rc = 0
Parse var $data $x1 $x2 $x3 .
"callpipe < backup jcl a ",
"| change /$var1/"$x1"/" ,
"| change /$var2/"$x2"/" ,
"| change /$var3/"$x3"/" ,
"| *: "
"peekto $data"
End
Return rc*(rc<>12)
Is there a way to connect the input stage(peekto) directly to the
callpipe reading the input file and do the variable substitution?
Just curious....
____________________
Jim Hughes
603-271-5586
"It is fun to do the impossible."
