A função BIT-OF retorna uma cadeia de caracteres alfanuméricos que consiste nos caracteres "1" e "0" que correspondem ao valor binário de cada byte no argumento de entrada.

O tipo da função é alfanumérico.

argument-1

Pode ser um item de dados, resultado de função literal ou intrínseca de qualquer classe de dados.
o argument-1 identifica a cadeia de caracteres de origem da conversão.

O valor retornado é uma cadeia de caracteres alfanuméricos que consiste nos bytes do argument-1 convertidos no padrão de bits correspondente ao valor binário de cada byte no argument-1.
O comprimento da cadeia de caracteres de saída em bytes é oito vezes o comprimento do argument-1 em bytes.

Nota: Se o argument-1 for inválido, o comportamento será indefinido..

Exemplos:

• FUNCTION BIT-OF('Hello, world!') returns '11001000100001011001001110010011100101100110101101000000101001101001011010011001100100111000010001011010'

• 01 BIN PIC 9(9) BINARY VALUE 12.
  .
  .

  FUNCTION BIT-OF(BIN) returns '00000000000000000000000000001100'

• 01 PAC PIC 9(5) COMP-3 VALUE 12345.
  .
  .

  FUNCTION BIT-OF(PAC) returns '000100100011010001011111'

• 01 ZON PIC 9(5) VALUE 12345.
  .
  .

  FUNCTION BIT-OF(ZON) returns '1111000111110010111100111111010011110101'
• FUNCTION BIT-OF(NATIONAL-OF(' ')) returns '0000000000100000'