allow injection of progress indicator

src/utils/zcl_abapgit_progress.clas.abap

@@ -7,6 +7,9 @@ CLASS zcl_abapgit_progress DEFINITION
 
     INTERFACES zif_abapgit_progress .
 
+    CLASS-METHODS set_instance
+      IMPORTING
+        !ii_progress TYPE REF TO zif_abapgit_progress .
     CLASS-METHODS get_instance
       IMPORTING
         !iv_total          TYPE i
@@ -15,10 +18,8 @@ CLASS zcl_abapgit_progress DEFINITION
   PROTECTED SECTION.
 
     DATA mv_total TYPE i .
+    CLASS-DATA gi_progress TYPE REF TO zif_abapgit_progress .
 
-    METHODS constructor
-      IMPORTING
-        !iv_total TYPE i .
     METHODS calc_pct
       IMPORTING
         !iv_current   TYPE i
@@ -49,18 +50,34 @@ CLASS ZCL_ABAPGIT_PROGRESS IMPLEMENTATION.
   ENDMETHOD.
 
 
-  METHOD constructor.
+  METHOD get_instance.
 
-    mv_total = iv_total.
+* max one progress indicator at a time is supported
+
+    IF gi_progress IS INITIAL.
+      CREATE OBJECT gi_progress TYPE zcl_abapgit_progress.
+    ENDIF.
+
+    gi_progress->set_total( iv_total ).
+
+    ri_progress = gi_progress.
 
   ENDMETHOD.
 
 
-  METHOD get_instance.
+  METHOD set_instance.
 
-    CREATE OBJECT ri_progress TYPE zcl_abapgit_progress
-      EXPORTING
-        iv_total = iv_total.
+    gi_progress = ii_progress.
+
+  ENDMETHOD.
+
+
+  METHOD zif_abapgit_progress~set_total.
+
+    mv_total = iv_total.
+
+    CLEAR mv_cv_time_next.
+    CLEAR mv_cv_datum_next.
 
   ENDMETHOD.
 

src/utils/zif_abapgit_progress.intf.abap

@@ -1,9 +1,12 @@
 INTERFACE zif_abapgit_progress
   PUBLIC .
 
+
   METHODS show
     IMPORTING
-      iv_current TYPE i
-      iv_text    TYPE csequence .
-
+      !iv_current TYPE i
+      !iv_text    TYPE csequence .
+  METHODS set_total
+    IMPORTING
+      !iv_total TYPE i .
 ENDINTERFACE.