Implementing a Timer for Stateful Server

ステートフルアプリケーション、つまりステートフルサーバーおよびステートフルデタッチクライアントアプリケーションの場合、タイマーオブジェクトを使用できます。クラスファクトリCL_ABAP_TIMER_MANAGERを使用すると、タイプIF_ABAP_TIMER_MANAGERのタイマーマネージャオブジェクトを登録することができます。タイマーの開始と停止に使用できます。

さらに、APCアプリケーションのON_MESSAGEメソッドでは、200ミリ秒のタイムアウトでタイマーを作成できます。

サンプルコード

  " set timer for 200 miliseconds    DATA: lo_timer_handler TYPE REF TO lcl_timer.    TRY.        lv_text_mesage = |{ sy-mandt }/{ sy-uname }: ON_TIMEOUT has been occurred !|.        " convert the text into UTF8 byte stream        lv_binary_message = cl_abap_codepage=>convert_to( source = lv_text_mesage ).        " append the terminator byte LF to the message frame bevor sending        CONCATENATE lv_binary_message lv_terminator INTO lv_binary_message IN BYTE MODE.        " create and start the the timer        CREATE OBJECT lo_timer_handler.        lo_timer_handler->mo_message_manager  = i_message_manager.        lo_timer_handler->mv_message          = lv_binary_message.        DATA(lo_timer) = cl_abap_timer_manager=>get_timer_manager( ).        lo_timer->start_timer( i_timer_handler = lo_timer_handler i_timeout = 200 ).      CATCH cx_abap_timer_error INTO DATA(lx_timer).        lv_text_mesage = lx_timer->get_text( ).        MESSAGE lv_text_mesage TYPE 'E'.    ENDTRY.  ENDMETHOD.