CLASS z2ui5_cl_http_handler DEFINITION
PUBLIC
FINAL
CREATE PUBLIC .
PUBLIC SECTION.
CLASS-DATA:
BEGIN OF client,
body TYPE string,
t_header TYPE z2ui5_if_client=>ty_t_name_value,
t_param TYPE z2ui5_if_client=>ty_t_name_value,
END OF client .
CLASS-DATA:
BEGIN OF config READ-ONLY,
controller_name TYPE string VALUE `z2ui5_controller`,
END OF config.
CLASS-METHODS http_get
IMPORTING
title TYPE clike DEFAULT `abap2UI5`
t_config TYPE z2ui5_if_client=>ty_t_name_value OPTIONAL
check_logging TYPE abap_bool DEFAULT abap_false
RETURNING
VALUE(r_result) TYPE string ##NEEDED.
CLASS-METHODS http_post
RETURNING
VALUE(result) TYPE string.
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
CLASS Z2UI5_CL_HTTP_HANDLER IMPLEMENTATION.
METHOD http_post.
DATA(lo_handler) = z2ui5_lcl_fw_handler=>request_begin( ).
DO.
TRY.
ROLLBACK WORK.
CAST z2ui5_if_app( lo_handler->ms_db-o_app )->main( NEW z2ui5_lcl_fw_client( lo_handler ) ).
ROLLBACK WORK.
IF lo_handler->ms_next-check_app_leave IS NOT INITIAL.
lo_handler = lo_handler->set_app_leave( ).
CONTINUE.
ENDIF.
IF lo_handler->ms_next-o_call_app IS NOT INITIAL.
lo_handler = lo_handler->set_app_call( ).
CONTINUE.
ENDIF.
result = lo_handler->request_end( ).
CATCH cx_root INTO DATA(x).
lo_handler = lo_handler->set_app_system( x ).
CONTINUE.
ENDTRY.
EXIT.
ENDDO.
ENDMETHOD.
METHOD http_get.
DATA(lt_Config) = t_config.
IF lt_config IS INITIAL.
lt_config = VALUE #(
( name = `data-sap-ui-theme` value = `sap_horizon` )
( name = `src` value = `https://sdk.openui5.org/resources/sap-ui-core.js` )
( name = `data-sap-ui-libs` value = `sap.m` )
( name = `data-sap-ui-bindingSyntax` value = `complex` )
( name = `data-sap-ui-frameOptions` value = `trusted` )
( name = `data-sap-ui-compatVersion` value = `edge` )
).
ENDIF.
DATA(lv_url) = _=>get_header_val( '~path' ).
DATA(lv_app) = _=>get_param_val( 'app' ).
z2ui5_lcl_fw_db=>cleanup( ).
r_result = `` && |\n| &&
`` && |\n| &&
` ` && |\n| &&
` ` && |\n| &&
` ` && |\n| &&
` ` && title && `` && |\n| &&
` ` &&
` ` && |\n| &&
`` && |\n| &&
` ` && |\n| &&
`` && |\n| &&
`` && |\n|.
r_result = r_result && `` && |\n| &&
`