ステップ2. Department Sectionsに詳細コマンド・ハンドラーを作成する

ステップ2. Department Sectionsに詳細コマンド・ハンドラーを作成する

このステップでは、選択した課の社員を表示する詳細コマンド ハンドラーを作成します。

1.    再利用可能パーツを作成します。コマンド・ハンドラー名としてiiiCOM10、説明に課の詳細情報と指定します(ここでiiiは入力者のイニシャルです。Visual LANSAの非ライセンス版または試行版を使っている場合は、iiiの部分をDEMとする必要があります)。

2.    コンポーネントの[詳細]タブをクリックし、[Ancestor]にVF_AC010を指定します。

最初に、コマンド・ハンドラー上のコントロールの配置を制御するレイアウト・マネージャをコマンド・ハンドラーに追加します。

3.    [表示]メニューからレイアウト・ヘルパーを起動します。

4.    再利用可能パーツiiiCOM10に添付マネージャを追加します。

5.    [お気に入り]タブの[共通の制御]タブを表示します。

6.    パネルを右側(PANL_1)にドラッグ・アンド・ドロップします。その幅を94に変更します。この領域には、今後[詳細]プッシュ・ボタンが表示されます。

7.    別のパネルを残りの領域の中心にドラッグ・アンド・ドロップします(PANL_2)。レイアウト・ヘルパーを使用して、添付マネージャ(ATLM_1)をこのパネルに追加します。それには、右側のドロップダウンを使用します。

8.    グリッド・コントロールをPANL_2の中央にドラッグ・アンド・ドロップします。グリッドがPANL_2の両側に追加されます。フレームワークの残りのサイズを自動的に変更するコマンド・ハンドラーを作成できました。

コマンド・ハンドラーは、次のようになります。

9.    PSLMSTファイルをリポジトリに表示し、展開します。

10.    フィールドEMPNO、SURNAMEおよびGIVENAMEをグリッドにドラッグします。

11.    GIVENAMEカラム(GDCL_3)のWidthTypeをRemainderに設定します。

12.    グリッドのSelectionStyleをWholeRowに設定します。

これで、コマンド・ハンドラーに社員グリッドを生成するコードを記述できます。

13.    [ソース]タブを表示します。

14.    BEGIN_COMステートメントの後にuExecuteメソッド・ルーチンを追加します。

Mthroutine uExecute Options(*Redefine)

uExecuteメソッドは、コマンド・ハンドラーに関連付けられているフレームワーク・コマンドをユーザーが実行するといつも呼び出されます。

15.    GetCurrentInstanceメソッドを使用して現在の部門と課を取得します。

Invoke #avListManager.GetCurrentInstance AKey1(#DEPTMENT) AKey2(#SECTION)

16.    社員グリッドをクリアします。

Clr_list #Grid_1

17.     最後に、PSLMST1論理ビューから課に所属する社員を選択し、グリッドに追加します。

Select fields(#EMPNO #SURNAME #GIVENAME) from_file(PSLMST1) with_Key(#DEPTMENT #SECTION)

Add_entry #GRID_1

Endselect

コードは、次のようになります。

18.    コマンド・ハンドラーをコンパイルします。

19.    コマンド・ハンドラーをDepartment Sectionsビジネス・オブジェクトの詳細コマンドにスナップインします。

20.    コマンド・ハンドラーをテストします。