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

C2D cannot handle large values


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
rexxy

New User


Joined: 19 Apr 2006
Posts: 1

PostPosted: Wed Apr 19, 2006 8:13 pm
Reply with quote

Hi,
I am trying to convert a comp value to decimal value. when the value in the file is small i am able to convert it, but when its big (more than 9 digits) i am getting error saying incorrect call to routine. Below is my code where i do the core processing. Can someone help me out.
Does C2D have any limitation.

LEN = COL2 - COL1 + 1
"(DATA1) = LINE "CURRLN /* DATA1 = CURRENT LINE */
DATA3 = SUBSTR(DATA1, COL1, LEN)
B2D:
DATA2 = C2D(DATA3,LEN)
DATA2 = LEFT(HEX,LENGTH(HEX)) */
DATA1 = INSERT(DATA2, DATA1, COL1)
"LINE" CURRLN " = (DATA1)"

OR-BINARY2
4/BI
(63-66)
10---------
***********
0
-32768
-2147483648 - not correctly showing
858993452
32767
Back to top
View user's profile Send private message
new2cobol

New User


Joined: 04 Jan 2006
Posts: 77
Location: Bangalore

PostPosted: Thu Apr 20, 2006 2:29 am
Reply with quote

I think you need to set the NUMERIC DIGITS or NUMERIC FUZZ before your code.
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 -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts How to split large record length file... DFSORT/ICETOOL 10
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Null values are considered in Total c... DFSORT/ICETOOL 6
No new posts Parsing Large JSON file using COBOL COBOL Programming 4
Search our Forums:

Back to Top