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
 

 

SOC7 using Address field
Goto page 1, 2  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CA Products
View previous topic :: :: View next topic  
Author Message
spadma

New User


Joined: 18 Dec 2007
Posts: 9
Location: India

PostPosted: Wed Apr 16, 2008 3:43 pm    Post subject: SOC7 using Address field
Reply with quote

Hi All,

Can anyone suggest me how to resolve SOC7 USING Address not using the offset.
Back to top
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Wed Apr 16, 2008 7:45 pm    Post subject: Re: SOC7 using Address field
Reply with quote

spadma wrote:
Can anyone suggest me how to resolve SOC7 USING Address not using the offset.
Firstly, that is S0C7....
Secondly, you are going to have to provide a little more information than just "USING Address not using the offset"....
Awaiting your answer......
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


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

PostPosted: Thu Apr 17, 2008 2:15 am    Post subject:
Reply with quote

Hi,

Check this link..there is some good explanation by socker_dad, might help.

http://www.ibmmainframes.com/viewtopic.php?t=10853&highlight=s0c7
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu Apr 17, 2008 2:27 am    Post subject:
Reply with quote

Thanks Anuj, that helped one possible explaination click.....

Swaraj,
Are you saying that you have the address of the S0C7 but not the displacement into the program where the abend occured?

Do you have the link/bind map?

Do you have a dump of the program storage at the time of the abend with the PSW and register contents?
Back to top
View user's profile Send private message
vasanthkumarhb

Active User


Joined: 06 Sep 2007
Posts: 276
Location: Bang,iflex

PostPosted: Thu Apr 17, 2008 11:36 am    Post subject:
Reply with quote

Hi,

I can give you simple hints to rule out SOC7,

(i) Exped the variable contents which is involved in arthmetic operation.

(ii) check whether copy book variables are all intialized to their respective initial value.

(iii) check for the subprogram variables may contain junk values

(iv) work out for CEEDUMP obtained in SPOOL area

(vi) Get the details about PSW in CEEDUMP
Back to top
View user's profile Send private message
spadma

New User


Joined: 18 Dec 2007
Posts: 9
Location: India

PostPosted: Thu Apr 17, 2008 3:36 pm    Post subject: Reply to: SOC7 using Address field
Reply with quote

Hi,

I have only Addrees with me not the offset in the program. let us suppose i am running an Eztrieve and my job got abended with SOC7, then the spool looks as below.

X-GRS1-IN-FI-SCORES-TBL 6 29 32 33 33 34
33 *******A006 PROGRAM INTERRUPT - CODE 7 (DATA EXCP)
INTERRUPT OCCURRED AT 0224 BLOCK 1 FROM EP CA-EASYTRIEVE PLUS 6.4 0311-04/16/0
INSTRUCTION AT 00015234 IS F811169A269A
FIRST OPERAND ADDRESS 00030FF1 CONTENTS 4040
SECOND OPERAND ADDRESS 0003369C CONTENTS 0000
PSW+4 AT INTERRUPT 8001523A
REGISTERS AT INTERRUPT
R0 0003369C R1 00030957 R2 00033002 R3 00023010 R4 0000D000 R5 0000F
R8 00000000 R9 0000D3B8 R10 A3607626 R11 00015010 R12 8DEA7B12 R13 0000A

In this case how to reslove SOC7
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu Apr 17, 2008 6:09 pm    Post subject:
Reply with quote

Quote:
INSTRUCTION AT 00015234 IS F811169A269A
SECOND OPERAND ADDRESS 0003369C CONTENTS 0000

The F8 is a ZAP"
ZERO AND ADD
The second operand is placed at the first-operand location. The operation is equivalent to an addition to zero. The operand and result are in the packed format.
Only the second operand is checked for valid sign and digit codes.
The second operand is not a valid packed number.
Whatever you are doing, is a move of a two or three digit packed value to a packed area that is currently spaces.
Uninitialized storage?
Bad input data?
Look at the EZT listing, the "INTERRUPT OCCURRED AT 0224 BLOCK 1 FROM EP" might help to point to the move.
And again, displays can help isolate the bad move too.
Back to top
View user's profile Send private message
vasanthkumarhb

Active User


