mirror of
https://github.com/abap2UI5/abap2UI5.git
synced 2025-04-28 18:26:18 +08:00
19e03726b5
* Update zcl_my_handler_cloud.abap * Update zcl_my_handler_onprem.abap * Update README.md * Update README.md * Update README.md * Update faq.md * Update faq.md * Update faq.md
29 lines
705 B
ABAP
29 lines
705 B
ABAP
CLASS zcl_my_handler_cloud DEFINITION
|
|
PUBLIC
|
|
CREATE PUBLIC .
|
|
|
|
PUBLIC SECTION.
|
|
INTERFACES if_http_service_extension.
|
|
|
|
PROTECTED SECTION.
|
|
PRIVATE SECTION.
|
|
ENDCLASS.
|
|
|
|
|
|
|
|
CLASS zcl_my_handler_cloud IMPLEMENTATION.
|
|
|
|
METHOD if_http_service_extension~handle_request.
|
|
|
|
DATA(lv_resp) = SWITCH #( server->request->get_method( )
|
|
WHEN 'GET' THEN z2ui5_cl_http_handler=>http_get( )
|
|
WHEN 'POST' THEN z2ui5_cl_http_handler=>http_post( server->request->get_cdata( ) ) ).
|
|
|
|
server->response->set_header_field( name = `cache-control` value = `no-cache` ).
|
|
server->response->set_cdata( lv_resp ).
|
|
server->response->set_status( code = 200 reason = `success` ).
|
|
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|