>> 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

Reply via email to