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
 

 

Error "STATUS IS 01 FILE STATUS 90"

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Tue Nov 13, 2007 11:41 am    Post subject: Error "STATUS IS 01 FILE STATUS 90"
Reply with quote

While running a COBOL program am facing this error
SYSOUT:
Code:
* * ABORT CAUSED BY                                           
I-O ERROR IN PROCEDURE PIPTFV  -- STATUS IS 01  FILE STATUS 90
CEE3211S The system detected a decimal-divide exception (System Completion Code=0CB).
         From compile unit PPPABT at entry point PPPABT at statement 96 at compile unit offset +00000394 at entry       
offset +00000394 at address 16AC5E64.
<> LEAID ENTERED (LEVEL 11/10/2005 AT 17.17)
<> LEAID PROCESSING COMPLETE. RC=0           


How to solve this ?
Back to top
View user's profile Send private message

murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Tue Nov 13, 2007 11:44 am    Post subject:
Reply with quote

KrisPrem,

Quote:
The system detected a decimal-divide exception (System Completion Code=0CB).


Quote:
System ABEND: S0CB

Description: This ABEND is caused by a decimal divide exception. A
quotient exceeds the specified data field size.

User Action: Dividing by zero is the most common cause of this ABEND.
Correct the program logic error that caused the divide
exception and resubmit the job.
(Reason Code B)
Back to top
View user's profile Send private message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Tue Nov 13, 2007 12:51 pm    Post subject:
Reply with quote

my concern was
Code:
I-O ERROR IN PROCEDURE PIPTFV  -- STATUS IS 01  FILE STATUS 90
Back to top
View user's profile Send private message
jmreddymca
Warnings : 1

New User


Joined: 14 Oct 2007
Posts: 29
Location: Bangalore

PostPosted: Tue Nov 13, 2007 4:18 pm    Post subject: HI
Reply with quote

can you check it once is the value divided by zero ?????????
Back to top
View user's profile Send private message
murmohk1

Senior Member


Joined: 29 Jun 2006
Posts: 1439
Location: Bangalore,India

PostPosted: Tue Nov 13, 2007 4:21 pm    Post subject:
Reply with quote

Reddy,

Quote:
can you check it once is the value divided by zero ?????????


KrisPrems is not concerned with the above (follow the topic) ....... he wanted to know the resolution for VSAM i/o error.
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: Tue Nov 13, 2007 4:32 pm    Post subject:
Reply with quote

krisprems wrote:
my concern was.......STATUS IS 01 FILE STATUS 90
Add the additional file status bytes and get the full explaination....
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts SORTJOIN - Copy Matched and Unmatched... Steve Ironmonger DFSORT/ICETOOL 5 Tue Jan 17, 2017 4:26 pm
No new posts OO COBOL compile error Virendra Shambharkar COBOL Programming 3 Tue Jan 10, 2017 6:05 pm
No new posts Copy RECFM =VB TO FB file with RECL =... sahil41352 DFSORT/ICETOOL 3 Wed Dec 28, 2016 11:29 pm
This topic is locked: you cannot edit posts or make replies. session stuck in TPX with status ACL amitc23 CA Products 1 Tue Dec 13, 2016 12:53 pm
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm


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