Ficly

How To Get Fired

//HTGF JOB (45), ‘CHLLNG’,CLASS=A
//STEPDEL EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=A
//SYSIN DD *
DELETE ALPHA.PROD.PAYROLL.* PURGE ERASE ALL ARCHIVE
/*

View this story's 9 comments.