Quote: |
My desire is to mod onto the dataset if it failed before and have it deleted upon completion of a good run. |
jvlasvel wrote: |
If I code DISP=(NEW,PASS,CATLG) for an existing dataset, and job runs clean, the dataset is deleted as expected. If I code DISP=(MOD,PASS,CATLG) and the job runs clean the dataset remains. This is not what I expected. I expected the datset to be deleted as it does with DISP=(NEW. My desire is to mod onto the dataset if it failed before and have it deleted upon completion of a good run. |
Code: |
//SE16661S JOB (SDS,T,ZN,00),'STEVE',MSGCLASS=H,NOTIFY=&SYSUID, // MSGLEVEL=(1,1),CLASS=A,TIME=(5,0) // SET D1='(NEW,PASS,CATLG)' // SET D2='(MOD,PASS,CATLG)' //*-------------------------------------------------------------------- //CLEANUP EXEC PGM=IEFBR14 //EXISTS1 DD DISP=&D1,DSN=SE16661.IFTHEN.TEST1,SPACE=(TRK,1) //EXISTS2 DD DISP=&D2,DSN=SE16661.IFTHEN.TEST2,SPACE=(TRK,1) // |
Code: |
IEF453I SE16661S - JOB FAILED - JCL ERROR ... and ... IEF344I SE16661S CLEANUP EXISTS1 - ALLOCATION FAILED DUE TO DATA FACILITY SYSTEM ERRORDATA FACILITY SYSTEM IGD17101I DATA SET SE16661.IFTHEN.TEST1 NOT DEFINED BECAUSE DUPLICATE NAME EXISTS IN CATALOG RETURN CODE IS 8 REASON CODE IS 38 IGG0CLEH |
Code: |
// SET D1=SHR |
Code: |
14.27.13 JOB14655 GSDMV20I JOBNAME- --STEP-- -PSTEP-- CCODE ELAPSED-TIME -CPU-T 14.27.13 JOB14655 GSDMV21I SE16661S CLEANUP 0 00:00:00 0 14.27.13 JOB14655 IEF404I SE16661S - ENDED - TIME=14.27.13 ... and ... IEF142I SE16661S CLEANUP - STEP WAS EXECUTED - COND CODE 0000 IGD104I SE16661.IFTHEN.TEST1 RETAINED, DDNAME=EXISTS1 IEF373I STEP/CLEANUP /START 2006229.1427 IEF374I STEP/CLEANUP /STOP 2006229.1427 CPU 0MIN 00.00SEC SRB 0MIN 00.00S IGD104I SE16661.IFTHEN.TEST2 RETAINED, DDNAME=EXISTS2 |
output generated using printer-friendly topic mod. All times are GMT - 5 Hours