CBL_NOT

1 つのデータ項目についてビット単位で論理否定を実行する。

構文:

call "CBL_NOT" using    target
               by value length

パラメーター:

  呼び出しプロトタイプを使用 (「キー」を参照) PIC
target cblt-x1-compx 任意のデータ項目
length cblt-os-size 数字リテラル

pic x(4) comp-5

または

pic x(8) comp-5 (64 ビットのネイティブ プログラムのみ)

入力パラメーター:

target 演算対象データ

出力パラメーター:

target 各ビットが反転されたデータ
length target 内で論理否定を行う部分のバイト長。位置がこの値を超えている場合、位置は変更されない。

説明:

本ルーチンは target の左端から演算を開始し、各ビットを順次反転する。真理値表は次のとおり。

実行前 実行後
0 1
1 0