Does a logical NOT on the bits of a data item.
Syntax:
call "CBL_NOT" using target
by value length
Parameters:
| |
Using call prototype (see
Key)
|
Picture
|
|
target
|
cblt-x1-compx
|
Any data item.
|
|
length
|
cblt-os-size
|
Numeric literal,
pic x(4) comp-5
or
pic x(8) comp-5 (64-bit native programs only)
|
On Entry:
|
target
|
The data to operate on.
|
On Exit:
|
target
|
The data with the bits inverted.
|
|
length
|
The number of bytes of
target to change. Positions beyond this are unchanged.
|
Comments:
The routine starts at the left-hand end of target and inverts bits. The truth table for this is: