MVSFORUMS.com

pkrish_18 · Beginner Joined: 08 Apr 2005 Posts: 12 Topics: 7

Hi,

Can you pls let me know the max value which the following variable can hold?

TGT-ITEM-TRANSFER-PRICE PIC S9(5)V9(4) COMP.

It will be preferable if you can tell me how much the real part can hold and how much the precision or decimal part can hold

Regards,

Krish

kolusu · Posted: Tue May 24, 2005 8:04 am Post subject:

pkrish18,

The above definition occupies 4 bytes (full-word) and it can store -2,147,483,648 through +2,147,483,647.

Cobol does not store the decimal point explicitly

Check this link for a detailed explanation of COMP items

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3LR10/5.3.16.1?SHELF=&DT=20020920180651&CASE=

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

Crox · Beginner Joined: 29 May 2004 Posts: 52 Topics: 9

It also depends on the specification of the TRUNC parm of the compiler. If it is TRUNC(STD), it will make the field behave like the STandDard COBOL definition!

If you want no trouble with the TRUNC, define not COMP but COMP-5.

Regards,

Crox