COBOL Manual for TNS and TNS/R Programs

Data Type Correspondence
HP COBOL Manual for TNS and TNS/R Programs—522555-006
B-2
Pascal BYTE
Enumeration,
unpacked,
<= 256 members
Subrange, unpacked,
n …m, 0 <= n and
m <= 255
INTEGER
INT16
CARDINAL
1
BYTE or CHAR value
parameter
Enumeration, unpacked,
> 256 members
Subrange, unpacked,
n …m, -32768 <=n and
m <= 32767, but at least
n or m outside 0…255
range
LONGINT
INT32
Subrange, unpacked
n…m, –2147483648 <=n
and m <= 2147483647,
but at least n or m outside
-32768…32767 range
SQL/MP or
SQL/MX
CHAR NUMERIC(1)…
NUMERIC(4)
PIC 9(1) COMP…
PIC 9(4) COMP
SMALLINT
NUMERIC(5)…
NUMERIC(9)
PIC 9(5) COMP
…PIC 9(9) COMP
INTEGER
TAL
pTAL
STRING
UNSIGNED(8)
INT
INT(16)
UNSIGNED(16)
INT(32)
Return
Value Size
(Words)
11 2
Table B-1. Integer Types, Part 1 (page 2 of 2)
8-Bit Integer 16-Bit Integer 32-Bit Integer
1. Unsigned integer
2. Index Data Item is a 16-bit integer in COBOL 74 and a 32-bit integer in HP COBOL
3. HP COBOL only
4. INTEGER is normally equivalent to INTEGER*2. The INTEGER*4 and INTEGER*8 compiler directives
redefine INTEGER