IBM Mainframe Forum

I would like to translate an ICEGENER abend (0099) to a return code and avoid an abend. I used IRXJCL to do this but the job
still abended even though the return code was a 4. In other words I would like to avoid the IEA995I SYMPTOM DUMP OUTPUT
messages and just get a non-zero return code. I want the job to read a PDS member that may or may not exist. If I use
IEBGENER I may get a S013-18 (member not found). So I want to avoid an abend and just get a return code.
The sysut1 is as follows. //SYSUT1 DD DSN=TS01JG.JCL.CNTL(XXXX),DISP=SHR. In this case member XXXX does not exist.

I don't understand. Shouldn't you just by-pass this process if the member doesn't exist? I think you're asking for something that can't be done.

When the step does not find the member the job drops down to another step to look in a different dataset for the same member.
We used to have LIBRARIAN but no longer have it. When librarian could not find a member it returned a cond code of 12.
It did not abend. I could use IEBUPDTE it does not abend when it could not find a member. See below.
IEB817I MEMBER NAME (ASDF ) NOT FOUND.

A simple TSO LISTDS would easily work without causing any errors or abends.

Thats another idea. Thanks.

IEBUPDTE and ICETOOL both return a non zero cond code without abending. Then I could use a rexx exec to change it to a
more meanful cond code. Or I could use LISTDS. Thanks again