FORTRAN Reference Manual

Data Type Correspondence and Return Value Sizes
FORTRAN Reference Manual—528615-001
D-2
SQL CHAR NUMERIC(1)…NUMERI
C(4)
PIC 9(1) COMP…PIC
9(4) COMP
SMALLINT
NUMERIC(5)…NUMER
IC(9)
PIC 9(1) COMP…PIC
9(9) COMP
INTEGER
TAL STRING
UNSIGNED(8)
INT
UNSIGNED(16)
INT(32)
Return
Value Size
(Words)
11 2
[1] Unsigned Integer.
[2] Index Data Item is a 16-bit integer in COBOL 74 and a 32-bit integer in COBOL85.
[3] COBOL85 only.
[4] INTEGER is normally equivalent to INTEGER*2. The INTEGER*4 and INTEGER*8 compiler directives
redefine INTEGER.
Table D-2. Integer Types, Part 2
64-Bit Integer
Bit Integer of 1 to 31
Bits Decimal Integer
BASIC INT(64)
FIXED(0)
——
C long long — —
COBOL PIC S9(n) COMP or PIC
9(n) COMP without P or V,
10 ≤ n ≤ 18
NATIVE-8 [1]
— Numeric DISPLAY
FORTRAN INTEGER*8 — —
Pascal INT64 UNSIGNED(n), 1 ≤ n ≤
16
INT(n), 1≤ n ≤ 16
DECIMAL
SQL NUMERIC(10)…NUMERI
C(18)
PIC 9(10) COMP…PIC
9(18) COMP
INTEGER
— DECIMAL (n,s)
PIC 9(n) DISPLAY
TAL FIXED(0) UNSIGNED(n), 1 ≤ n ≤
31
—
Return
Value Size
(Words)
4 1, 1 or 2 in TAL 1 or 2, depends on
declared pointer size
[1] COBOL85 only.
Table D-1. Integer Types, Part 1 (page 2 of 2)
8-Bit Integer 16-Bit Integer 32-Bit Integer