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

S0C1 abend in simple file read and write cobol program.


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
dilip_bangalore

New User


Joined: 29 Sep 2011
Posts: 27
Location: India

PostPosted: Wed Jan 30, 2013 10:26 pm
Reply with quote

Hi,

I have a simple read and write cobol. While executing I am getting S0C1 abend. I have checked for misspelled dd names, open, read, write, close in sequence..

Please help if I am missing anything due to which I am receiving S0C1.

Dilip
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Wed Jan 30, 2013 10:29 pm
Reply with quote

Did you get any messages? If so, what are they?
Back to top
View user's profile Send private message
dilip_bangalore

New User


Joined: 29 Sep 2011
Posts: 27
Location: India

PostPosted: Wed Jan 30, 2013 10:33 pm
Reply with quote

The abend is captured in Fault analyzer. Nothing is captured other than S0C1 abend. But in spool, below S0C1 message in JESMSGLG, it displays S0C1 and reason 0000001 and no active module found message is displayed.

I have checked and the loadlib has the load with latest timestamp.
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2501
Location: Atlanta, Georgia, USA

PostPosted: Wed Jan 30, 2013 10:52 pm
Reply with quote

A SOC1 can be raised when a file hasn't been opened properly. icon_eek.gif
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Wed Jan 30, 2013 10:53 pm
Reply with quote

This may -- or may not -- be relevant; only someone working at your site can find out for sure.
Quote:
Problem(Abstract)

S0C1 abend with NO ACTIVE MODULE FOUND. (SCI46826)
Symptom

S0C1 abend with NO ACTIVE MODULE FOUND.
Cause

Linkage editor received RC=8 when applying T030672 and was missed by customer.
Resolving the problem

Apply APAR T030672 from PUT4304
Basically, the odds of you getting help from a forum on this issue are pretty close to zero. You need to work with someone AT YOUR SITE to figure out what is going on.
Back to top
View user's profile Send private message
Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1788
Location: Bloomington, IL

PostPosted: Wed Jan 30, 2013 10:58 pm
Reply with quote

A S0C1 is an operation exception, an attempt to execute an invalid machine instruction.

Are there tables whose boundaries may have been overrun, thus overlaying code? Was there an unresolved weak external reference at link time? Is inappropriiate I/O (e.g., trying to write to a file opened for output) being done?

Find the COBOL statement in which the abend occurs using the reported offset and the PMAP, and see if that gives any hints.
Back to top
View user's profile Send private message
dilip_bangalore

New User


Joined: 29 Sep 2011
Posts: 27
Location: India

PostPosted: Wed Jan 30, 2013 11:00 pm
Reply with quote

Thanks your suggestion Robert. I was just trying to find if I get any other reasons for S0C1 other than those I mentioned earlier.
Back to top
View user's profile Send private message
dilip_bangalore

New User


Joined: 29 Sep 2011
Posts: 27
Location: India

PostPosted: Wed Jan 30, 2013 11:03 pm
Reply with quote

no offset has been captured in spool or Fault Analyzer. I even have display statement as the very first statement in procedure division. no sysout dd is found in spool.
Back to top
View user's profile Send private message
Gary McDowell

Active User


Joined: 15 Oct 2012
Posts: 139
Location: USA

PostPosted: Thu Jan 31, 2013 12:04 am
Reply with quote

Can you post applicable parts of your code and the JCL?
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Thu Jan 31, 2013 12:23 am
Reply with quote

Try including

Code:
//SYSOUT DD SYSOUT=localstandardvalue
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Compare 2 files and retrive records f... DFSORT/ICETOOL 2
No new posts Compare 2 files(F1 & F2) and writ... JCL & VSAM 8
No new posts FTP VB File from Mainframe retaining ... JCL & VSAM 8
No new posts Extract the file name from another fi... DFSORT/ICETOOL 6
No new posts How to split large record length file... DFSORT/ICETOOL 10
Search our Forums:

Back to Top