>> I'm trying to test the exit, but have been unable to create an IO error to >> drive it.
Ralph, Here is a sample job to generate the S001-4 abend //STEP0100 EXEC PGM=IKJEFT01 //SYSTSPRT DD SYSOUT=*,DCB=BLKSIZE=121 //SYSTSIN DD DATA,DLM=@@,LRECL=200 DSN @@ /* This will result in IEC020I 001-4,COPYJOB ,STEP0100,SYSTSIN ,JES IEC020I EROPT IS 'ABE' OR NOT SPECIFIED Thanks, Kolusu ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN