anchor.diff:            ls_cua          TYPE ty_cua,
             lt_source       TYPE abaptxt255_tab.
   
  +    " Add R3TR PROG to transport first, otherwise we get several LIMUs
  +    corr_insert( iv_package ).
  +
       lv_program_name = ms_item-obj_name.
   
       lt_source = mo_files->read_abap( ).
  
positive.code: 
    METHOD zif_abapgit_object~delete.
  
      DATA: lv_program LIKE sy-repid.
  
      lv_program = ms_item-obj_name.
  
  
negative.code:     IF sy-subrc = 2.
        " Drop also any inactive code that is left in REPOSRC
        DELETE REPORT lv_program ##SUBRC_OK.
  
        " Remove inactive objects from work area
        lv_obj_name = lv_program.
  
        CALL FUNCTION 'RS_DELETE_FROM_WORKING_AREA'
          EXPORTING
            object                 = 'REPS'
            obj_name               = lv_obj_name
            immediate              = 'X'
            actualize_working_area = 'X'.
  
        CALL FUNCTION 'RS_DELETE_FROM_WORKING_AREA'
          EXPORTING
            object                 = 'REPT'
            obj_name               = lv_obj_name
            immediate              = 'X'
            actualize_working_area = 'X'.
      ELSEIF sy-subrc <> 0.
        zcx_abapgit_exception=>raise( |Error from RS_DELETE_PROGRAM: { sy-subrc }| ).
      ENDIF.
  