Off the top of my head, frtarget strfind /label/ | totarget strnfind /label/?
bc On 10/3/07, Harding, Mike <[EMAIL PROTECTED]> wrote: > > 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. >
