IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Abend code not displayed in MAX - RC in SDSF for COBOL pgm


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
senjay

Active User


Joined: 10 May 2007
Posts: 147
Location: India

PostPosted: Tue Aug 26, 2008 11:28 am
Reply with quote

Hi All,

COBOL is not my area and i have been asked to forcefully abend the code in the COBOL program. I used CEE3ABD in the code. Now when i executed the program, the SYSOUT of the program exeution step is showing that user abend is issued. But MAX - RC is displayed as 12 in spool.

We didn't handle condition code 12 in the program anyways. Could anyone explain me why the abend code is not displayed in MAX - RC of SDSF and suggest me the corrective action.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Tue Aug 26, 2008 11:33 am
Reply with quote

Hello,

An abend is not the same thing as a return-code.

Please post the jes sysout iinfo that shows the abend and/or the return code(s).
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1287
Location: Chennai, India

PostPosted: Tue Aug 26, 2008 11:38 am
Reply with quote

Senjay,

Quote:
SYSOUT of the program exeution step is showing that user abend is issued. But MAX - RC is displayed as 12 in spool.


What is the ABEND CODE that was issued?
Back to top
View user's profile Send private message
senjay

Active User


Joined: 10 May 2007
Posts: 147
Location: India

PostPosted: Tue Aug 26, 2008 11:40 am
Reply with quote

Hi Expat,

Below is the SYSOUT informations. Please let me know if you need more info.


*** A-MAIN-FLOW IN pgm-name***
*** P010 - PROCESSING ***
** PGM-PROCESS **
CEE3250C The system or user abend U3002 R=00000000 was issued.
From compile unit CSPARDB at entry point CSPARDB at compile unit offset +00000544 at entry offset +00000544
at address 13402014.
<> LEAID ENTERED (LEVEL 07/31/2006 AT 12.59)
<> LEAID LEAID111 LEAID PROCESSING SUPPRESSED
<> LEAID LEAID111 ABEND-AID INTERFACE NOT INSTALLED OR NOT COMPATIBLE
<> LEAID PROCESSING COMPLETE. RC=4
Back to top
View user's profile Send private message
senjay

Active User


Joined: 10 May 2007
Posts: 147
Location: India

PostPosted: Tue Aug 26, 2008 11:42 am
Reply with quote

Aaru:
Quote:
What is the ABEND CODE that was issued?


I issued 3002 through CEE3ABD of LE.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Tue Aug 26, 2008 11:45 am
Reply with quote

Hello,

As requested, you caused a U3002 user abend.

As i mentioned before, an abend is not a return-code. They will not be presented the same way.

What do you want to do now?
Back to top
View user's profile Send private message
senjay

Active User


Joined: 10 May 2007
Posts: 147
Location: India

PostPosted: Tue Aug 26, 2008 11:46 am
Reply with quote

Dick:
Quote:
An abend is not the same thing as a return-code


Yes Dick. I agree. If i went through the manual correctly, return code in COBOL can be set through RETURN-CODE. And as far i know, if abend occurs, the abend code will be seen in the MAX-RC of spool. Am i wrong somewhere?
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Tue Aug 26, 2008 11:51 am
Reply with quote

Hello,

Quote:
if abend occurs, the abend code will be seen in the MAX-RC of spool. Am i wrong somewhere?
This understanding is incorrect.

There is an entire different set of internal processes for handling abends versus return-codes.

When an abend is caused, the process is ungracefully terminated (abended) rather than going thru a graceful shutdown, possibly setting a return-code.
Back to top
View user's profile Send private message
senjay

Active User


Joined: 10 May 2007
Posts: 147
Location: India

PostPosted: Tue Aug 26, 2008 11:51 am
Reply with quote

Dick,

In spool, I am getting like below now.

Code:
NP   JOBNAME  TYPE JNUM  PROGRAMMER-NAME      MAX-RC     RD-TIME 
     AxxxxxxN JOB  11529 pgmname yyyyyyyyyyy   CC 0012     7:42:40


But it would be more eye catchy if it display like below

Code:
NP   JOBNAME  TYPE JNUM  PROGRAMMER-NAME      MAX-RC     RD-TIME 
     AxxxxxxN JOB  11529 CSPARDB AGS CIPDEV   ABENDU3002
Back to top
View user's profile Send private message
senjay

Active User


Joined: 10 May 2007
Posts: 147
Location: India

PostPosted: Tue Aug 26, 2008 11:54 am
Reply with quote

sorry that i couldn't post in time. system is bit slow here.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts run rexx code with jcl CLIST & REXX 15
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
No new posts Execute secondary panel of sdsf with ... CLIST & REXX 1
Search our Forums:

Back to Top