サーバーモジュール - EndSessionメソッド

セッションを終了

サーバーモジュール (PRIM_SRVM) のメンバ

詳細

EndSession メソッドは、現在のセッションを終了するために使用されます。 
Session （* Required） で定義された SrvRoutines はもはや実行できません。1つを実行しようとすると、 Failed イベントがクライアントで発生します。

例

この例では、サインオンとサインオフのためのルーチンを備えたシンプルなセッションサーバーモジュールを示します。 
SessionIdentifier(PRIM_SRVM) は、そのサーバーモジュールが他のモジュールと組み合わせて使用することができ、共有できるデータを永続化に指定されています。 

     Begin_Com Role(*EXTENDS #PRIM_SRVM) SessionIdentifier(Personnel) 

        Define Field(#gUserID) Type(*Char) Length(40) 
        
        Persist Fields(#gUserID) 

        Srvroutine Name(Signin)
        Field_Map For(*Input) Field(#User)
        Field_Map For(*Output) Field(#Result) 

           If (#Com_owner.VerifyUser( #User )) 

              #Com_owner.StartSession Timeout(240)
              #Result := OK 

              #gUserID := #User 

           Else
 
              #Result := ER 

           Endif
 
        Endroutine
 
        Mthroutine Name(VerifyUser) Access(*Private)
        Define_Map For(*Input) Class(#xDemoAlpha128) Name(#User)
        Define_Map For(*Result) Class(#xDemoBoolean) Name(#Result) 
           * 有効ユーザーのテスト
 
        Endroutine 

        Srvroutine Name(Signoff) Session(*Required) 
        
           #Com_owner.EndSession 

        Endroutine 

     End_Com

参照

すべてのコンポーネント クラス
テクニカル リファレンス

  • No labels