View previous topic :: View next topic |
Author |
Message |
s_shivaraj Beginner

Joined: 21 Sep 2004 Posts: 140 Topics: 14 Location: Chennai, India
|
Posted: Thu Sep 13, 2007 9:37 pm Post subject: Easytrieve S0C4 |
|
|
Hi,
I am getting a A006 program interrupt - code 4 error in my easytrieve program. When i tried debugging using displays, looks like it is happening in a Cursor open. The error line number also matches the CURSOR OPEN stmt.
Same code works in our production, and also when i tried running in Instream its working. But when i compile and execute , i am getting a S0C4 abend. Any idea , looks like some compiler option issue,i am not able to trace , any help/suggestions. _________________ Cheers
Sivaraj S
'Technical Skill is the Master of complexity, while Creativity is the Master of Simplicity' |
|
Back to top |
|
 |
vkphani Intermediate

Joined: 05 Sep 2003 Posts: 483 Topics: 48
|
Posted: Thu Sep 13, 2007 10:29 pm Post subject: |
|
|
shivraj,
you have to post your ezt code to help you. |
|
Back to top |
|
 |
s_shivaraj Beginner

Joined: 21 Sep 2004 Posts: 140 Topics: 14 Location: Chennai, India
|
Posted: Thu Sep 13, 2007 10:51 pm Post subject: |
|
|
vkphani,
Thanks for the reply. But i cant post my code over here. I know with out code its difficult to answer, if you are suspect anything in general i can check that.
For your information, the same code works in my production.  _________________ Cheers
Sivaraj S
'Technical Skill is the Master of complexity, while Creativity is the Master of Simplicity' |
|
Back to top |
|
 |
vivek1983 Intermediate

Joined: 20 Apr 2006 Posts: 222 Topics: 24
|
Posted: Fri Sep 14, 2007 2:24 am Post subject: |
|
|
s_shivaraj,
Please check the following and reply.
1. Is the cursor (You are mentioning) the first SQL statement in the program?
2. How are u executing the program? Are u using EXEC
PGM=EZTPA00?
3. Have u included the correct libraries?
4. Since its involving DB2, have u included the correct dsn subsystem?
Vivek G _________________ Vivek G
--------------------------------------
A dream is just a dream. A goal is a dream with a plan and a deadline. (Harvey Mackay) |
|
Back to top |
|
 |
vkphani Intermediate

Joined: 05 Sep 2003 Posts: 483 Topics: 48
|
|
Back to top |
|
 |
vkphani Intermediate

Joined: 05 Sep 2003 Posts: 483 Topics: 48
|
Posted: Fri Sep 14, 2007 3:13 am Post subject: |
|
|
Sometimes SOC4 could also be because of lack of space while writing data to output file. Just check if the number of records fetched by the query have increased over time - if not - try running your job on a later date/time when resources become available. |
|
Back to top |
|
 |
CICS Guy Intermediate
Joined: 30 Apr 2007 Posts: 292 Topics: 3
|
Posted: Fri Sep 14, 2007 4:40 am Post subject: |
|
|
s_shivaraj wrote: | I know with out code its difficult to answer, if you are suspect anything in general i can check that. | Check the link/bind map for errors.... |
|
Back to top |
|
 |
kolusu Site Admin

Joined: 26 Nov 2002 Posts: 12377 Topics: 75 Location: San Jose
|
Posted: Fri Sep 14, 2007 6:31 am Post subject: |
|
|
s_shivaraj,
SOC4 is a data issue. When you get the abend the dump also shows the contents of error variable in hex format. And also make sure that you have the variables defined correctly and before the cursor declaration.
Kolusu _________________ Kolusu
www.linkedin.com/in/kolusu |
|
Back to top |
|
 |
s_shivaraj Beginner

