Re: Max integer in an 8 byte COMP field?

Always a chance I'm misunderstanding something, but this is the
VisualAge COBOL 2.2 compiler output from one of my copybooks.
I did this copybook a long time ago and it looks like it is the
product of a DCLGEN. There are several comp-5 fields.
Sorry about the format (I thought if you copied something in 'Courier
New' all would be well).

01 ALLTYP1. 32886
05 ABIGINT PIC S9(18) COMP-5. 8(0000000)
05 ABLOB USAGE IS SQL TYPE IS BLOB(40). 44(0000008)

4(0000008)

40(0000012)
05 ACHAR PIC X(10). 10(0000052)
05 ACLOB USAGE IS SQL TYPE IS CLOB(41). 45(0000062)

4(0000062)

41(0000066)
05 ADATE PIC X(10). 10(0000107)
05 ADECIMAL PIC S9(5)V COMP-3. 3(0000117)
05 ADOUBLE USAGE IS COMP-2. 8(0000120)
05 AINTEGER PIC S9(9) COMP-5. 4(0000128)
05 ALONGVARCHAR. 32702(0000132)
49 ALONGVARCHARL PIC S9(4) COMP-5. 2(0000132)
49 ALONGVARCHARD PIC X(32700). 32700(0000134)
05 AREAL USAGE IS COMP-1. 4(0032834)
05 ASMALLINT PIC S9(4) COMP-5. 2(0032838)
05 ATIME PIC X(8). 8(0032840)
05 ATIMESTAMP PIC X(26). 26(0032848)
05 AVARCHAR. 12(0032874)
49 AVARCHARL PIC S9(4) COMP-5. 2(0032874)
49 AVARCHARD PIC X(10). 10(0032876)

Graham

On Sat, 21 Apr 2007 16:59:19 GMT, "William M. Klein"
<wmklein@xxxxxxxxxxxxxxxxx> wrote:

It better NOT have any "COMP-5" data if using VisualAge COBOL (as I think the
OP stated),

Although IBM *now* supports COMP-5 on most (still not all) platforms, I am
pretty certain that VisualAge COBOL did not include it.


--
Posted via a free Usenet account from http://www.teranews.com

.