anchor.diff:      METHODS go_home
         RAISING lcx_exception.
   
  -    METHODS render
  -      RAISING lcx_exception.
  -
       METHODS back
         RETURNING VALUE(rv_exit) TYPE xfeld
         RAISING   lcx_exception.
  
positive.code:           EXPORTING
              is_key = ls_key.
          lcl_gui=>get( )->call_page( lo_display ).
        WHEN 'edit'.
          CREATE OBJECT lo_edit
            EXPORTING
              is_key = ls_key.
          lcl_gui=>get( )->call_page( lo_edit ).
        WHEN 'delete'.
          delete( ls_key ).
          rv_state = gc_event_state-re_render.
  
negative.code:         rv_state = gc_event_state-re_render.
        WHEN 'commit'.
          call_commit( ).
          rv_state = gc_event_state-no_more_act.
      ENDCASE.
  
    ENDMETHOD.
  