View Source

7.71.2 IF_KEY についてのコメント/警告

IF_KEYコマンドは、必ず、ワークステーションを使用するDISPLAY、REQUEST、POP_UP、BROWSEなどのコマンドの実行後に使用してください。ワークステーションとの対話を行う前にIF_KEYコマンドを使用すると、予期しない結果になります。

値*PROMPTを指定すると、\[プロンプト\]キーが使用されたかどうかを検査することができます。ただし、多くのRDMLプログラムでは、関連するパラメータがPROMPT_KEY(*YES *AUTO)としてコーディングされているため、\[プロンプト\]キーの処理は自動的に実行されます。\[プロンプト\]キーが自動的に処理されないようにするには、PROMPT_KEY(*YES *NEXT)またはPROMPT_KEY(*YES L10)をコーディングします(L10はコマンド・ラベルです)。この場合、\[プロンプト\]キーがRDMLプログラムで処理されるものと見なされるため、IF_KEYコマンドでその使用を検査できるようになります。

検査値*CANCEL、*EXITHIGH、および*EXITLOWは、SAA/CUAファンクション・キーの割り当てとの完全な互換性のために用意されています。これらの値をSAA/CUA以外のアプリケーションで使用しないでください。
*CANCELは機能的に*MENUと同じです。

*EXITHIGHおよび*EXITLOWを検査する場合は、関連付けられたDISPLAY、REQUEST、またはPOP_UPコマンドでEXIT_KEYパラメータによって高位または低位の\[終了\]キーを適切に有効にする必要があります。1つのDISPLAY、REQUEST、またはPOP_UPコマンドで高位および低位の\[終了\]キーを両方有効にすることはできません。

LANSAディクショナリには、#IO$KEYという特別なフィールドが保持されています。このフィールドには、ワークステーションとの対話で最後に使用されたファンクション・キーが保管されます。このフィールドは、他のフィールドと同様に、IFまたはCASEステートメント内で検査できます。状況によっては、合成コマンドIF_KEYを使用するよりも、IFまたはCASEコマンドでこのフィールドを使用する方が適している場合もあります。

      以下は、このフィールドの使用例です。 
    DISPLAY   USER_KEYS((15 'Purge')(16 'Commit')(17 'Save') (*ROLLUP 'Up')(*ROLLDOWN 'Down'))       CASE      OF_FIELD(#IO$KEY)            WHEN      VALUE_IS('= ''15''')            WHEN      VALUE_IS('= ''16''')            WHEN      VALUE_IS('= ''17''')            WHEN      VALUE_IS('= ''UP''')            WHEN      VALUE_IS('= ''DN''')     ENDCASE   
      ファンクション・キー番号(01～24)を使用して、フィールド#IO$KEYを通常のファンクション・キーと比較することができます。ただし、RDMLプログラムの実行中に#IO$KEYがその他の値になることもあります。例えば、レコードの自動前進/\[OK\]キーが押されたことを示す'RA'、上スクロール・キーが押されたことを示す'UP'、下スクロール・キーが押されたことを示す'DN'などです。これらの値はAIDS値と呼ばれ、実際にはIBM i オペレーティング・システムの一部です。

DISPLAY、REQUEST、またはPOP_UPコマンドが実行され、これによって上スクロール(*ROLLUP)キーまたは下スクロール(*ROLLDOWN)キーが有効になっており、かつブラウズ・リストが表示されている場合、ユーザーがブラウズ・リストの「端」までスクロールしない限り、制御はRDMLプログラムに戻されません。

例えば、42個の項目で構成されるブラウズ・リストが表示されている場合(画面の各「ページ」に15個の項目が表示されるものとする)、上スクロール・キーが3回使用されるまでは、上スクロール処理はIBM i オペレーティング・システムによって自動的に処理されます。3回目の使用でユーザーはブラウズ・リストの「端」に達するため、制御がRDMLプログラムに戻されます。下スクロール処理についても同様です。