Back|Forward

DCL:MISC１:BITLIB: Bit-Pattern Processing *#:Explanation of Subroutines

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.