View previous topic :: View next topic
|
Author |
Message |
senjay
Active User
Joined: 10 May 2007 Posts: 147 Location: India
|
|
|
|
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 |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
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 |
|
|
Aaru
Senior Member
Joined: 03 Jul 2007 Posts: 1287 Location: Chennai, India
|
|
|
|
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 |
|
|
senjay
Active User
Joined: 10 May 2007 Posts: 147 Location: India
|
|
|
|
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 |
|
|
senjay
Active User
Joined: 10 May 2007 Posts: 147 Location: India
|
|
|
|
Aaru:
Quote: |
What is the ABEND CODE that was issued? |
I issued 3002 through CEE3ABD of LE. |
|
Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
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 |
|
|
senjay
Active User
Joined: 10 May 2007 Posts: 147 Location: India
|
|
|
|
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 |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
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 |
|
|
senjay
Active User
Joined: 10 May 2007 Posts: 147 Location: India
|
|
|
|
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 |
|
|
senjay
Active User
Joined: 10 May 2007 Posts: 147 Location: India
|
|
|
|
sorry that i couldn't post in time. system is bit slow here. |
|
Back to top |
|
|
|