View previous topic :: View next topic
|
Author |
Message |
pullaiah.cts
New User
Joined: 02 Sep 2010 Posts: 50 Location: Pune
|
|
|
|
Hi,
In my program,one variable is having pic clause as
15 WS-PRICE PIC -9(11).9(8)
While compiling through JCL getting the below error message:
IGYDS1145-S More than 18 digit positions were specified in a "PICTURE" string for a numeric or numeric edited item. A
"PICTURE" string of "S9(18)" was assumed.
I read the posts which are explaining the reason for this issue.I came to know that the resolution for the error is to change the compiler option 'ARITH' to 'ARITH(EXTEND)'.
we are using Changeman in our shop and I don't know how to change the compiling options in Changeman.
Currently ARITH option is like below:
ARITH(COMPAT)
Can you please let me know how to change this to ARITH(EXTEND) in changeman.
Thanks in advance. |
|
Back to top |
|
|
dbzTHEdinosauer
Global Moderator
Joined: 20 Oct 2006 Posts: 6966 Location: porcelain throne
|
|
|
|
The whole idea of a Repository
is to prevent what you are attempting:
not following site procedure.
that said,
i believe this is one of those compiler options
that can be COB'd in the source code.
if you don't know what i am talking about,
read the programming guide as it explains all options, etc....
programming manual does also, but the explanations are often brief.
after testing, then you can/should go to your site ops people and have them expand the changeman 'behind the scenes stuff'.
may turn-out that even a COB OPT does not override changeman.
as well as,
what application needs an amount edit mask
(that is your picture clause)
with 11 significant and 8 decimal????
who prices anything to 8 decimals? |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
You seem to be thinking in the corect direction. ARITH(COMPAT) is a default and you've to use ARITH(EXTEND) to get the quoted picture clause working for you, as it uses 21-bytes.
ChangeMan is a tool driven by options and 'screens' and its set-up is subject to change from shop to shop. For a hint and which is not very accurate hint, check if any of the screen, while you compile your program you see "COMP" - at many shops I've seen Changeman using this as the place where you can pass the COMPiler options. Said that, suggest you talk to someone around in your project or changeman admin to know how to get it working for you. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
And yeah as Dick says, precision up to 8th place of decimal is little too much! These days 1$~=55 Rupees, if your application is getting implemented in India, what will you get in the bargain to that level of precision... |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
From another topic, it looks like TS is using he CUSIP price, so has no control over the size of that. Cusip is 10 before, eight after. Don't know, yet, why TS wants 11 before. Cusip has eight so that any sort of financial instrument can be covered by one file. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Thanks for the quick info Bill. It surely pays when you log in to Forums pretty too often! |
|
Back to top |
|
|
pullaiah.cts
New User
Joined: 02 Sep 2010 Posts: 50 Location: Pune
|
|
|
|
Sorry all for mentioning the wrong number of decimal positions in the picture clause.I have mentioned 19 digits though I needed only 18 digits,the confusion was because of signed bit.
Bill has calrified my doubt and now I am able to compile the program successfully.Anyways,I will check for the option in changeman to change the compiler options.
Thank you all for your great suggestions and help. |
|
Back to top |
|
|
Anuj Dhawan
Superior Member
Joined: 22 Apr 2006 Posts: 6250 Location: Mumbai, India
|
|
|
|
Glad you got it working and Thanks for the feedback!
Yeah, Bill is one of the kind nuerons around here! |
|
Back to top |
|
|
|