> dig it out of the SYSPROC DD

Not sure I understand your question entirely, but it seems that you mean 
an inline rexx program when you say 'inline proc'... is that correct?

Assuming yes: (there are probably better ways, but I came up with this 
some time ago) you still need SYSPROC, but use a temporary dataset:

//GENER   EXEC PGM=IEBGENER 
//SYSPRINT  DD SYSOUT=9 
//SYSIN     DD DUMMY 
//SYSUT1    DD DDNAME=CLIST 
//SYSUT2    DD DISP=(NEW,PASS),DSN=&&TMP(SAYIT), 
//             UNIT=SYSVIO,SPACE=(TRK,(1,1,1)), 
//             DCB=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=3120) 
//CLIST     DD *,DLM=#$ 
 /* rexx */
 Parse arg theparms
 Say theparms
#$ 
//* 
//BATCHTSO  EXEC PGM=IKJEFT01,
//          PARM='%SAYIT PARM2TMP &FUNCTION'
//SYSPROC   DD DISP=(OLD,DELETE),DSN=&&TMP 
//SYSTSPRT DD SYSOUT=H 
//SYSTSIN DD DUMMY 



Pedro Vera
phone           (408) 463-4812
internet         [EMAIL PROTECTED]

----------------------------------------------------------------------
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

Reply via email to