anchor.diff:  
     METHOD delta_view.
   
  -    DATA: ls_key       TYPE wdy_md_view_key,
  -          ls_obj_new   TYPE svrs2_versionable_object,
  -          ls_obj_old   TYPE svrs2_versionable_object,
  -          lv_found     TYPE abap_bool,
  -          li_view      TYPE REF TO if_wdy_md_abstract_view.
  +    DATA: ls_key     TYPE wdy_md_view_key,
  +          ls_obj_new TYPE svrs2_versionable_object,
  +          ls_obj_old TYPE svrs2_versionable_object,
  +          lv_found   TYPE abap_bool,
  +          li_view    TYPE REF TO if_wdy_md_abstract_view.
   
       FIELD-SYMBOLS: <ls_def> LIKE LINE OF ls_obj_old-wdyv-defin.
   
  
positive.code: 
  * look for subpackages
      SELECT * FROM tdevc INTO TABLE lt_tdevc
        WHERE parentcl = iv_package.                        "#EC CI_SUBRC
      LOOP AT lt_tdevc ASSIGNING <ls_tdevc>.
        lv_len = strlen( iv_package ).
        IF <ls_tdevc>-devclass(lv_len) <> iv_package.
  
negative.code:       rv_path = '/'.
      ELSE.
        SELECT SINGLE parentcl FROM tdevc INTO lv_parentcl
          WHERE devclass = iv_package.                      "#EC CI_SUBRC
        ASSERT sy-subrc = 0.
  
        IF lv_parentcl IS INITIAL.
  