SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 04:08:27 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

add progress bar, #1190

Browse Source
This commit is contained in:
larshp 2018-02-11 08:34:35 +00:00
parent f14ac831ba
commit cf216438e9
1 changed files with 14 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/objects/zcl_abapgit_objects_activation.clas.abap
View File

@ -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