Page 1 of 1

translating an ICEGENER abend (0099) to a return code

PostPosted: Thu Feb 03, 2011 11:17 pm
by gabrielj
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.

Re: translating an ICEGENER abend (0099) to a return code

PostPosted: Thu Feb 03, 2011 11:22 pm
by MrSpock
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.

Re: translating an ICEGENER abend (0099) to a return code

PostPosted: Fri Feb 04, 2011 12:59 am
by gabrielj
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.

Re: translating an ICEGENER abend (0099) to a return code

PostPosted: Fri Feb 04, 2011 1:26 am
by MrSpock
A simple TSO LISTDS would easily work without causing any errors or abends.

Re: translating an ICEGENER abend (0099) to a return code

PostPosted: Fri Feb 04, 2011 9:19 pm
by gabrielj
Thats another idea. Thanks.

Re: translating an ICEGENER abend (0099) to a return code

PostPosted: Fri Feb 04, 2011 9:29 pm
by gabrielj
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