DCL:MISC£±:BITLIB: Bit-Pattern Processing *#:Explanation of Subroutines
Returns a bit pattern as character strings of '0' and '1'.
CALL BITPIC(IP,CP)
IP (I) An argument of 1 word length that checks the bit pattern.. CP (C*(*)) A character-type argument that returns the bit pattern. '1' and '0' are returned when the bit is ON and OFF, respectively.