REXX Batch ALLOCATE DD STATEMENT



IBM's Command List programming language & Restructured Extended Executor

REXX Batch ALLOCATE DD STATEMENT

Postby w105202 » Fri Sep 04, 2009 8:12 pm

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
/*
w105202
 
Posts: 2
Joined: Tue Jul 28, 2009 11:43 pm
Has thanked: 0 time
Been thanked: 0 time

Re: REXX Batch ALLOCATE DD STATEMENT

 

Re: REXX Batch ALLOCATE DD STATEMENT

Postby MrSpock » Fri Sep 04, 2009 8:33 pm

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
...
User avatar
MrSpock
Global moderator
 
Posts: 810
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 2 times

Re: REXX Batch ALLOCATE DD STATEMENT

Postby w105202 » Fri Sep 04, 2009 9:24 pm

thanks, it works
w105202
 
Posts: 2
Joined: Tue Jul 28, 2009 11:43 pm
Has thanked: 0 time
Been thanked: 0 time


Return to CLIST & REXX

 


  • Related topics
    Replies
    Views
    Last post