anchor.diff:  
   CONSTANTS: gc_newline TYPE abap_char1 VALUE cl_abap_char_utilities=>newline.
   
  +CONSTANTS: gc_english TYPE spras VALUE 'E'.
  +
   CONSTANTS: BEGIN OF gc_diff,
                insert TYPE c LENGTH 1 VALUE 'I',
                delete TYPE c LENGTH 1 VALUE 'D',
  
positive.code: 
      CALL FUNCTION 'NUMBER_RANGE_OBJECT_DELETE'
        EXPORTING
          language           = 'E'
          object             = lv_object
        EXCEPTIONS
          delete_not_allowed = 1
  
negative.code:         wi_tadir_obj_name   = is_item-obj_name
          wi_tadir_author     = sy-uname
          wi_tadir_devclass   = iv_package
          wi_tadir_masterlang = gc_english
          wi_set_genflag      = abap_true
        EXCEPTIONS
          OTHERS              = 1.
  