シナリオ:IBM i Webサーバー

 前提条件

設定

標準ユーザーをフレームワークに登録

UFU0001 を修正して、HTTP サーバーにログオンして、標準ユーザーに切り替わるユーザーを代表するフレームワークのユーザー・プロファイル ("typical user") を検索できるようにします。(検出されなかったユーザーにはデフォルトの標準ユーザーを割り当てることができます)。 

この検索はユーザー・プロファイルのデータベース・ファイルを使って実行するか、フレームワークの "typical users" が IBM i グループのプロファイルと同じであるという前提で、ユーザーの IBM i グループ・プロファイルにアクセスする CL プログラムを呼び出して実行します。

自分のバージョンの UFU0001のRDML では次のようになります。

          CALL PGM(GETGRPPRF) PARM(#CHK_USER #GRPPRF) EXIT_USED(*NEXT) MENU_USED(*NEXT)
CHANGE #CHK_USER #GRPPRF
CHANGE #CHK_VALP 'FALSE'

CLプログラムGETGRPPRFは、以下のようなものです。

          PGM        PARM(&USRPRF &GRPPRF)
DCL &GRPPRF *CHAR 10
DCL &USRPRF *CHAR 10                                                
           RTVUSRPRF  USRPRF(&USRPRF) GRPPRF(&GRPPRF)
ENDPGM                                                            

また、UFU0001を修正して、ユーザーをこれから変わろうとする"typical user"ではなく、ログオンしたままのタイプで表示することができます。

          change #CHK_VUSER *WEBUSER  

UFU0001 の自分のバージョンをコンパイルします。

フレームワークが自分のバージョンの UFU0001 を使用するように変更するには、(フレームワーク ) --> (プロパティ...) --> [Web/Ramp 詳細] タブを表示します。  オプション IIP - ユーザーサインオンのファンクション名にファンクション名を指定します。