Page 1 of 1

REXX Batch ALLOCATE DD STATEMENT

PostPosted: Fri Sep 04, 2009 8:12 pm
by w105202
Hi,
i create a temproray dataset on the first step on my job. How can i allocate this
dataset on the the rexx procedure ?
Is it possible to define a DD Statement on the second step (CATIN DD ) and
then allocate this on the rexx procedure?

Thanks for help

//STEP2 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//CATIN DD DISP=PASS,DSN=&&CATOUT
//SYSIN DD DUMMY
//SYSUT2 DD DSN=&&SYSEXEC(DDEFVOL),DISP=(,PASS),UNIT=SYSDA,
// SPACE=(TRK,(1,1,1))
//SYSUT1 DD *,DLM=@@
/* REXX */

ADDRESS TSO
X = MSG('OFF')
/*------------------------------------------------ -----------------*/
/* ERSTELLE DDDEF LISTING TARGET ZONE */
/*------------------------------------------------ -----------------*/
"ALLOC F(CATIN) DSN('???????') SHR REUSE"
@@
//DDEFVOL EXEC PGM=IKJEFT01
//SYSEXEC DD DSN=&&SYSEXEC,DISP=(OLD,DELETE)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD *
PROF MSGID
DDEFVOL
/*

Re: REXX Batch ALLOCATE DD STATEMENT

PostPosted: Fri Sep 04, 2009 8:33 pm
by MrSpock
w105202 wrote:Is it possible to define a DD Statement on the second step (CATIN DD ) and
then allocate this on the rexx procedure?


Yes, that's exactly how you would do it.

//STEP2 EXEC ...
...
//CATIN DD DISP=(,PASS),DSN=&&CATOUT
...
//DDEFVOL EXEC PGM=IKJEFT01
...
//CATIN DD DISP=(OLD,DELETE),DSN=&&CATOUT
...

Re: REXX Batch ALLOCATE DD STATEMENT

PostPosted: Fri Sep 04, 2009 9:24 pm
by w105202
thanks, it works