anchor.diff:    METHOD class_constructor.
       DEFINE init.
         &1 = NEW #( iv_message_type = &2
  -                  iv_description  = &3 ).
  +                  iv_description  = &3
  +                  iv_icon         = &4 ).
       END-OF-DEFINITION.
   
  -    init: go_info    'I' 'INFO',
  -          go_warning 'W' 'WARNING',
  -          go_error   'E' 'ERROR',
  -          go_debug   'I' 'DEBUG'.
  +    init: go_info    'I' 'INFO'    icon_green_light,
  +          go_warning 'W' 'WARNING' icon_yellow_light,
  +          go_error   'E' 'ERROR'   icon_red_light,
  +          go_debug   'I' 'DEBUG'   icon_information.
     ENDMETHOD.
  +
  +
  +  METHOD constructor.
  +    mv_message_type = iv_message_type.
  +    mv_description = iv_description.
  +    mv_icon = iv_icon.
  +  ENDMETHOD.
  +
   
     METHOD from_msgty.
       CASE iv_msgty.
  
positive.code:       go_debug   TYPE REF TO zcl_alog_entry_type READ-ONLY.
      DATA:
        mv_message_type TYPE syst_msgty READ-ONLY,
        mv_description  TYPE string READ-ONLY.
    PROTECTED SECTION.
    PRIVATE SECTION.
      METHODS:
        constructor IMPORTING iv_message_type TYPE syst_msgty
                              iv_description  TYPE csequence.
  ENDCLASS.
  
  
  
negative.code:             iv_msgty = iv_msgty.
      ENDCASE.
    ENDMETHOD.
  ENDCLASS.
  