Tommy, You latest attempt created two temporary nonvsam datasets. The default DISP is NEW,DELETE,DELETE. We got around this issue by putting a IEFBR14 step before the IDCAMS step. Example: //IEFBR14 EXEC PGM=IEFBR14 //DD1 DD DSN=ZDVT.ALLOC1,DISP=(NEW,DELETE),UNIT=SYSDA, // SPACE=(TRK,1) //DD2 DD DSN=ZDVT.ALLOC2,DISP=(NEW,DELETE),UNIT=SYSDA, // SPACE=(TRK,1) /* DEFINE & BUILD ALTERNATIVE INDEX PATH */ //BUILDIDX EXEC PGM=IDCAMS,COND=(8,LE),REGION=6M //SYSPRINT DD SYSOUT=* //IDCUT1 DD DSN=ZDVT.MGDC001.IDCUT1,DISP=OLD, // UNIT=SYSDA,VOL=REF=*.IEFBR14.ALLOC1,AMP='AMORG' //IDCUT2 DD DSN=ZDVT.MGDC001.IDCUT2,DISP=OLD, // UNIT=SYSDA,VOL=REF=*.IEFBR14.ALLOC2,AMP='AMORG' //SYSIN DD DSN=&LBMGD..BAT.PARMLIB(DEFFILEB),DISP=SHR // DD DSN=&LBMGD..BAT.PARMLIB(DEFTDGPA),DISP=SHR
Regards, John ---------------------------------------------------------------------- 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
