SAP ABAP - Auto Refresh Using ABAP Timer

 *&---------------------------------------------------------------------*

*& Report ZTIMER
*&---------------------------------------------------------------------*
*&
*&---------------------------------------------------------------------*
REPORT ZTIMER.

PARAMETERS P_TIME TYPE DEFAULT 500.

CLASS CTIMER DEFINITION.
  PUBLIC SECTION.
    METHODS RUN_HANDLER FOR EVENT FINISHED OF CL_GUI_TIMER.

ENDCLASS.

DATA TIMER  TYPE REF TO CL_GUI_TIMER.
DATA STIMER TYPE REF TO CTIMER.

CLASS CTIMER IMPLEMENTATION.
  METHOD RUN_HANDLER.

    CALL METHOD TIMER->RUN.

    CALL METHOD CL_GUI_CFW=>SET_NEW_OK_CODE
      EXPORTING
        NEW_CODE 'REFR'.
  ENDMETHOD.

ENDCLASS.


AT SELECTION-SCREEN OUTPUT.
  P_TIME P_TIME 10.

  CREATE OBJECT TIMER.
  CREATE OBJECT STIMER.
  TIMER->INTERVAL '10'.
  CALL METHOD TIMER->RUN.
  SET HANDLER STIMER->RUN_HANDLER FOR ALL INSTANCES.

Comments

Popular posts from this blog

IT Asset Management Dengan PHP MySQL

PHP MySql CRUD Dengan Konsep MVC

Cara Sederhana Multi Insert Data Dengan PHP - MySQL