My bad for not including the JCL. Here is the offending step:

/*                                                             
/DP107S30 EXEC PGM=IFASMFDP,REGION=2048K,COND=(0,NE)           
/SYSPRINT  DD SYSOUT=*                                         
/SYSIN     DD DISP=SHR,DSN=PROD.PARMLIB(TYPE235P)              
/          DD DISP=(SHR,PASS),DSN=&&TMPDAT                     
/INDD01    DD DISP=SHR,DSN=SYS3.DFHSM.DAILY.SMF.DATA           
/          DD DSN=&&TYPE235,DISP=(OLD,KEEP)                    
/OUTDD01   DD DSN=SYS3.DFHSM.DAILY.SMF.COPY(+1),               
/           DISP=(NEW,CATLG),LABEL=EXPDT=99000,VOL=(,RETAIN),  
/           UNIT=TAPE90,DCB=(IPOBAK.PATTERN.DSCB,              
/           DSORG=PS,RECFM=VB,LRECL=11418,BLKSIZE=22836)       
/*                                                             

 A wag - GDG processing is getting in the mix?

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