|
View previous topic :: View next topic
|
| Author |
Message |
CH Lakshmi Sirisha
Currently Banned
New User
Joined: 04 Jul 2007
Posts: 1
Location: chennai
|
|
|
|
Hi, Could anyone please help me.
My REXX program is about to replace particular working storage variable with a new variable,It has to be changed with the new variable wherever it is found in the procedure division.I am able to do the changes,but the thing is that in my procedure division,it is deleting the full statment and placing a new variable.I dont want to delete the full STMT i want only to replace a new variable in the existing variable with out deleting the entire STMT. |
|
| Back to top |
|
 |
saiprasadh
Active User
Joined: 20 Sep 2006
Posts: 154
Location: US
|
|
|
|
Hi Lakshmi
Use the below code
| Code: |
X = 'PROCEDURE DIVISION'
POSN = POS('PROCEDURE',X)
POSN = POSN - 1
TEST = INSERT('STMT',X,POSN)
POS2 = POS(PROCEDURE,TEST)
X = DELSTR(TEST,POS2,9)
SAY X |
Where 9 is the length of the PROCEDURE
Input
Output
Thanks
Sai |
|
| Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales
|
|
|
|
CH Lakshmi Sirisha
Please do NOT post attachments as many people are unable to access these from the internet while at the office.
This cuts down on the number of people that are able to help you. |
|
| Back to top |
|
|
|
|
