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

demos (#239)

Browse Source
This commit is contained in:
oblomov 2023-05-20 10:14:20 +02:00
parent e24fe56679
commit 6cbff2377e
2 changed files with 11 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/z2ui5_cl_http_handler.clas.abap
View File

@ -1,6 +1,5 @@
CLASS z2ui5_cl_http_handler DEFINITION CLASS z2ui5_cl_http_handler DEFINITION
PUBLIC PUBLIC
FINAL
CREATE PUBLIC . CREATE PUBLIC .
PUBLIC SECTION. PUBLIC SECTION.

14
src/z2ui5_cl_http_handler.clas.locals_imp.abap
View File

@ -1382,11 +1382,15 @@ CLASS z2ui5_lcl_fw_handler IMPLEMENTATION.
DATA(lv_classname) = ``. DATA(lv_classname) = ``.
DATA(lv_path) = z2ui5_lcl_utility=>get_header_val( '~path' ). DATA(lv_path) = z2ui5_lcl_utility=>get_header_val( '~path' ).
DATA(lv_origin) = z2ui5_lcl_utility=>get_header_val( 'origin' ). data lt_tab type string_table.
DATA(lv_referer) = z2ui5_lcl_utility=>get_header_val( 'referer' ). split lv_path at `/` into table lt_tab.
REPLACE lv_origin IN lv_referer WITH ``. lv_classname = lt_tab[ lines( lt_tab ) ].
REPLACE lv_path IN lv_referer WITH ``.
SPLIT lv_referer AT `/` INTO lv_classname DATA(lv_dummy). * DATA(lv_origin) = z2ui5_lcl_utility=>get_header_val( 'origin' ).
* DATA(lv_referer) = z2ui5_lcl_utility=>get_header_val( 'referer' ).
* REPLACE lv_origin IN lv_referer WITH ``.
* REPLACE lv_path IN lv_referer WITH ``.
* SPLIT lv_referer AT `/` INTO lv_classname DATA(lv_dummy).
IF lv_classname IS NOT INITIAL AND lv_classname(1) <> `?`. IF lv_classname IS NOT INITIAL AND lv_classname(1) <> `?`.
lv_classname = to_upper( lv_classname ). lv_classname = to_upper( lv_classname ).
ELSE. ELSE.