CBL_CTF_LEVEL

特定のコンポーネントに使用するトレースレベルを指定します。コンポーネント識別子を省略した場合はデフォルトのトレースレベルになります。

構文：

call "CBL_CTF_LEVEL" using by value     flags
                           by value     trace-level
                           by reference component-id
                              returning status-code

パラメーター：

	呼び出しプロトタイプ使用時 (「説明の読み方」を参照)	PIC
`flags`	cblt-x4-comp5	pic x(4) comp-5
`trace-level`	cblt-x4-comp5	pic x(4) comp-5
`component-id`	pic x(n)	pic x(n)
`status-code`	「説明の読み方」を参照

入力パラメーター：

flags

制御フラグ：

ビット 0 から 29

将来使用するために予約されています。値は常に 0 です。

ビット 30

値	意味
0	`component-id` は空白文字で終了します。
1	`component-id` は null で終了します。ビット 31 を設定していない場合は無視されます。

ビット 31

値	意味
0	`component-id` は、CBL_CTF_TRACER_GET の呼び出しから返される pic x(4) comp-5 トレーサーハンドルです。
1	`component-id` は、pic x(`n`) テキスト文字列です。文字列の終了文字はビット 30 で定義されます。

trace-level

デフォルトのトレースしきい値レベルを設定します。次のいずれかになります。

78-CTF-FLAG-LEVEL-DEBUG
78-CTF-FLAG-LEVEL-INFO
78-CTF-FLAG-LEVEL-WARN
78-CTF-FLAG-LEVEL-ERROR
78-CTF-FLAG-LEVEL-FATAL

component-id

プロパティの値を返す対象のコンポーネント。flags のビット 31 が設定されていない場合は pic x(4) comp-5 トレーサーハンドル (CBL_CTF_TRACER_GET から取得)、flags のビット 31 が設定されている場合は pic x(n) テキスト識別子になります。

出力パラメーター：

status-code

次のいずれかになります。

78-CTF-RET-INVALID-COMPONENT-NAME
78-CTF-RET-INVALID-TRACE-HANDLE
78-CTF-RET-INVALID-TRACE-LEVEL
78-CTF-RET-NOT-ENOUGH-MEMORY
78-CTF-RET-SUCCESS

説明：

CBL_CTF_LEVEL は、構成ファイルの mftrace.level エントリおよび mftrace.level.component-name エントリと同等の機能を提供します。

例：

 copy "cbltypes.cpy".
 copy "mfctf.cpy".

*> 1) Set the default trace threshold level to be DEBUG

 ...
 call "CBL_CTF_LEVEL" using by value 0
                            by value 78-CTF-FLAG-LEVEL-DEBUG
                            by reference " "
 ...

*> 2) Set the WARNING tracing threshold level for the MF.RTS component. 
*>    Any component inheriting from the MF.RTS component (such as 
*>    MF.RTS.ERR and MF.RTS.MEM) will also use the WARNING tracing 
*>    threshold level. All other trace-enabled components will use the 
*>    INFO tracing threshold level.

 ...
 call "CBL_CTF_LEVEL" using by value 0
                            by value 78-CTF-FLAG-LEVEL-INFO
                            by reference " "

 call "CBL_CTF_LEVEL" using by value 0
                            by value 78-CTF-FLAG-LEVEL-WARN
                            by reference "MF.RTS "
 ...