refactor http handler

This commit is contained in:
19ddb071-87e3-4bdd-9eee-59bb460e1d62 2023-06-15 16:50:10 +00:00
parent 41a097e267
commit d9cfae9a51

View File

@ -1,15 +1,14 @@
CLASS z2ui5_cl_http_handler DEFINITION CLASS z2ui5_cl_http_handler DEFINITION
PUBLIC PUBLIC
CREATE PUBLIC . CREATE PUBLIC.
PUBLIC SECTION. PUBLIC SECTION.
CLASS-DATA: CLASS-DATA:
BEGIN OF client, BEGIN OF client,
body TYPE string, body TYPE string,
t_header TYPE z2ui5_if_client=>ty_t_name_value, t_header TYPE z2ui5_if_client=>ty_t_name_value,
t_param TYPE z2ui5_if_client=>ty_t_name_value, t_param TYPE z2ui5_if_client=>ty_t_name_value,
END OF client . END OF client.
CLASS-DATA: CLASS-DATA:
BEGIN OF config READ-ONLY, BEGIN OF config READ-ONLY,
@ -17,31 +16,23 @@ CLASS z2ui5_cl_http_handler DEFINITION
END OF config. END OF config.
CLASS-METHODS http_get CLASS-METHODS http_get
IMPORTING IMPORTING t_config TYPE z2ui5_if_client=>ty_t_name_value OPTIONAL
t_config TYPE z2ui5_if_client=>ty_t_name_value OPTIONAL
content_security_policy TYPE clike OPTIONAL content_security_policy TYPE clike OPTIONAL
check_logging TYPE abap_bool DEFAULT abap_false check_logging TYPE abap_bool DEFAULT abap_false
RETURNING RETURNING VALUE(r_result) TYPE string.
VALUE(r_result) TYPE string.
CLASS-METHODS http_post CLASS-METHODS http_post
RETURNING RETURNING VALUE(result) TYPE string.
VALUE(result) TYPE string.
PROTECTED SECTION. PROTECTED SECTION.
PRIVATE SECTION. PRIVATE SECTION.
ENDCLASS. ENDCLASS.
CLASS z2ui5_cl_http_handler IMPLEMENTATION.
CLASS Z2UI5_CL_HTTP_HANDLER IMPLEMENTATION.
METHOD http_get. METHOD http_get.
DATA(lt_Config) = t_config. DATA(lt_Config) = t_config.
IF lt_config IS INITIAL. IF lt_config IS INITIAL.
@ -51,8 +42,7 @@ CLASS Z2UI5_CL_HTTP_HANDLER IMPLEMENTATION.
( name = `data-sap-ui-libs` value = `sap.m` ) ( name = `data-sap-ui-libs` value = `sap.m` )
( name = `data-sap-ui-bindingSyntax` value = `complex` ) ( name = `data-sap-ui-bindingSyntax` value = `complex` )
( name = `data-sap-ui-frameOptions` value = `trusted` ) ( name = `data-sap-ui-frameOptions` value = `trusted` )
( name = `data-sap-ui-compatVersion` value = `edge` ) ( name = `data-sap-ui-compatVersion` value = `edge` ) ).
).
ENDIF. ENDIF.
IF content_security_policy IS NOT SUPPLIED. IF content_security_policy IS NOT SUPPLIED.
@ -289,12 +279,9 @@ CLASS Z2UI5_CL_HTTP_HANDLER IMPLEMENTATION.
` });` && |\n| && ` });` && |\n| &&
`</script><abc/>` && |\n| && `</script><abc/>` && |\n| &&
`</html>`. `</html>`.
ENDMETHOD. ENDMETHOD.
METHOD http_post. METHOD http_post.
DATA(lo_handler) = z2ui5_lcl_fw_handler=>request_begin( ). DATA(lo_handler) = z2ui5_lcl_fw_handler=>request_begin( ).
DO. DO.
@ -322,6 +309,5 @@ CLASS Z2UI5_CL_HTTP_HANDLER IMPLEMENTATION.
EXIT. EXIT.
ENDDO. ENDDO.
ENDMETHOD. ENDMETHOD.
ENDCLASS. ENDCLASS.