PowerFX V1.0 運用説明書 - Microsoft(R) Windows(R) -

3.4.11 error

機能：

任意のエラーを発生させます。

形式：

error message 【info】 【code】

オプション：

なし

パラメーター：

message
エラーをcatchコマンドで捕捉している場合、catchコマンドに受け渡すメッセージを指定します。

info
予約変数errorInfoに格納する文字列を指定します。指定しない場合は、errorコマンドの実行時の情報が格納されます。

code
予約変数errorCodeに格納する文字列を指定します。指定しない場合は、NONEが格納されます。

復帰値：

なし

注意事項：

エラーをcatchコマンドで捕捉しない場合、TCLplusは終了します。

使用例：

プロシージャの内部でエラーを発生させる。

#プロシージャの中でエラーを発生させる。
proc errfunc1 { } {
   error "エラー0001が発生"
}
#プロシージャの中でエラーを発生させる。errorInfoとerrorCodeも指定する。
proc errfunc2 { } {
   error "エラー0002が発生" "発生位置：errfunc2コマンドの1行目" "エラーコード 0002"
}
#errfunc1を実行
catch { errfunc1 } errormsg

puts "****************"
puts "*errfunc1の場合*"
puts "****************"
puts "<<<errmsg>>> \n$errormsg \n"
puts "<<<errorInfo>>> \n$errorInfo \n" 
puts "<<<errorCode>>> \n$errorCode \n"

#errfunc2を実行
catch { errfunc2 } errormsg

puts "****************"
puts "*errfunc2の場合*"
puts "****************"
puts "<<<errmsg>>> \n$errormsg \n"
puts "<<<errorInfo>>> \n$errorInfo \n"
puts "<<<errorCode>>> \n$errorCode \n"

＜実行結果＞

****************
*errfunc1の場合*
****************
<<<errmsg>>>
エラー0001が発生

<<<errorInfo>>>
エラー0001が発生
    while executing
"error "エラー0001が発生""
    (procedure "errfunc1" line 2)
    invoked from within
"errfunc1 "

<<<errorCode>>>
NONE

****************
*errfunc2の場合*
****************
<<<errmsg>>>
エラー0002が発生

<<<errorInfo>>>
発生位置：errfunc2コマンドの1行目
    (procedure "errfunc2" line 1)
    invoked from within
"errfunc2 "

<<<errorCode>>>
エラーコード 0002