Joined: 21 Sep 2004 Posts: 140 Topics: 14 Location: Chennai, India
|
Posted: Fri Sep 14, 2007 10:56 am Post subject: |
|
|
vivek1983,
Its not the first query. I just double checked the libraries , all looks fine and i am executing through IKJEFT. With instream its working perfectly fine.
kolusu,
I just got this from SYSPRINT. there no dump generated.
Code: | 180 *******A006 PROGRAM INTERRUPT - CODE 4 (PROTECTION EXCP)
INTERRUPT OCCURRED AT 0A9A88
INSTRUCTION AT 0A9A88 IS 95FF301D
FIRST OPERAND ADDRESS C40027
PSW AT INTERRUPT 07850004 A00A9A8C
REGISTERS AT INTERRUPT |
CICS Guy,
Tried looking for any errors in Link/Bind, there is no Errors.
Strange thing is when i comment the cursor statment which is giving the S0C4, its now failing the previous cursor open. _________________ Cheers
Sivaraj S
'Technical Skill is the Master of complexity, while Creativity is the Master of Simplicity' |
|
Back to top |
|
 |
vkphani Intermediate

Joined: 05 Sep 2003 Posts: 483 Topics: 48
|
Posted: Mon Sep 17, 2007 4:48 am Post subject: |
|
|
s_shivaraj,
You have to post the code in line # 175 to 185. |
|
Back to top |
|
 |
s_shivaraj Beginner

Joined: 21 Sep 2004 Posts: 140 Topics: 14 Location: Chennai, India
|
Posted: Mon Sep 17, 2007 11:03 am Post subject: |
|
|
vkphani,
This time i got in 120th line. So pasted the lines around that code.
Code: | 110 SQL CLOSE CURTS_CURSOR
111 WS-FLAG = 'CURTS_CURSOR CLOSE'
112 PERFORM CHECK-SQLCODE1
113 *
114 READ FILECTRL KEY WS-KEY STATUS
115 IF FILECTRL:FILE-STATUS EQ 0
116 WS-EXTRACT-DATE = EXTRACT-DATE
117 WS-LAST-EXTRACT-DATE = LAST-EXTRACT-DATE
118 END-IF
119 *
120 SQL OPEN TABLE_CURSOR
121 WS-FLAG = 'TABLE_CURSOR OPEN'
122 PERFORM CHECK-SQLCODE1
123 *
124 DO UNTIL SQLCODE = 100
125 SQL FETCH TABLE_CURSOR INTO :WS-FIELD1, +
:WS-FIELD2 |
_________________ Cheers
Sivaraj S
'Technical Skill is the Master of complexity, while Creativity is the Master of Simplicity' |
|
Back to top |
|
 |
Terry_Heinze Supermod
Joined: 31 May 2004 Posts: 391 Topics: 4 Location: Richfield, MN, USA
|
Posted: Mon Sep 17, 2007 8:22 pm Post subject: |
|
|
Your open cursor statement is being executed no matter what the FILECTRL status is. Is that what you really intended? _________________ ....Terry |
|
Back to top |
|
 |
s_shivaraj Beginner

Joined: 21 Sep 2004 Posts: 140 Topics: 14 Location: Chennai, India
|
Posted: Mon Sep 17, 2007 10:32 pm Post subject: |
|
|
Terry_Heinze,
Yes terry, that is what we intended. _________________ Cheers
Sivaraj S
'Technical Skill is the Master of complexity, while Creativity is the Master of Simplicity' |
|
Back to top |
|
 |
s_shivaraj Beginner

Joined: 21 Sep 2004 Posts: 140 Topics: 14 Location: Chennai, India
|
Posted: Mon Oct 01, 2007 4:13 pm Post subject: |
|
|
Atlast got the Issue resolved, there was some changes went in Easytrieve installation, which has caused this S0C4. System people helped us in resolving this. Just ran the Job with a overide, job went through.
Thank you guys for your time. _________________ Cheers
Sivaraj S
'Technical Skill is the Master of complexity, while Creativity is the Master of Simplicity' |
|
Back to top |
|
 |
CICS Guy Intermediate
Joined: 30 Apr 2007 Posts: 292 Topics: 3
|
Posted: Mon Oct 01, 2007 6:15 pm Post subject: |
|
|
Can you hint to the resolution? The over-ride?
This thread will be in existence tor quite a while, pointers to a resolution will help all followers.... |
|
Back to top |
|
 |
|
|