progress indicator

This commit is contained in:
Lars Hvam 2025-04-07 16:04:26 +02:00
parent cf010cfa1d
commit 0290d86f10

View File

@ -12,17 +12,20 @@ CLASS zcl_abapgit_web_inject_fm IMPLEMENTATION.
METHOD inject.
DATA lt_deps TYPE if_function_test_environment=>tt_function_dependencies.
DATA lv_dep LIKE LINE OF lt_deps.
DATA li_env TYPE REF TO if_function_test_environment.
DATA lo_handler TYPE REF TO zcl_abapgit_web_inject_fm.
INSERT 'ENQUEUE_EZABAPGIT' INTO TABLE lt_deps.
INSERT 'DEQUEUE_EZABAPGIT' INTO TABLE lt_deps.
INSERT 'SAPGUI_PROGRESS_INDICATOR' INTO TABLE lt_deps.
li_env = cl_function_test_environment=>create( lt_deps ).
CREATE OBJECT lo_handler.
li_env->get_double( 'ENQUEUE_EZABAPGIT' )->configure_call( )->ignore_all_parameters( )->then_answer( lo_handler ).
li_env->get_double( 'DEQUEUE_EZABAPGIT' )->configure_call( )->ignore_all_parameters( )->then_answer( lo_handler ).
LOOP AT lt_deps INTO lv_dep.
li_env->get_double( lv_dep )->configure_call( )->ignore_all_parameters( )->then_answer( lo_handler ).
ENDLOOP.
ENDMETHOD.