MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

SOC4

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL)
View previous topic :: View next topic  
Author Message
mywirelesskit
Beginner


Joined: 27 Jan 2003
Posts: 1
Topics: 1

PostPosted: Mon Jan 27, 2003 10:28 am    Post subject: SOC4 Reply with quote

Hi All,
I am getting a SOC4 while running a pgm.The message code is IEA995I.
Can anyone please help me out.
Thanks Question
_________________
visit http://www.mywirelesskit.com #1 place for your wireless needs
Back to top
View user's profile Send private message Visit poster's website
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12375
Topics: 75
Location: San Jose

PostPosted: Mon Jan 27, 2003 10:39 am    Post subject: Reply with quote

mywirelesskit,

we need a little more information about the abend. S0C4 can be caused due to various reasons. Is this a new program which is abending with S0C4? or an existing program ? If it is an existing program, then look into the changes made from the old to the new program.First thing to look is if there is any internal table defined and see if the table entries exceed the max limit.

For ex: If your program has an internal table defined as follows

Code:

01 DATE-TABLE.                                     
  05 DATE-GROUP        OCCURS 30 TIMES             
                       INDEXED BY DATE-TABLE-INDEX.
    10  DATE-REC-TSTAMP.                           
    20  DATE-REC.                               
        25  DATE-REC-CCYY PIC X(4)    VALUE SPACES.
        25  FILLER        PIC X(1)    VALUE '-'.   
        25  DATE-REC-MM   PIC X(2)    VALUE SPACES.
        25  FILLER        PIC X(1)    VALUE '-'.   
        25  DATE-REC-DD   PIC X(2)    VALUE SPACES.
    20  DATE-REC-TIME     PIC X(18)   VALUE SPACES.
    10  DATE-FLAG         PIC X(1)    VALUE SPACES.




if you try to load more than 30 entries into this table, the elements defined after this table in the program will be corrupted resulting in a S0C4 abend.so check the program for any such errors.

Hope this helps...

cheers

kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Job Control Language(JCL) All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group