From cf216438e90c2efca09eaf6652751c589b296c90 Mon Sep 17 00:00:00 2001 From: larshp Date: Sun, 11 Feb 2018 08:34:35 +0000 Subject: [PATCH] add progress bar, #1190 --- .../zcl_abapgit_objects_activation.clas.abap | 17 ++++++++++++++--- 1 file changed, 14 insertions(+), 3 deletions(-) diff --git a/src/objects/zcl_abapgit_objects_activation.clas.abap b/src/objects/zcl_abapgit_objects_activation.clas.abap index a9316f34a..98019b75b 100644 --- a/src/objects/zcl_abapgit_objects_activation.clas.abap +++ b/src/objects/zcl_abapgit_objects_activation.clas.abap @@ -327,12 +327,23 @@ CLASS ZCL_ABAPGIT_OBJECTS_ACTIVATION IMPLEMENTATION. METHOD update_where_used. - DATA: lv_class LIKE LINE OF gt_classes, - lo_cross TYPE REF TO cl_wb_crossreference, - lv_include TYPE programm. + DATA: lv_class LIKE LINE OF gt_classes, + lo_cross TYPE REF TO cl_wb_crossreference, + lv_include TYPE programm, + lo_progress TYPE REF TO zcl_abapgit_progress. + CREATE OBJECT lo_progress + EXPORTING + iv_total = lines( gt_classes ). + LOOP AT gt_classes INTO lv_class. + IF sy-tabix MOD 20 = 0. + lo_progress->show( + iv_current = sy-tabix + iv_text = 'Updating where-used lists' ). + ENDIF. + lv_include = cl_oo_classname_service=>get_classpool_name( lv_class ). CREATE OBJECT lo_cross