ON ERR CALLに渡すエラーキャッチメソッド。ファイル関係のエラーをハンドリングする。
使い方
ON ERR CALL(“JCL_file_OnErrorCall”)
4Dのエラーダイアログが表示されないで、自力のアラートが表示される。
//JCL_file_OnErrorCall
//20110627 wat
//ファイル関係のエラー処理
C_LONGINT($err_code)
C_TEXT($title; $alert; $ok_str) //エラーメッセージ用
//エラーコードを取得
$err_code:=Error
//エラーメッセージ表示
$title:="File error."+Char(Carriage return)
$alert:=$title+"Error code is ["+String($err_code)
$alert:=$alert+"]"
$ok_str:="OK"
ALERT($alert; $ok_str)