You are viewing an old version of this page. View the current version.

Compare with Current View Page History

Version 1 Next »

[ |../../index.htm#lansa/vlfonetutorials_0390.htm]
Visual LANSA フレームワーク ガイド > チュートリアル > VLF-ONE Web アプリケーションのチュートリアル > フィルターとコマンド・ハンドラーの手動作成 > フィルターの手動によるコーディングとスナップイン > テーブル・アクセス用のサーバー・モジュールを作成

テーブル・アクセス用のサーバー・モジュールを作成

フィルターを作成する前に、フィルターが利用するテーブルへのアクセスを制御するサーバー・モジュールを作成します。
Visual LANSA エディターで、[ファイル] > [作成] > [サーバー モジュール] を選択します。

 
サーバー・モジュールの名前、記述を入力し、サーバー・モジュールによりアクセスされるテーブルに xEmployee を指定します。

エディタでサーバー・モジュールを開き、サーバー・モジュール FindxEmployeeBySurna を探します。ルーチン内の Select ステートメントを次のようにコメントにします。

  • Select Fields(#xEmployeeList) From_File(xEmployeeBySurname) With_Key(#xEmployeeSurname #xEmployeeGivenNames) Nbr_Keys(*Compute) Generic(*Yes)
     
    そして、この後に次のコード行を貼り付けます。
    Define_Com Class(#xEmployeeSurname) Name(#SearchEmployeeSurname)
    #SearchEmployeeSurname := #xEmployeeSurname.UpperCase
    Select Fields(#xEmployeeList) From_File(xEmployeeBySurname) Where(#xEmployeeSurname.UpperCase.Contains( #SearchEmployeeSurname ))
     
    (Where() 句は SELECT ステートメントがテーブル全体を読み込むことを意味することに注意してください。自身のアプリケーションでは、SELECT_SQL ステートメントを調べて、大きなテーブルの効果的な検索方法についても学習してください。)
     
    サーバー・モジュールをコンパイルします。

     
     
    [ |../../index.htm#lansa/vlfonetutorials_0390.htm]
  • No labels