Accelerator Manual (G06.24+, H06.03+)

Data Type Correspondence and Return Value Sizes
Accelerator Manual—527303-002
A-4
Table A-4. Character Types
Character Character String Varying Length Character String
BASIC STRING STRING --
C signed char
unsigned char
pointer to char struct {
int len;
char val [n]
};
COBOL Alphabetic
Numeric DISPLAY
Alphanumeric-Edited
Alphanumeric
Numeric-Edited
Alphabetic
Numeric DISPLAY
Alphanumeric-Edited
Alphanumeric
Numeric-Edited
01 name.
03 len USAGE IS NATIVE-2
1
03 val PIC X(n).
FORTRAN CHARACTER CHARACTER array
CHARACTER*n
--
Pascal CHAR or BYTE value parameter
Enumeration, unpacked,
≤256
members
Subrange, unpacked, n...m, 0
≤n
and m
≤255
PACKED ARRAY OF
CHAR
FSTRING
STRING(n)
SQL PIC X
CHAR
CHAR(n)
PIC X(n)
VARCHAR(n)
TAL STRING STRING array --
Return Value
Size (Words)
1 1 or 2, depends on
declared pointer size
1 or 2, depends on declared
pointer size
1
HP COBOL85 only.
Table A-5. Structured, Logical, Set, and File Types
Byte-Addressed
Structure
Word-Addressed
Structure
Logical (true or
false) Boolean Set File
BASIC -- MAP buffer -- -- -- --
C-- struct -- ------
COBOL -- 01-level RECORD -- -- -- --
FORTRAN RECORD -- LOGICAL [1] -- -- --
Pascal RECORD, byte-aligned RECORD, word-aligned -- BOOLEAN Set File
SQL -- -- -- -- -- --
TAL Byte-addressed
standard STRUCT
pointer
Word-addressed
standard STRUCT
pointer
-- -- -- --
Return Value
Size (Words)
1 or 2, depends on
declared pointer size
1 or 2, depends on
declared pointer size
1 or 2, depends
on compiler
directive
111
1
LOGICAL is normally defined as 2 bytes. The LOGICAL*2 and LOGICAL*4 compiler directives redefine LOGICAL.