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

SOC7 ERROR - HELP NEEDED


IBM Mainframe Forums -> ABENDS & Debugging
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
lokeshpg

New User


Joined: 16 Sep 2005
Posts: 10

PostPosted: Fri Apr 07, 2006 5:23 pm
Reply with quote

HI,

My program has failed with soc7 error, here by i'm giving the details found in the dump master along with the source listing and my program is an online pgm and uses TELON and IMS

Program JL0O08AU failed with Abend Code S0C7 when executing the ADD
in the following statement

004028 ADD 1 TO PAGES-SAVED

The following data are referenced by the statement

SeqNo Data Definition Address Le
WORKING-STORAGE SECTION
002108 10 PAGES-SAVED PIC 99 DISP-NUM 0004C0B3 2
Content: 'o.' X'962C' *** not valid DISP-NUM data.
002107 88 MORE-PAGES DISPLAY 0004C0
VALUE "1"
002108 10 PAGES-SAVED PIC 99 DISP-NUM 0004C0
Content: 'o.' X'962C' *** not valid DISP-NUM data.
002109 10 PAGE-KEY-TABLE 0004C0
002110 15 PAGE-KEY-1 PIC X(3) DISPLAY 0004C0
Content: 'rr.' X'9999,9D'
*** contains non-DISPLAY characters.
002111 15 PAGE-KEY-2-END PIC X(297) DISPLAY 0004C0
Content: '........@.................@..<.....%........*.......
X'0202,0C02,041C,0205,7C02,081C,0210,2C02,122C,0214,.
*** contains non-DISPLAY characters.

002102 *----------------------------------------------| END SRXFERB --
002103
002104 05 PAGE-WORK-AREA REDEFINES PAGE-AREA-START.
002105 10 PAGE-NUMBER-SAVE PIC 99.
002106 10 MORE-INDICATOR PIC X.
002107 88 MORE-PAGES VALUE "1".
002108 10 PAGES-SAVED PIC 99.
002109 10 PAGE-KEY-TABLE.
002110 15 PAGE-KEY-1 PIC X(3).
002111 15 PAGE-KEY-2-END PIC X(297).
002112 10 FILLER REDEFINES PAGE-KEY-TABLE.
002113 15 PAGE-KEY-SAVE OCCURS 100 TIMES PIC X(3).
002114 10 CURRENT-SEGMENT-KEY.
002115 15 CK-SEGMENT-KEY.
002116 20 CK-RO-NO PIC S9(5)V COMP-3.
002118 02 SCREEN-IMAGE-AREA.
002119 05 FILLER PIC X(12).
Back to top
View user's profile Send private message
martin9

Active User


Joined: 01 Mar 2006
Posts: 290
Location: Basel, Switzerland

PostPosted: Fri Apr 07, 2006 6:57 pm
Reply with quote

hy lokeshpg,

you know about s0c7?
if you don't have numeric data in this variable
and you try to access it, i.e. ADD, then of course
it will give you a s0c7 (data exception)!

correct this. maybe you initialize this variable first
or move zeros as initial value.

martin9
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 -> ABENDS & Debugging

 


Similar Topics
Topic Forum Replies
No new posts Error to read log with rexx CLIST & REXX 11
No new posts Error when install DB2 DB2 2
No new posts CLIST - Virtual storage allocation error CLIST & REXX 5
No new posts Error while running web tool kit REXX... CLIST & REXX 5
No new posts Mainframe Programmer with CICS Skill... Mainframe Jobs 0
Search our Forums:

Back to Top