anchor.diff:    PUBLIC SECTION.
       INTERFACES zif_abapgit_object.
   
  +  PROTECTED SECTION.
     PRIVATE SECTION.
   * See include MTOBJCON:
       CONSTANTS: c_cluster_type TYPE c VALUE 'C'.
  
positive.code:                   CHANGING cg_data = lt_vclmf ).
  
      ls_vcldir_entry-author = sy-uname.
  
      CALL FUNCTION 'VIEWCLUSTER_SAVE_DEFINITION'
        EXPORTING
  
negative.code:   ENDMETHOD.
  
  
    METHOD zif_abapgit_object~is_active.
      rv_active = is_active( ).
    ENDMETHOD.
  
  
    METHOD zif_abapgit_object~is_locked.
  
      rv_is_locked = abap_false.
  