Previous Topic Next topic Print topic


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

before after
0 1
1 0
Previous Topic Next topic Print topic