Merge branch 'main' into hvam/bitbyte0704

This commit is contained in:
Lars Hvam 2025-04-08 07:11:43 +02:00 committed by GitHub
commit 37dfe5c6cd
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
10 changed files with 101 additions and 36 deletions

View File

@ -1,7 +1,6 @@
CLASS zcl_abapgit_code_inspector DEFINITION
PUBLIC
CREATE PROTECTED
GLOBAL FRIENDS zcl_abapgit_factory .
CREATE PROTECTED.
PUBLIC SECTION.

View File

@ -440,7 +440,7 @@ CLASS zcl_abapgit_gui IMPLEMENTATION.
FIELD-SYMBOLS <ls_asset> LIKE LINE OF lt_assets.
mi_html_viewer = zcl_abapgit_ui_factory=>get_html_viewer( ).
mi_html_viewer = zcl_abapgit_ui_core_factory=>get_html_viewer( ).
IF mi_asset_man IS BOUND.
lt_assets = mi_asset_man->get_all_assets( ).

View File

@ -0,0 +1,38 @@
CLASS zcl_abapgit_ui_core_factory DEFINITION
PUBLIC
CREATE PRIVATE
GLOBAL FRIENDS zcl_abapgit_ui_core_injector .
PUBLIC SECTION.
CLASS-METHODS get_html_viewer
IMPORTING
!io_container TYPE REF TO cl_gui_container DEFAULT cl_gui_container=>screen0
!iv_disable_query_table TYPE abap_bool DEFAULT abap_true
RETURNING
VALUE(ri_viewer) TYPE REF TO zif_abapgit_html_viewer .
PROTECTED SECTION.
PRIVATE SECTION.
CLASS-DATA gi_html_viewer TYPE REF TO zif_abapgit_html_viewer .
ENDCLASS.
CLASS zcl_abapgit_ui_core_factory IMPLEMENTATION.
METHOD get_html_viewer.
IF gi_html_viewer IS NOT BOUND.
CREATE OBJECT gi_html_viewer TYPE zcl_abapgit_html_viewer_gui
EXPORTING
io_container = io_container
iv_disable_query_table = iv_disable_query_table.
ENDIF.
ri_viewer = gi_html_viewer.
ENDMETHOD.
ENDCLASS.

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_UI_CORE_FACTORY</CLSNAME>
<LANGU>E</LANGU>
<DESCRIPT>abapGit - GUI Core Factory</DESCRIPT>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>

View File

@ -0,0 +1,25 @@
CLASS zcl_abapgit_ui_core_injector DEFINITION
PUBLIC
FOR TESTING
CREATE PRIVATE .
PUBLIC SECTION.
CLASS-METHODS set_html_viewer
IMPORTING
!ii_html_viewer TYPE REF TO zif_abapgit_html_viewer .
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
CLASS zcl_abapgit_ui_core_injector IMPLEMENTATION.
METHOD set_html_viewer.
zcl_abapgit_ui_core_factory=>gi_html_viewer = ii_html_viewer.
ENDMETHOD.
ENDCLASS.

View File

@ -0,0 +1,17 @@
<?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_UI_CORE_INJECTOR</CLSNAME>
<LANGU>E</LANGU>
<DESCRIPT>abapGit - GUI Core Injector</DESCRIPT>
<CATEGORY>05</CATEGORY>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>

View File

@ -573,7 +573,7 @@ CLASS zcl_abapgit_gui_router IMPLEMENTATION.
lv_new_window = boolc( iv_new_window IS NOT INITIAL ).
TRY.
li_html_viewer = zcl_abapgit_ui_factory=>get_html_viewer( ).
li_html_viewer = zcl_abapgit_ui_core_factory=>get_html_viewer( ).
" Hide HTML Viewer in dummy screen0 for direct CALL SCREEN to work
li_html_viewer->set_visiblity( abap_false ).

View File

@ -28,17 +28,11 @@ CLASS zcl_abapgit_ui_factory DEFINITION
!iv_disable_gui TYPE abap_bool DEFAULT abap_false
RETURNING
VALUE(ri_fe_serv) TYPE REF TO zif_abapgit_frontend_services .
CLASS-METHODS get_html_viewer
IMPORTING
!io_container TYPE REF TO cl_gui_container DEFAULT cl_gui_container=>screen0
!iv_disable_query_table TYPE abap_bool DEFAULT abap_true
RETURNING
VALUE(ri_viewer) TYPE REF TO zif_abapgit_html_viewer .
PROTECTED SECTION.
PRIVATE SECTION.
CLASS-DATA gi_popups TYPE REF TO zif_abapgit_popups .
CLASS-DATA gi_html_viewer TYPE REF TO zif_abapgit_html_viewer .
CLASS-DATA go_gui TYPE REF TO zcl_abapgit_gui .
CLASS-DATA gi_fe_services TYPE REF TO zif_abapgit_frontend_services .
CLASS-DATA gi_gui_services TYPE REF TO zif_abapgit_gui_services .
@ -169,20 +163,6 @@ CLASS zcl_abapgit_ui_factory IMPLEMENTATION.
ENDMETHOD.
METHOD get_html_viewer.
IF gi_html_viewer IS NOT BOUND.
CREATE OBJECT gi_html_viewer TYPE zcl_abapgit_html_viewer_gui
EXPORTING
io_container = io_container
iv_disable_query_table = iv_disable_query_table.
ENDIF.
ri_viewer = gi_html_viewer.
ENDMETHOD.
METHOD get_popups.
IF gi_popups IS INITIAL.

View File

@ -17,9 +17,6 @@ CLASS zcl_abapgit_ui_injector DEFINITION
CLASS-METHODS get_dummy_gui_services
RETURNING
VALUE(ri_gui_services) TYPE REF TO zif_abapgit_gui_services .
CLASS-METHODS set_html_viewer
IMPORTING
!ii_html_viewer TYPE REF TO zif_abapgit_html_viewer .
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
@ -50,13 +47,6 @@ CLASS zcl_abapgit_ui_injector IMPLEMENTATION.
ENDMETHOD.
METHOD set_html_viewer.
zcl_abapgit_ui_factory=>gi_html_viewer = ii_html_viewer.
ENDMETHOD.
METHOD set_popups.
zcl_abapgit_ui_factory=>gi_popups = ii_popups.

View File

@ -78,7 +78,7 @@ CLASS zcl_abapgit_web IMPLEMENTATION.
ii_request = gi_request
ii_response = gi_response.
zcl_abapgit_ui_injector=>set_html_viewer( go_viewer ).
zcl_abapgit_ui_core_injector=>set_html_viewer( go_viewer ).
go_gui = zcl_abapgit_ui_factory=>get_gui( ).