OK I admit I'm old and my brain sometimes goes out to lunch. Today
is one of those times. I have this error in a REXX macro that I use
in TSO that I just can't figure out how to correct.
The particular instructions are:
/* REXX
ADDRESS ISREDIT
"MACRO (XX)"
IF XX = "T" THEN
DO
ISREDIT LOCATE 1
ISREDIT CHG "&HILVL..ZZ.ZZ.&P.&STK0..PARMLIB" "%%%%%" ALL
IF RC > 0 THEN
SAY "STRING NOT FOUND"
EXIT
END
I am always getting the string not found message. The return code is
a 4. I added that as a trap because I couldn't figure out why
nothing was getting changed in the member I was editing and issuing this macro.
I've looked through the REXX documentation on the IBM site but
nothing is jumping out at me. Any help/suggestions would be appreciated.
Steve Wiegand
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
