anchor.diff:             AND NOT ( object = 'DEVC' AND obj_name = iv_package_name )
              AND devclass = iv_package_name.
       rv_is_empty = boolc( sy-subrc <> 0 ).
  +
  +  ENDMETHOD.
  +
  +
  +  METHOD is_local.
  +
  +    DATA lv_dlvunit TYPE tdevc-dlvunit.
  +
  +    SELECT SINGLE dlvunit FROM tdevc INTO lv_dlvunit
  +        WHERE devclass = iv_package_name AND intsys <> 'SAP'.
  +    IF sy-subrc = 0 AND lv_dlvunit = 'LOCAL'.
  +      rv_is_local = abap_true.
  +    ENDIF.
   
     ENDMETHOD.
   
  
positive.code:     ELSEIF sy-subrc <> 0.
        zcx_abapgit_exception=>raise_t100( ).
      ENDIF.
  
    ENDMETHOD.
  
  
negative.code:     " in the package has to be released.
  
      lv_package = ms_item-obj_name.
  
      remove_obsolete_tadir( lv_package ).
  
      IF is_empty( lv_package ) = abap_true.
  
  