Model

//KC03H0E JOB
//STEP1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
  REPRO -
  INDATASET(KC03H0E.Y.X(M1)) -
  OUTDATASET(KC03H0E.Y.X(M2))
  IF LASTCC = 0
      THEN
         DELETE (KC03H0E.Y.X(M1))
/*
//