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

View File

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

View File

@ -1382,11 +1382,15 @@ CLASS z2ui5_lcl_fw_handler IMPLEMENTATION.
DATA(lv_classname) = ``.
DATA(lv_path) = z2ui5_lcl_utility=>get_header_val( '~path' ).
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).
data lt_tab type string_table.
split lv_path at `/` into table lt_tab.
lv_classname = lt_tab[ lines( lt_tab ) ].
* 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) <> `?`.
lv_classname = to_upper( lv_classname ).
ELSE.