Description:
We would like to use the PDSIO interface to run an IMOD synchronously and want to know how to return data from the IMOD to the calling program.
FAQS/PCS 5.0 Implementation Guide page A-19 show:
Executing an IMOD Synchronously: EXEC however there is no example how to code the IMOD in order to return a value.
Solution:
Data can be passed to the calling program using the RETURN instruction of the REXX Procedure: RETURN 'data'
Data can only be passed when the function EXEC (Run an IMOD and return result to user) is used. While using the function IMOD (Tell Unicenter CA-FAQS ASO to run an IMOD) no ReturnCode is passed: Note: Since this function only starts execution of the IMOD, its return code does not indicate whether the IMOD completed successfully.
JCL example:
/* rexxsmp */ /* your code */ RETURN 'it ran'