On 23 May 2007 09:19:03 -0700, in bit.listserv.ibm-main you wrote:

>Hi Ken,
>
>You can only reference a temporary data set once in a job step.    

Not true.  You can have multiple references if you use VOL=REF
referring to the first DD for all subsequent DDs.  UNIT=AFF also might
be useful in addition.
>
>(Cue ranting from the Peanut Gallery about restrictive JCL designs from the
>1960's.  And for those of you not familiar with the term, Wikipedia says:
>http://en.wikipedia.org/wiki/Peanut_gallery .)
>
>
>You'll have to create another temporary PDS and IEBCOPY the first to the
>second.
>
>Later,
>Ray
>
>
>----- Original Message ----- 
>From: "Ken Leidner" <[EMAIL PROTECTED]>
>Newsgroups: bit.listserv.ibm-main
>Sent: Wednesday, May 23, 2007 10:55 AM
>Subject: &&PDS caused JCL error - WHY
>
>
>>I was wondering if any body can shed some light on why I get a JCL 
>> error, dataset not found in STEP009 for the MODEL DD card.  The strange 
>> thing is that if I do a global change of &&PDS to say T.PDS the JCL 
>> error does not occur.  Also if the MODEL DD and the SYSEXEC DD in 
>> STEP009 are reversed, then the SYSEXEC gets the JCL error, dataset not 
>> found.
>> 
>> //STEP008  EXEC PGM=IEBUPDTE,PARM=NEW,REGION=6M 
>> //SYSPRINT  DD SYSOUT=*                         
>> //SYSUT2   DD  DSN=&&PDS,DISP=(NEW,PASS),       
>> //             LRECL=80,BLKSIZE=0,RECFM=FB,     
>> //             SPACE=(TRK,(15,1,4)),UNIT=SYSDA  
>> //SYSIN    DD  *                                
>> ./  ADD  NAME=HTML                              
>> ./  ADD  NAME=GENHTML                           
>> /*                                              
>> //STEP009  EXEC PGM=IKJEFT01,REGION=6M          
>> //SYSTSPRT  DD SYSOUT=*                         
>> //SYSEXEC   DD DSN=&&PDS,DISP=(SHR,PASS)        
>> //SYSPROC   DD DSN=SYS1..ISPCLIB,DISP=SHR       
>> //IN        DD DSN=&&AC,DISP=(OLD,DELETE)       
>> //MODEL     DD DSN=&&PDS(HTML),DISP=(SHR,PASS)  
>> //SYSTSIN   DD *                                
>> GENHTML          
>> /*                               
>>
>
>----------------------------------------------------------------------
>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

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