anchor.diff:  
       DATA: lt_tadir TYPE lcl_tadir=>ty_tadir_tt,
             ls_item  TYPE ty_item,
  +          lt_msg   TYPE rs_t_msg,
             lt_files TYPE ty_files_tt,
             lt_zip   TYPE ty_files_tt.
   
       FIELD-SYMBOLS: <ls_file>  LIKE LINE OF lt_files,
  +                   <ls_msg>   LIKE LINE OF lt_msg,
                      <ls_tadir> LIKE LINE OF lt_tadir.
   
   
  
positive.code: 
    METHOD show_progress.
  
      DATA: lv_pct TYPE i,
            lv_f   TYPE f.
  
  
      lv_f = ( iv_current / iv_total ) * 100.
      lv_pct = lv_f.
      CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
        EXPORTING
          percentage = lv_pct
          text       = iv_obj_name.
  
    ENDMETHOD.                    "show_progress
  
  
negative.code: 
  
      APPEND INITIAL LINE TO lt_fields ASSIGNING <ls_field>.
      <ls_field>-tabname   = 'ABAPTXT255'.
      <ls_field>-fieldname = 'LINE'.
      <ls_field>-fieldtext = 'Commit message'.                "#EC NOTEXT
      <ls_field>-field_obl = abap_true.
  