 | |  |  |  |  |
| | | | | |
attrtb — Inquire attributes of key
subroutine attrtb(key,type,nel,status) character*(*) key character*4 type integer*4 size integer*4 status
attrtb returns the data type and the size
of a key in the current relational table residing in the table
buffer. If the key exists the positive number of elements is
returned. If the key does not exists, the number of elements is set
to 0 and the status is set to 1 (warning).
keyCharacter string containing the name of the key (input).
typeData type of key (output).
sizeSize of key (output). A value of 0
is returned if the key has not been found.
statusStatus code returned (output). Upon successful completion of the operation, the status value 0 is returned. A negative value is returned, if an error has been detected. The value 1 is returned if the key does not exist. See MemCom error codes.