In coding a Reporting Facility program, you may need to test the contents of a single byte against a mask. When using a mask in a logical expression, code it in the following format:
►►─ B'testbits' ──────────────────────────────────────────────────────────────►◄
Specifies the mask to be tested. It is comprised of one to eight 1s, 0s, or Xs. Positioning in the mask corresponds to bits 0—7, from left to right, of the byte to be tested against.
Note the following:
DEFINE BIT-STRING 27 S GOTO START WHEN (BIT-STRING EQ mask)
|
Mask in Command |
Hex Value |
Condition |
|---|---|---|
|
B'11000000' |
X'CO' (11000000) |
true |
|
Copyright © 2014 CA.
All rights reserved.
|
|