/* */

Parse Arg nword1 nword2 .

file = 'INPUT FILE A'

'PIPE FILE' file '| SPECS W1-2 1 /'nword1'/ nw /'nword2'/ nw w5-* nw | >
OUTPUT FILE A'


I think this does what you want -- though I'm not sure how you want to
handle possible multiple spaces between words.

Scott Rohling

On Tue, Apr 27, 2010 at 11:13 AM, Florian Bilek <[email protected]>wrote:

> Dear all,
>
> I am trying to write a REXX exec using CMS PIPES. I am totally new to this
> subject and try to understand how the pipes are working. So it can be that I
> make something totally wrong.
>
> I would like to replace 2 words in a string starting at word 3. The content
> of those words are not known, therefore I can not use change."
> I thought I would use the built-in program THREEWAY to solve that problem.
>
> However when I start the exec following error message is produced:
>
> FPLSCB027E Entry point THREEWAY not found
>
> z/VM 5.4 is installed.
>
> I don't really know whats going on here. Maybe I don't understand how to
> invoke THREEWAY or there is something other wrong with it.
>
> Maybe some of you have an idea. Thank you very much in advance.
>
> Kind regards,
> Florian
>
>
> Here is a test program:
>
> /* REXX */
>
> "pipe (end ?) ",
> "literal /This is a word string/ ",
> "!t: threeway word 3 2 ! console",
> "?t:",
> "! literal /second/",
> "! console",
> "?t:",
> "! literal /third/",
> "!console"
>
> return
>
> --
> Best regards
>
> Florian Bilek
>

Reply via email to