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

Explain the reasons for FOC553 abend


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

New User


Joined: 15 Nov 2006
Posts: 5
Location: Bangalore

PostPosted: Wed Dec 06, 2006 9:32 am
Reply with quote

Could any one explain the reasons for FOC553 abend?
Back to top
View user's profile Send private message
ashimer

Active Member


Joined: 13 Feb 2004
Posts: 551
Location: Bangalore

PostPosted: Wed Dec 06, 2006 12:20 pm
Reply with quote

FOC553 - computation expression too large .... chk ur define or set or compute stmts ...split the computational expression into parts ////
Back to top
View user's profile Send private message
Vandana Polem Reddy

New User


Joined: 15 Nov 2006
Posts: 5
Location: Bangalore

PostPosted: Fri Dec 08, 2006 8:05 am
Reply with quote

Hi

Thanks for the response. yest it is computation error. but how can we split the computation expression in to two parts?

can u please explain me in detail.....

below is the expression where i got error

REPRICE2 (COMPUTE INPART=EDIT(D.PART_NUMBER,'999999999'); PRICE =DECODE INPART( INPUT ELSE '-1');)

here the problem is with decode statement which is not able to accept large data from input.

can u provide solution for this
Back to top
View user's profile Send private message
View previous topic : : View next topic  
Post new topic   Reply to topic All times are GMT + 6 Hours
Forum Index -> ABENDS & Debugging

 


Similar Topics
Topic Forum Replies
No new posts Avoid job abend on dataset held by us... JCL & VSAM 6
No new posts After newcopy the CICS program user f... CICS 7
No new posts User ABEND U0476. Need help. IMS DB/DC 1
No new posts ABEND 0717 during starting IMS IMS DB/DC 0
No new posts Call an hlasm from REXX in batch and ... CLIST & REXX 4
Search our Forums:


Back to Top