translating an ICEGENER abend (0099) to a return code



IBM's flagship sort product DFSORT for sorting, merging, copying, data manipulation and reporting. Includes ICETOOL and ICEGENER

translating an ICEGENER abend (0099) to a return code

Postby gabrielj » Thu Feb 03, 2011 11:17 pm

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.
gabrielj
 
Posts: 4
Joined: Thu Feb 03, 2011 10:48 pm
Has thanked: 0 time
Been thanked: 0 time

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

Postby MrSpock » Thu Feb 03, 2011 11:22 pm

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.
User avatar
MrSpock
Global moderator
 
Posts: 807
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 4 times

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

Postby gabrielj » Fri Feb 04, 2011 12:59 am

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.
gabrielj
 
Posts: 4
Joined: Thu Feb 03, 2011 10:48 pm
Has thanked: 0 time
Been thanked: 0 time

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

Postby MrSpock » Fri Feb 04, 2011 1:26 am

A simple TSO LISTDS would easily work without causing any errors or abends.
User avatar
MrSpock
Global moderator
 
Posts: 807
Joined: Wed Jun 06, 2007 9:37 pm
Location: Raleigh NC USA
Has thanked: 0 time
Been thanked: 4 times

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

Postby gabrielj » Fri Feb 04, 2011 9:19 pm

Thats another idea. Thanks.
gabrielj
 
Posts: 4
Joined: Thu Feb 03, 2011 10:48 pm
Has thanked: 0 time
Been thanked: 0 time

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

Postby gabrielj » Fri Feb 04, 2011 9:29 pm

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
gabrielj
 
Posts: 4
Joined: Thu Feb 03, 2011 10:48 pm
Has thanked: 0 time
Been thanked: 0 time


Return to DFSORT/ICETOOL/ICEGENER

 


  • Related topics
    Replies
    Views
    Last post