On Wed, 27 Sep 2023 20:04:13 +0000, Sri h Kolusu wrote:
>>> I'm trying to test the exit, but have been unable to create an IO error to
>>> drive it.
>
>Here is a sample job to generate the S001-4 abend
>
Can it drive the OP's SYNAD exit? I've had "successful failures" with:
//SYSUT1 DD FILEDATA=TEXT,PATH=...
... pointing to a UNIX file with records too long for the DD LRECL.
>//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
--
gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
