Page History
HRシステムの全社員を選択し、インスタンスリストに追加する場合の非表示フィルターの例を以下に示します。
フィルターが見えていないことに注意してください。このフィルターは、以下のような初期化されていないルーチンを持っています。
[ |../../index.htm#lansa/lansa048_6175.htm]
Visual LANSA フレームワーク ガイド > フレームワーク・プログラミング > 上級フィルター・スタイル > 非表示フィルター > VLF-WIN の場合
...
Mthroutine Name(uInitialize) Options(*Redefine)
...
* アンセスターを実行 ....
...
Invoke #Com_Ancestor.uInitialize
...
* これを非表示フィルターとして定義 (非表示フィルターの場合、常識的にも
...
* フィルターは 1 つのみにする)
Set #Com_Owner avHiddenFilter(TRUE)
* すべての社員詳細でインスタンスリストを埋める
Invoke #avListManager.BeginListUpdate
Invoke #avListManager.ClearList
Select Fields(#EmpNo #SurName #GiveName) From_File(PSLMST)
...
Use BConcat (#GiveName #SurName) #Std_TextL
Invoke Method(#avListManager.AddtoList)
...
Visualid1(#Empno)
...
Visualid2(#Std_TextL)
...
Akey1(#Empno)
...
EndSelect
Invoke #avListManager.EndListUpdate
* 終了
EndRoutine
