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 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: