anchor.diff:            wi_tadir_pgmid           = 'R3TR'
             wi_tadir_object          = 'FUGR'
             wi_tadir_obj_name        = lv_obj_name
  +          wi_test_modus            = abap_false
           EXCEPTIONS
             tadir_entry_not_existing = 1
             OTHERS                   = 2.
  
positive.code:           wi_tadir_pgmid           = 'R3TR'
            wi_tadir_object          = 'PROG'
            wi_tadir_obj_name        = lv_obj_name
          EXCEPTIONS
            tadir_entry_not_existing = 1
            OTHERS                   = 2.
  
negative.code:           wi_tadir_pgmid           = 'R3TR'
            wi_tadir_object          = 'PROG'
            wi_tadir_obj_name        = lv_obj_name
            wi_test_modus            = abap_false
          EXCEPTIONS
            tadir_entry_not_existing = 1
            OTHERS                   = 2.
  