Joined: 06 Sep 2007
Posts: 276
Location: Bang,iflex

PostPosted: Fri Apr 18, 2008 9:07 am    Post subject:
Reply with quote

Hi CICS GUY,

Please can you tell us, how to find out the bad data through PSW in CEEDUMP?

I guess PSW is known as Program Status Word

this will helps us surely.
Back to top
View user's profile Send private message
spadma

New User


Joined: 18 Dec 2007
Posts: 9
Location: India

PostPosted: Fri Apr 18, 2008 10:04 am    Post subject: Reply to: SOC7 using Address field
Reply with quote

Hi CICS GUY,

i understood a little bit what you were saying. You are saying that i am trying to move or add to a filed which has spaces or junk data right. But how can i find out which filed it is?

And also can you expalin in deatil about

"The F8 is a ZAP
ZERO AND ADD
The second operand is placed at the first-operand location. The operation is equivalent to an addition to zero. "


And one more doubt is where can i get the listings of this EZT? can i get it in SPOOL? can you please explain me in detail how to locate the field.
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Fri Apr 18, 2008 7:12 pm    Post subject:
Reply with quote

vasanthkumarhb wrote:
Please can you tell us, how to find out the bad data through PSW in CEEDUMP?
The PSW points to the operand that failed but more usually to the operand after the one that failed.
Figure out which one failed and look at the base/displacement indicated to check the data involved.
The Principles of Operation is your friend.....
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Fri Apr 18, 2008 7:18 pm    Post subject: Re: Reply to: SOC7 using Address field
Reply with quote

spadma wrote:
i understood a little bit what you were saying. You are saying that i am trying to move or add to a filed which has spaces or junk data right. But how can i find out which filed it is?
Actually the field you are moving is susposed to be a packed decimal field but only contains low values. It is a two or three digit field, two bytes in length.
Quote:
And also can you expalin in deatil about
"The F8 is a ZAP
ZERO AND ADD
The second operand is placed at the first-operand location. The operation is equivalent to an addition to zero. "
The Principles of Operation is your friend.....
Quote:
And one more doubt is where can i get the listings of this EZT? can i get it in SPOOL?.
Compiled or interpreted, it is/was in the jes queue...
Quote:
can you please explain me in detail how to locate the field
Sorry, no....
Back to top
View user's profile Send private message
manikawnth

New User


Joined: 07 Feb 2007
Posts: 61
Location: Mumbai

PostPosted: Wed May 07, 2008 6:01 am    Post subject:
Reply with quote

F811169A269A
Look this as F8 11 169A 269A
F8 - ZAP instruction
1 - Length of first operand (length is 2 bytes)
1 - Length of second operand (length is 2 bytes)
169A - Base address is in R1 and displacement is 69A
269A - Base address is in R2 and displacement is 69A

First operand is at R1 + 69A = 30957 + 69A = 30FF1
Second operand is at R2 + 69A = 33002 + 69A = 3369C
value at second operand address is 0000 (2 bytes)
This is expected as a valid packed decimal data but not...It should be 000C
Problem with initialization of second operand.
To know the field, check the assembler listing of the program... I can't help that until u have that listing...
Back to top
View user's profile Send private message
IQofaGerbil

Active User


Joined: 05 May 2006
Posts: 183
Location: Scotland

PostPosted: Tue May 13, 2008 4:00 pm    Post subject:
Reply with quote

33 *******A006 PROGRAM INTERRUPT - CODE 7 (DATA EXCP)

If you can get a listing - the error likely lies in line 33
Back to top
View user's profile Send private message
Kamaleshwaran

New User


Joined: 10 Apr 2010
Posts: 7
Location: Hyderabad

PostPosted: Wed Dec 01, 2010 9:31 pm    Post subject: Reply to: SOC7 using Address field
Reply with quote

I got a smilar abend as discussed above... Could u please help me in solving this..


