Unicode oder Bild in Report einfügen

Code: Alles auswählen.

REPORT NO STANDARD PAGE HEADING.
*----------------------------------------------------------------------*
*       CLASS lcl_appl DEFINITION
*----------------------------------------------------------------------*
CLASS lcl_appl DEFINITION.
  PUBLIC SECTION.
    METHODS:
      constructor,
      print,
      handle_finished FOR EVENT finished OF cl_gui_timer.
  PROTECTED SECTION.
    DATA timer      TYPE REF TO cl_gui_timer.
ENDCLASS.                    "lcl_appl DEFINITION

DATA  appl   TYPE REF TO lcl_appl.

START-OF-SELECTION.
  CREATE OBJECT appl.
  appl->print( ).

*----------------------------------------------------------------------*
*       CLASS lcl_appl IMPLEMENTATION
*----------------------------------------------------------------------*
CLASS lcl_appl IMPLEMENTATION.
  METHOD constructor.
    CREATE OBJECT timer.
    timer->interval = 1.
    SET HANDLER handle_finished FOR timer.
  ENDMETHOD.                    "constructor

  METHOD print.
    SKIP TO LINE 1.
    WRITE sy-uzeit.
    timer->run( ).
  ENDMETHOD.                    "print

  METHOD handle_finished.
    print( ).
    timer->run( ).
  ENDMETHOD.                    "handle_finished
ENDCLASS.                    "lcl_appl IMPLEMENTATION