SRMJOB03—Delete a data set
SRMJOB03 skeleton JCL example
//SRMJOB03 JOB (3500),'XXXXX',CLASS=A,MSGCLASS=X
//* TYPRUN=HOLD
//******************************************************************
//* DELETE DATA SET *
//******************************************************************
//* SOLUTION IS &SOL
//* FUNCTION IS &FUNC
//******************************************************************
//STEP0001 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
)DO
//*DD&I DD DISP=(OLD,DELETE,DELETE),
//* DSN=&DSN,
//* VOL=SER=&VOLSER,
//* UNIT=SYSALLDA
)END
//* TYPRUN=HOLD
//******************************************************************
//* DELETE DATA SET *
//******************************************************************
//* SOLUTION IS &SOL
//* FUNCTION IS &FUNC
//******************************************************************
//STEP0001 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
)DO
//*DD&I DD DISP=(OLD,DELETE,DELETE),
//* DSN=&DSN,
//* VOL=SER=&VOLSER,
//* UNIT=SYSALLDA
)END
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*