CBL_NOT performs a binary, bitwise "not" operation on a series of bytes.
Usage
CALL "CBL_NOT" USING DEST, LENGTH GIVING STATUS
Parameters
DEST PIC X(n)
Data area containing the bytes for the operation.
LENGTH Numeric parameter (optional)
Describes the number of bytes to combine. If omitted, then CBL_NOT uses the size of DEST.
STATUS Any numeric data item
Contains the return status of the operation. Returns zero if successful, 1 if not. This routine always succeeds, so STATUS always contains a zero.
Description
For LENGTH bytes, each byte of DEST is negated in a bitwise fashion. For each bit of each byte, the result is the opposite bit value. The "not" operation uses the following table to determine the result:
| Not
|
|
| 0
| 1
|
| 1
| 0 |