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

inject

Browse Source
This commit is contained in:
Lars Hvam 2025-04-07 15:46:33 +02:00
parent 9aeb2e0638
commit 8c481d4e0c
3 changed files with 46 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
test/src/web/zcl_abapgit_web.clas.abap
View File

@ -75,6 +75,8 @@ CLASS zcl_abapgit_web IMPLEMENTATION.
DATA lo_environment TYPE REF TO zcl_abapgit_web_environment.
zcl_abapgit_web_inject_fm=>inject( ).
CREATE OBJECT lo_environment.
zcl_abapgit_injector=>set_environment( lo_environment ).
@ -84,6 +86,7 @@ CLASS zcl_abapgit_web IMPLEMENTATION.
ii_response = gi_response.
zcl_abapgit_ui_injector=>set_html_viewer( go_viewer ).
go_gui = zcl_abapgit_ui_factory=>get_gui( ).
ENDMETHOD.

27
test/src/web/zcl_abapgit_web_inject_fm.clas.abap Normal file
View File

@ -0,0 +1,27 @@
CLASS zcl_abapgit_web_inject_fm DEFINITION PUBLIC.
PUBLIC SECTION.
INTERFACES if_ftd_invocation_answer.
CLASS-METHODS inject.
ENDCLASS.
CLASS zcl_abapgit_web_inject_fm IMPLEMENTATION.
METHOD if_ftd_invocation_answer~answer.
RETURN.
ENDMETHOD.
METHOD inject.
DATA lt_deps TYPE if_function_test_environment=>tt_function_dependencies.
DATA li_env TYPE REF TO if_function_test_environment.
INSERT 'ENQUEUE_EZABAPGIT' INTO TABLE lt_deps.
INSERT 'DEQUEUE_EZABAPGIT' INTO TABLE lt_deps.
li_env = cl_function_test_environment=>create( lt_deps ).
li_env->get_double( 'ENQUEUE_EZABAPGIT' )->configure_call( )->ignore_all_parameters( )->then_answer( me ).
li_env->get_double( 'DEQUEUE_EZABAPGIT' )->configure_call( )->ignore_all_parameters( )->then_answer( me ).
ENDMETHOD.
ENDCLASS.

16
test/src/web/zcl_abapgit_web_inject_fm.clas.xml Normal file
View File

@ -0,0 +1,16 @@
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>ZCL_ABAPGIT_WEB_INJECT_FM</CLSNAME>
<LANGU>E</LANGU>
<DESCRIPT>ZCL_ABAPGIT_WEB_INJECT_FM</DESCRIPT>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>