2.4.2 BITPCI

1.
Function
Returns a character string of '0' and '1' as a bit pattern.
2.
Call
CALL BITPCI(CP,IP)
3.
Explanation of Parameters
CP (C*(*)) A character-type argument that specifies the bit pattern. '1' and '0' are specified when the bit is ON and OFF, respectively.
IP (I) An argument of 1 word length that returns the bit pattern..
4.
Notes
(a)
When the length of CP is N (=LEN(CP)), then this subroutine checks the lower MIN(N,NB) characters of CP (NB is a number determined by the internal variable 'NBITSPW') and returns the pattern right-aligned. When N is greater than NB, then it checks the pattern of the lower NB characters (CP(N-NB+1:N)). The precise specification method of bit pattern is '0' for bit OFF, and ON for all other values.