On Fri, 26 Jun 2009 11:28:52 -0500, Robert Birdsall wrote:
>
>JCL fragment:
>
>Actually, if you're willing to deal with the strangeness, you could use the
>following where the '@' is replaced by one byte of hex '00'.
>// SET TODAY=FRI
>//TEST EXEC PGM=IRXJCL,PARM='@ &TODAY=FRI'
>//SYSEXEC DD *
>interpret 'return' arg(1)
>//*
I was completely unaware of the '00'X trick. But it works!
Where's it documented? Comments in the source code of Rexx?
12.2.1.1 "z/OS V1R8.0 TSO/E REXX Reference"
___________________________________________________________________
12.2.1.1 Using IRXJCL to run a REXX exec in MVS batch
To run an exec in MVS batch, specify IRXJCL as the program name (PGM= )
on the JCL EXEC statement. Specify the member name of the exec and one
argument you want to pass to the exec in the PARM field on the EXEC
statement. You can specify only the name of a member of a PDS. You
cannot specify the name of a sequential data set.
I suppose this could be externalized in an INCLUDE member
with "// SET NULL='@'"
Thanks,
gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
