Hi,
I am writing a rexx tool to find the search string in JCL. I used the VPUT and VGET command to pass the string from rexx code to the macro.
The string received fine using VGET in macro. But i am not able to get the string in the ISREDIT "find" command. Please refer the below code.

Rexx program:

ADDRESS ISPEXEC;"CONTROL ERRORS RETURN"
ADDRESS ISPEXEC
"VPUT (srchvar id ) shared"
"VIEW DATASET ('"EXPMEM"') MACRO(cursor)"
"vget ( id ) shared"

Macro.

/* REXX */
ADDRESS ISREDIT
"MACRO"
ADDRESS ISPEXEC;"CONTROL ERRORS RETURN"
ADDRESS ISPEXEC "VGET (SRCHVAR ID) PROFILE"
ADDRESS ISREDIT
"F ALL '"SRCHVAR"'" - in this place the string is not received.
DROP ARRAYOUT.
FRC = RC

If anyone know the answer means please help me.

Saravanan S

Maybe?

"VPUT (srchvar id ) shared"
"VGET (SRCHVAR ID) PROFILE"