I suggest that you post this issue on the mvs-oe list, where you are much
more likely to have an IBM z/OS Unix guy see it.
On Tue, Oct 30, 2018 at 7:32 AM Steve Austin <steve.aus...@macro4.com>
wrote:
> Hi,
>
> Is there a way to persuade the above to return the full path name?
> Alternatively, is there another REXX invocable routine that will return the
> full path name?
>
> Thanks
>
> Steve
>
> JCL:
>
> // EXEC PGM=IRXJCL,
> // PARM='REXXTEST'
> //SYSEXEC DD DSN=SA.EXEC,DISP=SHR
> //SYSTSPRT DD SYSOUT=*
> //UFSOUT DD PATH='/userhome/sa/space dir',
> // PATHOPTS=(ORDONLY)
> //
>
> REXX:
>
> /*rexx: get the path name from the UFSOUT DD */
> xrc = bpxwdyn("INFO DD(UFSOUT) INRTPATH(dir)")
> if xrc \=0 then do
> say "Error obtaining the pathname from JCL DD UFSOUT;",
> "correct JCL DD(UFSOUT)"
> exit(xrc)
> end
> say 'pathname='dir
> exit(0)
>
> Result:
>
> pathname=/userhome/sa/space
>
>
>
>
> --
> This e-mail message has been scanned and cleared by Google Message
> Security
> and the UNICOM Global security systems. This message is for the named
> person's use only. If you receive this message in error, please delete it
> and notify the sender.
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
