Example 1

//A103D01  JOB .....
//SALARY   PROC  GENER=+1
//S190     EXEC  PGM=PAX
//PDS      DD    DSN=WATSON,DISP=SHR
//PRELPDS  DD    DSN=T191(&GENER),DISP=(NEW,CATLG,DELETE)
//CARDS    DD    DSN=T830(&GENER),DISP=OLD
//STAT     DD    DSN=T192(&GENER),DISP=(NEW,CATLG,DELETE)
//         PEND
//*%OPC RECOVER ERRSTEP=SAX91,JOBCODE=SALR,TIME=0000-2400,
//*%OPC      DELSTEP=SAX80-SAX91,ADDPROC=SALRECOV
//*%OPC RECOVER ERRSTEP=SAX92...  (for steps after SAX91)
//SAX80    EXEC  PGM=IEBISAM
           .
           .
           .
//SAX91    EXEC  SALARY
           .
           .
           .
 Procedure library member SALRECOV:
//*%OPC RECOVER ERRSTEP=SAX92...  (for steps after SAX91)
//SAX91    EXEC  SALARY,GENER=0