I have gone back to your original question. What level of operating system are you running? z/OS ????
Do you have DFSMS along with DFSMShsm in your shop? If so, why not use SMS to control how long a dataset stays. You can set it up so if a dataset is on dasd for 2 days the third day it gets deleted. Then the JCL does not need the RETPD or EXPDT and you can use JCL to do MOD,DELETE or SHR,DELETE without concern? Lizette > Hi, > How do I delete a non sms dataset with an expiration date using JCL. > > > If the dataset does not have an expiration date, I can use DISP=(SHR,DELETE). > > If the dataset is sms managed, the OVRD_EXPDT allows the override of the expiration > date. > > Is there a way to accomplish this for non sms datasets? > > IF I run this job: > > //STEP1 EXEC PGM=IEFBR14 > > //DD1 DD DSN=V110.TGBA.TESTDEL,DISP=(,CATLG,DELETE),UNIT=3390, > > // SPACE=(TRK,1),LRECL=80,RETPD=2,VOL=SER=PRJ002 > > //DEL EXEC PGM=IEFBR14 > > //DD1 DD DSN=V110.TGBA.TESTDEL,DISP=(SHR,DELETE),RETPD=0 > The first step works, and the second step iisues: > > IEC614I SCRATCH FAILED - RC 008, DIAGNOSTIC INFORMATION IS (040B004B), > > ,PRJ002,V110.TGBA.TESTDEL > > The 040B004B reason code means that the dataset is not expired. > > Can anyone help? > ---------------------------------------------------------------------- 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
