IBM Mainframe Forum

I've tested passing stem variables to external subroutines and I can't get the value inside the subroutine. I wonder if there's errors in my code or if you can't pass stem variables to external subroutines.

Hello,

Suggest you post the problem code. . .

It may help someone help you.

j = 0
drop sample.
str = 'aa bb cc dd ee'
do j = 1 to words(str)
sample.j = word(str,j)
end
rc = abc(sample. resaon_cd)

......

ABC procedure
argument sample. reason-cd
do j = 1 to sample.0
say sample.j
end

and I got the value from sample.j is sample.j instead of the value I store in the calling rexx program.

What does it say in the manual for passing stem variables to external routines ?