X"91" function 12

プログラミング可能な COBOL スイッチを読み取ります。

注: この機能は、JVM COBOL ではサポートされていません。

構文：

call x"91" using result
                 function-code
                 parameter

result

呼び出しプロトタイプ：cblt-x1-compx

PIC：pic x comp-x

function-code

呼び出しプロトタイプ：cblt-x1-compx

PIC：pic x comp-x

parameter

次を含むグループ：

01 parameter
  03 switch-flag cblt-x1-compx occurs 8  *> pic x comp-x occurs 8
  03 debug-flag  cblt-x1-compx           *> pic x comp-x

function-code

値 12

`result`	呼び出しが成功した場合はゼロに設定されます。それ以外の場合は、ゼロ以外に設定されます。
`switch-flag`	スイッチ 0 から 7 の値。
`debug-flag`	ANSI デバッグモジュールが有効な場合は、1 に設定されます。それ以外の場合は、ゼロに設定されます。