BSP - 나만의 EVENT 캐스팅 구문

DATA : EVENT        TYPE REF TO IF_HTMLB_DATA.
DATA : TABLE_EVENT  TYPE REF TO CL_HTMLB_EVENT_TABLEVIEW.
DATA : IDOFEVENT    TYPE STRING.

**이벤트
EVENT = CL_HTMLB_MANAGER=>GET_EVENT_EX( REQUEST ).

IF EVENT_ID = CL_HTMLB_MANAGER=>EVENT_ID.
  IF EVENT IS NOT INITIAL
    AND EVENT->EVENT_NAME = HTMLB_EVENTS=>TABLEVIEW.
    TABLE_EVENT ?= EVENT.
  ENDIF.
ENDIF.

* Read tableview from manager. *
DATA: TV        TYPE REF TO CL_HTMLB_TABLEVIEW.
DATA: TV_DATA   TYPE REF TO CL_HTMLB_EVENT_TABLEVIEW.

TV ?= CL_HTMLB_MANAGER=>GET_DATA( REQUEST = REQUEST
                                  NAME    = 'tableView'
                                  ID      = 'tv1' ).
TV_DATA = TV->DATA.

IF EVENT IS NOT INITIAL.
  IDOFEVENT = EVENT->EVENT_ID.
ENDIF.

CASE IDOFEVENT.
  WHEN OTHERS.
ENDCASE.