Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Question regarding ILBOABN0

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
satya12

New User


Joined: 25 Apr 2006
Posts: 32
Location: India

PostPosted: Thu Dec 03, 2009 4:31 pm    Post subject: Question regarding ILBOABN0
Reply with quote

Hi,

I am calling ILBOABN0 with abend code +777.I have declared the abend code variable as S9(04) comp-3.But when the program abends, it is showing the COMP CODE=U0119 and RC=119.

What i need to do if i wan to get COMP CODE=U0777 and RC=777.

Thanks,
Satya.
Back to top
View user's profile Send private message

dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Thu Dec 03, 2009 4:36 pm    Post subject:
Reply with quote

Quote:
I have declared the abend code variable as S9(04) comp-3.


are you sure that the variable should be Packed-Decimal and not Binary?
Back to top
View user's profile Send private message
Mathiv Anan

Active User


Joined: 23 Jul 2008
Posts: 106
Location: USA

PostPosted: Thu Dec 03, 2009 4:42 pm    Post subject: Reply to: Question regarding ILBOABN0
Reply with quote

Yes Dick.

It should be COMP variable.
Back to top
View user's profile Send private message
satya12

New User


Joined: 25 Apr 2006
Posts: 32
Location: India

PostPosted: Thu Dec 03, 2009 4:46 pm    Post subject: Reply to: Question regarding ILBOABN0
Reply with quote

You are right.It should be S9(04) comp not comp-3.

Thanks,
Satya.
Back to top
View user's profile Send private message
neontech
Warnings : 1

New User


Joined: 08 Dec 2009
Posts: 11
Location: mumbai

PostPosted: Tue Dec 08, 2009 5:23 pm    Post subject:
Reply with quote

can you paste the piece of code which you are executing.. it should throw you correct abend code
Back to top
View user's profile Send private message
neontech
Warnings : 1

New User


Joined: 08 Dec 2009
Posts: 11
Location: mumbai

PostPosted: Tue Dec 08, 2009 5:50 pm    Post subject:
Reply with quote

Just make sure that you pass the correct return code to the jcl..

something mentioned below:

IF match *
MOVE 717 TO RETURN-CODE
ELSE
MOVE 100 TO RETURN-CODE

this will work for sure...
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Dec 08, 2009 6:01 pm    Post subject:
Reply with quote

Quote:
You are right.It should be S9(04) comp not comp-3.
Back to top
View user's profile Send private message
neontech
Warnings : 1

New User


Joined: 08 Dec 2009
Posts: 11
Location: mumbai

PostPosted: Tue Dec 08, 2009 6:19 pm    Post subject:
Reply with quote

Anuj,, what is quote?
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Dec 08, 2009 6:23 pm    Post subject:
Reply with quote

It tells what was the final solution worked for the OP.(Origianl Poster)
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Tue Dec 08, 2009 7:40 pm    Post subject:
Reply with quote

neontech,

if you are referring to BBcode (or modified markup code) this link will explain.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Fault Analyzer - listings question. egrove IBM Tools 4 Thu Aug 11, 2016 5:31 pm
No new posts dataset copy question - REPRO or some... atulxp TSO/ISPF 2 Wed Aug 03, 2016 10:56 pm
No new posts SQL Order By related question Joseph K Thomas DB2 8 Fri Mar 18, 2016 12:53 pm
No new posts DFSort Question krrp DFSORT/ICETOOL 9 Mon Mar 07, 2016 7:11 pm
No new posts Question: REORG on LOB tablespaces rakesh1155 DB2 1 Fri Aug 14, 2015 2:14 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us