Here is what I do to have the rexx instream and run it:

//CREATREX  EXEC PGM=IEBGENER
//SYSPRINT  DD SYSOUT=*
//SYSIN     DD DUMMY
//SYSUT2   DD  DSN=&&PDS(REXX),UNIT=SYSALLDA,
//             DISP=(NEW,PASS,DELETE),
//             SPACE=(TRK,(1,1,1)),
//             DCB=(LRECL=80,BLKSIZE=3120,RECFM=FB,DSORG=PO)
//SYSUT1    DD DATA,DLM=##
/* rexx here */
##
//EXECREXX EXEC PGM=IKJEFT01,PARM='REXX',REGION=0M
//SYSTSIN  DD  DUMMY
//SYSTSPRT DD  SYSOUT=*
//SYSEXEC  DD  DSN=&&PDS,DISP=(OLD,DELETE,DELETE)

Regards,
Leo

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[email protected]] On Behalf 
Of Paul Gilmartin
Sent: Saturday, April 27, 2013 9:43 PM
To: [email protected]
Subject: Re: Run a REXX from JCL stream

On Sat, 27 Apr 2013 19:49:23 -0500, John McKown wrote:

>REXX programs cannot be written inline. ...
> 
Perhaps.  There may be an undocumented, probably unintended, certainly 
unsupported back door: it has been reported that if you invoke IRXJCL supplying 
binary zeroes in PARM as a member name, the interpreter perceives SYSEXEC as a 
sequential data set and executes it as such.

I don't recall whether I've tried it.  I wouldn't rely on it.

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
[email protected] with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to