Now I have one. Maybe I'm just dense today, but I need something like
[str]whilelabel which stops when it hits a non-matching label rather
than discarding non-matches. A rexx stage is easy enough, but it seems
it should be possible in pure plumbing without getting too involved. To
wit:
Arg label
'peekto inrec'
Do while substr(inrec,1,length(label))==label
'output inrec'
'readto'
'peekto inrec'
End
Thus leaving the input stream intact with the first non-matching record
as next up.
Mike Harding
EDS VM National Capability
134 El Portal Place
Clayton, Ca. USA 94517-1742
* phone: +01-925-672-4403
* Fax: +01-925-672-4403
* mailto:[EMAIL PROTECTED] * <mailto:[EMAIL PROTECTED]>
(personal)
Note: For 2007, I am off on Fridays with even Julian dates and Mondays
with odd ones.