PROGRAMS AND ALL SUPPORTING MATERIALS COPYRIGHT (C) 1982, 1996 BY COMPUTER ASSOC
871 *******A006 PROGRAM INTERRUPT - CODE 7 (DATA EXCP)
INTERRUPT OCCURRED AT 08FE BLOCK 1 FROM EP CA-EASYTRIEVE PLUS 6.3 0201- 5/13/0
INSTRUCTION AT 0010D866 IS F952805C7DC8
FIRST OPERAND ADDRESS 00114B58 CONTENTS 404040404040
SECOND OPERAND ADDRESS 0010B3F0 CONTENTS 00000C
PSW+4 AT INTERRUPT 8010D86C
REGISTERS AT INTERRUPT

R0 00000001 R1 0010B91C R2 0010B51E R3 0010BF78 R4 00114C6A R5 00109
R8 00114AFC R9 0010AF78 R10 00108648 R11 0010CF68 R12 000B7CD0 R13 00040



I tried to undertsand from the above discussin, but am not getting...
The 871st line in the program is given below.

000871 MOVE SPACES TO XL-OUTCREDIT$$

Variable XL-OUTCREDIT$$ is of length 4 and alphanumeric..

Thanks in advance...
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10201
Location: italy

PostPosted: Wed Dec 01, 2010 9:33 pm    Post subject: Reply to: SOC7 using Address field
Reply with quote

Quote:
FIRST OPERAND ADDRESS 00114B58 CONTENTS 404040404040
SECOND OPERAND ADDRESS 0010B3F0 CONTENTS 00000C


what do the messages and the bolded strings tell ?
Back to top
View user's profile Send private message
Kamaleshwaran

New User


Joined: 10 Apr 2010
Posts: 7
Location: Hyderabad

PostPosted: Wed Dec 01, 2010 9:37 pm    Post subject:
Reply with quote

The first operand is spaces which is moved to second opernad. The first operand contains Spaces and the second one has a packed decimal value...
But here we are moving spaces to the second operand and the second operand is an alphanumeric.

000871 MOVE SPACES TO XL-OUTCREDIT$$
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10201
Location: italy

PostPosted: Wed Dec 01, 2010 9:40 pm    Post subject: Reply to: SOC7 using Address field
Reply with quote

review the IBM manual for the meaning of abend 0C7
and the easytrieve manual for what You can move from into what !

it is irrelevant what You think You are doing, what counts is what You told easytrieve to do!
move statement, variable declaration!
Back to top
View user's profile Send private message
dick scherrer

Site Director


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

PostPosted: Wed Dec 01, 2010 10:26 pm    Post subject:
Reply with quote

Hello,

Quote:
But here we are moving spaces to the second operand and the second operand is an alphanumeric.

You post that you have moved an alphanumeric value (spaces) to another alphanumeric field.

Is there a question here?

It is always valid to move an alphanumeric field to another alphanumeric field. If the receiving field contains some packed-decimal fields within it, and the sending field does not have the same, subsequent use of the packed-decimal data may cause abends. . .

If you clarify what you are having trouble with or want to learn, someone should be able to provide a more useful reply.
Back to top
View user's profile Send private message
dick scherrer

Site Director


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

PostPosted: Wed Dec 01, 2010 10:32 pm    Post subject:
Reply with quote

Follow on. . .

When i replied, i didn't notice that i was on page 2 . . .

When posting a questoin it is best to start a new topic for your question and not post a reply to a topic that has been inactive for over 2 years. . .

FWIW - it makes no sense to intentionally move spaces to a a numeric field. . .
Back to top
View user's profile Send private message
aitha_prashanth

New User


Joined: 17 Mar 2005
Posts: 8
Location: chennai

PostPosted: Wed Dec 29, 2010 5:32 pm    Post subject:
Reply with quote

Use 'TEST(SYM)' option while compiling COBOL prog and run the job, it will give you the exact line number.
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 -> CA Products All times are GMT + 6 Hours
Goto page 1, 2  Next
Page 1 of 2

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts How to split the records using the am... vnktrrd DFSORT/ICETOOL 24 Fri Oct 28, 2016 7:33 pm
No new posts Sort records based on numeric field. Alks SYNCSORT 2 Wed Oct 19, 2016 10:14 pm
No new posts Amount field is getting corrupted whe... thesumitk SYNCSORT 5 Tue Oct 18, 2016 8:20 pm
No new posts Syncsort - NULL in Integer field chec... nartcr SYNCSORT 4 Thu Oct 06, 2016 6:47 am


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