13.3.1 HEXDIC

1.
Function
Converts a bit pattern into a character string expressed in hexadecimal.
2.
Call
CALL HEXDIC(IP,CP)
3.
Explanation of Parameters
IP (I) An argument of 1 word length that determines the bit pattern.
CP (C*(*)) A character-type argument that returns the character string expressed in hexadecimal as a combination of '0'- '9', 'A', 'B', 'C', 'D', 'E', and 'F'.
4.
Notes
(a)
When the length of CP is N (=LEN(CP)), then this subroutine checks the lower MIN(N*4,NB) bits of IP (NB is a number determined by the internal variable 'NBITSPW') and returns the bit pattern right-aligned. When N is greater than NB, CP(1:N*4-NB) is undefined.