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

JCL abend RC012 - SQL return code (-180) - Abend aid S0C7


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Kather Basha

New User


Joined: 18 Apr 2007
Posts: 13
Location: Coimbatore

PostPosted: Wed May 30, 2007 10:10 am
Reply with quote

One of my jobs abend with code 012, the COBOL program is reading a DB2 table. The program is code such a way that it will dispaly any Bad SQL return code. So in the SAR report i can see SQL RETURN CODE = - 0180. And in addition to that Abend Aid report is saying that

CODE=CEE3207S / EXPECTED COMP CODE=S0C7
C15 ,X ,X -12M BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
C15 ,X ,X - 44K BYTES RESERVE REQUESTED, 12,216K BYTES USED
C15 ,X ,X -20K BYTES OF EMERGENCY SPACE ALLOCATED
C15 ,X ,X -11M BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG
C15 ,X ,X - 0 BYTES RESERVE REQUESTED, 11M BYTES USED
C15 ,X ,X -G=1336
C15 ,X ,X -TURNAROUND SORT PERFORMED
C15 ,X ,X -E35 USER EXIT RETURN CODE TERMINATE
C15 ,X ,X -INSERT 1134, DELETE 0
C15 ,X ,X -SYNCSORT GLOBAL DSM SUBSYSTEM ACTIVE

I checked that is the program writing on the table. No it is just reading
I verified during the execution of the program is some other job is reading or locking the table.. actually no intervention during the job run.

when i simply restart the job, it is running fine.

can i have any suggestion for this ?
( i am not sure where i can post this COBOL or DB2 so i posted here icon_biggrin.gif )
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: Sun Jun 03, 2007 7:41 am
Reply with quote

Hello,

Do you have a resolution for this?

Have you changed the code or did the problem just "go away"?
Back to top
View user's profile Send private message
Kather Basha

New User


Joined: 18 Apr 2007
Posts: 13
Location: Coimbatore

PostPosted: Mon Jun 04, 2007 4:20 pm
Reply with quote

No, Yet to find a solution icon_sad.gif
Still i am restarting the job, whenever it abends.
Back to top
View user's profile Send private message
priyamnavada

New User


Joined: 24 Dec 2005
Posts: 52
Location: hyderabad

PostPosted: Mon Jun 04, 2007 4:52 pm
Reply with quote

If its a SOC7 error, you can get the offset address/statement number from the spool. taking that address/number, see that in the footprints for a program which is running in the JOB.

from that you can get the particular variable that has been changed.
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: Mon Jun 04, 2007 6:18 pm
Reply with quote

Hello,

Please post the jcl from this step.

How often does this step fail?

It sounds like there may be bad/missing data (a date/time?) somewhere on the initial run and by the time the re-run is done, it has been resolved. It may be that the code is incomplete/incorrect will not work in every case.

Have you looked into what causes the -180? Have you verified that the 180 happens before any other problems? What info about the -180 have you captured (posting all of the diafgnostic info will help)? If the programs tries to continue after the -180 (or after the 0c7 for that matter if it occurs before the -180) strange results may occur.

Is this a new program or did an existing program begin having errors after some code or environment change was made?
Back to top
View user's profile Send private message
Kather Basha

New User


Joined: 18 Apr 2007
Posts: 13
Location: Coimbatore

PostPosted: Tue Jun 12, 2007 11:42 pm
Reply with quote

Hi,

please find below the JCL code for this step;
//X EXEC DB2TSOR,MBR=LE3A61DI,PLAN=LE3A61DI,REGION=0K
//X.STEPLIB DD
// DD
// DD
// DD
// DD
// DD
// DD DSN=SYS3.UNI.C31.LOADLIB,DISP=SHR
//** DD'S FOR UACR
//X.UNIUF DD DSN=SYS3.UNI.UNIUF,DISP=SHR
//X.UNICF DD DSN=SYS3.UNI.UNICF,DISP=SHR
//X.UNIDF DD DSN=SYS3.UNI.UNIDF,DISP=SHR
//X.UNIHF DD DSN=SYS3.UNI.UNIHF,DISP=SHR
//X.UNIACR DD SYSOUT=(O,H4C15),DEST=R49,
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=133)
//X.UNIRCR DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=80,BLKSIZE=80)
//*** END UACR DD'S
//X.FILEA DD DSN=PRODCICS.P00VS.AAFPRT00,DISP=OLD
//X.FILEB DD DSN=PRODVS2.P6BA.F3D01.EXPLAN.CLUSTER,DISP=OLD

*
*

This is a daily job that fails on an average once in 2 weeks. But there is no pattern as such.

Doesn't look like bad data since we just restart the job after some time, without making any changes to the job.

-180 is Bad data in Date/Time/Timestamp. Not sure of any practical scenario when this can happen.

I am kind of clueless as to what is causing this problem.
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: Wed Jun 13, 2007 12:34 am
Reply with quote

Hello,

It may be that when you get the -180, some invalid numerics are put "in play" and cause the later 0c7. This could be due to some field not being initialized or some field that has received invalid data.

Does the code terminate the run when the -180 is encountered? If not, maybe it should?
Back to top
View user's profile Send private message
veerababu_p

New User


Joined: 18 Mar 2006
Posts: 5
Location: mumbai

PostPosted: Wed Jun 13, 2007 10:44 am
Reply with quote

You are selecting column which is not present in the column
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: Wed Jun 13, 2007 6:27 pm
Reply with quote

Hello,

Might this be a typo?
Quote:
You are selecting column which is not present in the column

Please clarify. . .
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 -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts Return codes-Normal & Abnormal te... JCL & VSAM 7
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
Search our Forums:

Back to Top