CBL_NOT

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 Library Routines - Key) Picture (32-bit systems)
target cblt-x1-compx Any data item.
length cblt-os-size Numeric literal or pic x(4) comp-5.
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:

before after
0 1
1 0
See Also: