| IBM MAINFRAME HELP & SUPPORT FORUMS
Technical Forums for IBM Mainframe Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7&11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
|
| View previous topic :: View next topic |
| Author |
Message |
rexxy
Joined: 19 Apr 2006
Posts: 1
|
| Posted: Wed Apr 19, 2006 8:13 pm Post subject: C2D cannot handle large values |
|
|
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 |
|
new2cobol
Joined: 04 Jan 2006
Posts: 70
|
| Posted: Thu Apr 20, 2006 2:29 am Post subject: Re: C2D cannot handle large values |
|
|
I think you need to set the NUMERIC DIGITS or NUMERIC FUZZ before your code.
use this link [url] for more info... |
|
| Back to top |
|
| |
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM
|
