Document revision date: 30 March 2001

## OpenVMS Programming Concepts Manual

Previous | Contents | Index

## E.2 Ada Implementations

Table E-2 lists the OpenVMS data types and their corresponding Ada data type declarations.

Table E-2 Ada Implementations
OpenVMS Data Types | Ada Declarations
--- | ---
access_bit_names | STARLET.ACCESS_BIT_NAMES_TYPE
access_mode | STARLET.ACCESS_MODE_TYPE
address | SYSTEM.ADDRESS
address_range | STARLET.ADDRESS_RANGE_TYPE
arg_list | STARLET.ARG_LIST_TYPE
ast_procedure | SYSTEM.AST_HANDLER
boolean | STANDARD.BOOLEAN
byte_signed | STANDARD.SHORT_SHORT_INTEGER
byte_unsigned | SYSTEM.UNSIGNED_BYTE
channel | STARLET.CHANNEL_TYPE
char_string | STANDARD.STRING
complex_number | User-defined record
cond_value | CONDITION_HANDLING.COND_VALUE_TYPE
context | STARLET.CONTEXT_TYPE
date_time | STARLET.DATE_TIME_TYPE
device_name | STARLET.DEVICE_NAME_TYPE
ef_cluster_name | STARLET.EF_CLUSTER_NAME_TYPE
ef_number | STARLET.EF_NUMBER_TYPE
exit_handler_block | STARLET.EXIT_HANDLER_BLOCK_TYPE
fab | STARLET.FAB_TYPE
file_protection | STARLET.FILE_PROTECTION_TYPE
floating_point | STANDARD.FLOAT STANDARD.LONG_FLOAT STANDARD.LONG_LONG_FLOAT SYSTEM.F_FLOAT SYSTEM.D_FLOAT SYSTEM.G_FLOAT SYSTEM.H_FLOAT SYSTEM.IEEE_SINGLE_FLOAT 1 SYSTEM.IEEE_DOUBLE_FLOAT 1
function_code | STARLET.FUNCTION_CODE_TYPE
identifier | SYSTEM.UNSIGNED_LONGWORD
invo_context_blk 1 | User-defined record
invo_handle 1 | SYSTEM.UNSIGNED_LONGWORD
io_status_block | STARLET.IOSB_TYPE
item_list_pair | SYSTEM.UNSIGNED_LONGWORD
item_list_2 | STARLET.ITEM_LIST_2_TYPE
item_list_3 | STARLET.ITEM_LIST_3_TYPE
item_quota_list | User-defined record
lock_id | STARLET.LOCK_ID_TYPE
lock_status_block | STARLET.LOCK_STATUS_BLOCK_TYPE
lock_value_block | STARLET.LOCK_VALUE_BLOCK_TYPE
logical_name | STARLET.LOGICAL_NAME_TYPE
longword_signed | STANDARD.INTEGER
longword_unsigned | SYSTEM.UNSIGNED_LONGWORD
mask_byte | SYSTEM.UNSIGNED_BYTE
mask_longword | SYSTEM.UNSIGNED_LONGWORD
mask_quadword | SYSTEM.UNSIGNED_QUADWORD
mask_word | SYSTEM.UNSIGNED_WORD
mechanism_args | STARLET.CHFDEF2_TYPE
null_arg | SYSTEM.UNSIGNED_LONGWORD
octaword_signed | array(1..4) of SYSTEM.UNSIGNED_LONGWORD
octaword_unsigned | array(1..4) of SYSTEM.UNSIGNED_LONGWORD
page_protection | STARLET.PAGE_PROTECTION_TYPE
procedure | SYSTEM.ADDRESS
process_id | STARLET.PROCESS_ID_TYPE
process_name | STARLET.PROCESS_NAME_TYPE
quadword_signed | SYSTEM.UNSIGNED_QUADWORD
quadword_unsigned | SYSTEM.UNSIGNED_QUADWORD
rights_holder | STARLET.RIGHTS_HOLDER_TYPE
rights_id | STARLET.RIGHTS_ID_TYPE
rab | STARLET.RAB_TYPE
section_id | STARLET.SECTION_ID_TYPE
section_name | STARLET.SECTION_NAME_TYPE
system_access_id | STARLET.SYSTEM_ACCESS_ID_TYPE
time_name | STARLET.TIME_NAME_TYPE
transaction_id | array(1..4) of SYSTEM.UNSIGNED_LONGWORD
uic | STARLET.UIC_TYPE
user_arg | STARLET.USER_ARG_TYPE
varying_arg | SYSTEM.UNSIGNED_LONGWORD
vector_byte_signed | array(1.. n) of STANDARD.SHORT_SHORT_INTEGER
vector_byte_unsigned | array(1.. n) of SYSTEM.UNSIGNED_BYTE
vector_longword_signed | array(1.. n) of STANDARD.INTEGER
vector_longword_unsigned | array(1.. n) of SYSTEM.UNSIGNED_LONGWORD
vector_quadword_signed | array(1.. n) of SYSTEM.UNSIGNED_QUADWORD
vector_quadword_unsigned | array(1.. n) of SYSTEM.UNSIGNED_QUADWORD
vector_word_signed | array(1.. n) of STANDARD.SHORT_INTEGER
vector_word_unsigned | array(1.. n) of SYSTEM.UNSIGNED_WORD
word_signed | STANDARD.SHORT_INTEGER
word_unsigned | SYSTEM.UNSIGNED_WORD

1Alpha specific.

## E.3 Application Programming Language (APL) Implementations

Table E-3 lists the OpenVMS data types and their corresponding APL data type declarations.

