VGET - JCL

[dilipkumartr]

Hello Everyone,
I have a problem using VGET.
I have two REXX codes, I am submitting the second REXX (batch mode) using the first REXX. I want to pass few values to the second REXX.

I tried to use VPUT - VGET logic. I get RC -3, when the second REXX is submitted in batch mode.
When I tried the same REXX code in the foreground mode, VGET functions as expected.

Please advice.
Thanks
Dilip.

 

[B4db0y]

One Rexx calls the other
Or
2 Steps?

What about a Return Value?
or
Temp-Dataset?


Best regards
B4db0y

____________________________________________________________
So Long, and Thanks for All the Fish

 

[rexxhead]

A RC(-3) always means "wrong address or environment doesn't exist". Always.

You're running in batch: did you ISPSTART the command? Are all necessary DDs (ISPPLIB, ISPSLIB, ISPTLIB, ISPPROF, ISPLOG) present?

Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster

 

[dilipkumartr]

One REXX is calling the other REXX in batch mode.

REXX-1
N = "5"
QUEUE N
ADDRESS ISPEXEC "VPUT (N) SHARED"
ADDRESS TSO "SUBMIT 'DRY9216.SOURCE.REXX(JCL)'"
*******************************************************
DRY9216.SOURCE.REXX

//DRY9216G JOB (0500000000,P550,240),
// CLASS=L,MSGCLASS=R,REGION=6M
//IRXJCL1 EXEC PGM=IRXJCL,PARM='HELLO'
//SYSEXEC DD DISP=SHR,DSN='DRY9216.SOURCE.REXX'
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
**********************************************************
REXX-2
/*HELLO REXX*/
ADDRESS ISPEXEC "VGET (N) shared"
say 'hi... this is dilip ' n


Let me know if you need more information to answer my question.

Thanks
Dilip

 

[kevinf2349]

See Frank's response!

Or you could always use skeleton JCL and insert the value for 'N' directly into the JCL and pass it to the REXX EXEC but I suspect this is more a proof of concept rather than a genuine requirement to invoke a HELLO exec

 

[rexxhead]

It's pretty clear Dilip wants someone to write the app for him...


Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster