JCL_pgs_SetValue

プログレスバー表示用メソッドのひとつ。途中経過を表示する。

使い方
JCL_pgs_SetValue(($progress/500)*100; “あ”+String($progress); $progress; 500)

引数
$1: バーの進捗を指定するための数値。パーセント(0から100の範囲)で与える。
$2: メッセージ用文字列
$3: カウンター用数値。
$4: カウンターの分母。

//JCL_pgs_SetValue
//プログレスバー用プロセス変数に値をセット
//$1:メーター
//$2:現在処理しているもの
//$3:現在のカウント
//$4:全カウント
//20080605 矢部 新規作成
//20080924 矢部 現在処理しているものを表示とカウントを追加

C_LONGINT($1)
<>P01_Meter:=$1

C_TEXT($2)
<>P01_Msg:=$2

C_LONGINT($3; $4)
<>P01_Count:=String($3)+"/"+String($4)