Table E-3 APL Implementations
OpenVMS Data Types | APL Declarations
--- | ---
access_bit_names | na
access_mode | /TYPE=BU
address | na
address_range | na
arg_list | na
ast_procedure | na
boolean | /TYPE=V
byte_signed | /TYPE=B
byte_unsigned | /TYPE=BU
channel | /TYPE=WU
char_string | /TYPE=T
complex_number | /TYPE=FC /TYPE=DC /TYPE=GC /TYPE=HC
cond_value | /TYPE=LU
context | na
date_time | na
device_name | /TYPE=T
ef_cluster_name | /TYPE=T
ef_number | /TYPE=LU
exit_handler_block | na
fab | na
file_protection | /TYPE=WU
floating_point | /TYPE=F /TYPE=D /TYPE=G /TYPE=H
function_code | na
identifier | na
io_status_block | na
item_list_2 | na
item_list_3 | na
item_list_pair | na
item_quota_list | na
lock_id | /TYPE=LU
lock_status_block | na
lock_value_block | na
logical_name | /TYPE=T
longword_signed | /TYPE=L
longword_unsigned | /TYPE=LU
mask_byte | /TYPE=BU
mask_longword | /TYPE=LU
mask_quadword | na
mask_word | /TYPE=WU
null_arg | /TYPE=LU
octaword_signed | na
octaword_unsigned | na
page_protection | /TYPE=LU
procedure | na
process_id | /TYPE=LU
process_name | /TYPE=T
quadword_signed | na
quadword_unsigned | na
rights_holder | na
rights_id | /TYPE=LU
rab | na
section_id | na
section_name | /TYPE=T
system_access_id | na
time_name | /TYPE=T
transaction_id | na
uic | /TYPE=LU
user_arg | /TYPE=LU
varying_arg | na
vector_byte_signed | /TYPE=B
vector_byte_unsigned | /TYPE=BU
vector_longword_signed | /TYPE=L
vector_longword_unsigned | /TYPE=LU
vector_quadword_signed | na
vector_quadword_unsigned | na
vector_word_signed | /TYPE=W
vector_word_unsigned | /TYPE=WU
word_signed | /TYPE=W
word_unsigned | /TYPE=WU

## E.4 BASIC Implementations

Table E-4 lists the OpenVMS data types and their corresponding BASIC data type declarations.

Table E-4 BASIC Implementations
OpenVMS Data Type | BASIC Declarations
--- | ---
access_bit_names | na
access_mode | BYTE (signed)
address | LONG
address_range | LONG address_range (1) or RECORD address_range LONG beginning_address LONG ending_address END RECORD
arg_list | na
ast_procedure | EXTERNAL LONG ast_proc
boolean | LONG
byte_signed | BYTE
byte_unsigned | BYTE 1
channel | WORD
char_string | STRING
complex_number | RECORD complex REAL real_part REAL imaginary_part END RECORD
cond_value | LONG
context | LONG
date_time | RECORD date_time LONG FILL (2) END RECORD
device_name | STRING
ef_cluster_name | STRING
ef_number | LONG
exit_handler_block | RECORD EHCB LONG flink LONG handler_addr BYTE arg_count BYTE FILL (3) LONG status_value_addr END RECORD
fab | na
file_protection | LONG
floating_point | SINGLE DOUBLE GFLOAT HFLOAT
function_code | RECORD function-code WORD major-function WORD subfunction END RECORD
identifier | LONG
io_status_block | RECORD iosb WORD iosb-field (3) END RECORD
item_list_2 | RECORD item_list_two GROUP item(15) VARIANT CASE WORD comp_length WORD code LONG comp_address CASE LONG terminator END VARIANT END GROUP END RECORD
item_list_3 | RECORD item_list_3 GROUP item (15) VARIANT CASE WORD buf_len WORD code LONG buffer_address LONG length_address CASE LONG terminator END VARIANT END GROUP END RECORD
item_list_pair | RECORD item_list_pair GROUP item (15) VARIANT CASE LONG code LONG value CASE LONG terminator END VARIANT END GROUP END RECORD item_list_pair
item_quota_list | RECORD item_quota_list GROUP quota ( n) VARIANT CASE BYTE quota_name LONG value CASE BYTE list_end END VARIANT END GROUP END RECORD
lock_id | LONG
lock_status_block | na
lock_value_block | na
logical_name | STRING
longword_signed | LONG
longword_unsigned | LONG 1
mask_byte | BYTE
mask_longword | LONG
mask_quadword | RECORD quadword LONG FILL (2) END RECORD 1
mask_word | WORD
null_arg | A null argument is indicated by a comma used as a placeholder in the argument list.
octaword_signed | na
octaword_unsigned | na
page_protection | LONG
procedure | EXTERNAL LONG proc
process_id | LONG
process_name | STRING
quadword_signed | RECORD quadword LONG FILL (2) END RECORD
quadword_unsigned | RECORD quadword LONG FILL (2) END RECORD 1
rights_holder | RECORD quadword LONG FILL (2) END RECORD 1
rights_id | LONG
rab | na
section_id | RECORD quadword LONG FILL (2) END RECORD 1
section_name | STRING
system_access_id | RECORD quadword LONG FILL (2) END RECORD 1
time_name | STRING
transaction_id | na
uic | LONG
user_arg | LONG
varying_arg | Depends on the application.
vector_byte_signed | BYTE array n
vector_byte_unsigned | BYTE array n 1
vector_longword_signed | LONG array n
vector_longword_unsigned | LONG array n 1
vector_quadword_signed | na
vector_quadword_unsigned | na
vector_word_signed | WORD array n
vector_word_unsigned | WORD array n 1
word_signed | WORD
word_unsigned | WORD 1

1Although unsigned data types are not directly supported in BASIC, you may substitute the signed equivalent provided you do not exceed the range of the signed data type.

Previous | Next | Contents | Index

| privacy and legal statement |
5841PRO_088.HTML