男女激烈试看120秒动态图,视频在线一区,综合色久

SAP 發(fā)布HTTP接口的Restful （含Token 驗證）

2024年11月20日 16:42 本文熱度 602

SAP 如何提供 Http Service

如果要將 SAP 應(yīng)用程序服務(wù)器（application server）作為 http 服務(wù)提供者，需要定義一個類，這個類必須實現(xiàn) IF_HTTP_EXTENSION 接口。IF_HTTP_EXTENSION 接口只有一個方法 HANDLE_REQUEST。自定義的這個類必須實現(xiàn) HANDLE_REQUEST 方法。HANDLE_REQUEST 方法的 SERVER 參數(shù)是一個 http server 對象（類型為 ICF 框架的 IF_HTTP_SERVER 接口）。http server 對象具有的屬性和方法對請求和響應(yīng)進行處理。然后使用 SICF 事務(wù)碼創(chuàng)建服務(wù)，并且將處理器（handler）設(shè)定為自定義類。客戶端就可以訪問這個服務(wù)。

REST

而是Resource Representational State Transfer的縮寫：通俗來講就是：資源在網(wǎng)絡(luò)中以某種表現(xiàn)形式進行狀態(tài)轉(zhuǎn)移。分開來講：

1.Resource：資源，即數(shù)據(jù)（網(wǎng)絡(luò)的核心）。

2.Representational：某種表現(xiàn)形式，比如用JSON，XML，JPEG等；

3.State Transfer：狀態(tài)變化。通過HTTP動詞實現(xiàn)。

REST描述的是在網(wǎng)絡(luò)中client和server的一種交互形式；REST本身不實用，實用的是如何設(shè)計 RESTful API（REST風格的網(wǎng)絡(luò)接口；

Server提供的RESTful API中，URL中只使用名詞來指定資源，原則上不使用動詞。“資源”是REST架構(gòu)或者說整個網(wǎng)絡(luò)處理的核心。

用HTTP協(xié)議里的動詞來實現(xiàn)資源的添加，修改。

Server和Client之間傳遞某資源的一個表現(xiàn)形式，比如用JSON，XML傳輸文本，或者用JPG，WebP傳輸圖片等。

用 HTTP Status Code傳遞Server的狀態(tài)信息。比如最常用的 200 表示成功，500 表示Server內(nèi)部錯誤等。

Web端不再用之前典型的PHP或JSP架構(gòu)，而是改為前段渲染和附帶處理簡單的商務(wù)邏輯。Web端和Server只使用上述定義的API來傳遞數(shù)據(jù)和改變數(shù)據(jù)狀態(tài)。格式一般是JSON。

對于資源的具體操作類型，由HTTP動詞表示。常用的HTTP動詞有下面五個（括號里是對應(yīng)的SQL命令）： 1.GET（SELECT）： 從服務(wù)器獲取資源(一項或多項) 2.POST（CREATE）： 在服務(wù)器新建一個資源 3.PUT（UPDATE）： 在服務(wù)器更新資源（客戶端提供改變后的完整資源） 4.PATCH（UPDATE）： 在服務(wù)器更新資源（客戶端提供改變的屬性） 5.DELETE（DELETE）：從服務(wù)器刪除資源。
比如： GET /zoos：列出所有動物園 POST /zoos：新建一個動物園 GET /zoos/ID：獲取某個指定動物園的信息 PUT /zoos/ID：更新某個指定動物園的信息（提供該動物園的全部信息 PATCH /zoos/ID：更新某個指定動物園的信息（提供該動物園的部分信息） DELETE /zoos/ID：刪除某個動物園 GET /zoos/ID/animals：列出某個指定動物園的所有動物 DELETE /zoos/ID/animals/ID：刪除某個指定動物園的指定動物

SAP 發(fā)布HTTP接口（RESTful方式）

一、代碼過程

使用SE24創(chuàng)建一個類 ZLOCAL_CL_REST，并且繼承超類 CL_REST_HTTP_HANDLER 。

重構(gòu)方法 IF_REST_APPLICATION~GET_ROOT_HANDLER，HANDLE_CSRF_TOKEN，其中HANDLE_CSRF_TOKEN 是用于token驗證的，如果不需要token驗證則直接重構(gòu)即可，不需要代碼，需要驗證的話可以保留，無需重構(gòu)。

重構(gòu)的代碼，其中/GET/PO 為接口路徑，ZLOCAL_CL_GET_PURCHASEORDER 為接口類

TOKEN 驗證 如果需要進行驗證的，則不需要重構(gòu)方法HANDLE_CSRF_TOKEN，在原有的代碼邏輯下，使用GET 方法時，在發(fā)送請求時登入了 Authentication賬號密碼即可正確獲取token。不需要token則直接重構(gòu)即可，不需要代碼。
上述完成后，再次使用SE24 創(chuàng)建一個類，類名為前面的接口類 ZLOCAL_CL_GET_PURCHASEORDER.并且繼承超類 CL_REST_RESOURCE。

繼承后，根據(jù)接口的不同調(diào)用方式，重構(gòu)相應(yīng)的方法

這里使用GET方式進行演示

  METHOD if_rest_resource~get.*CALL METHOD SUPER->IF_REST_RESOURCE~GET*    .    DATA: lv_output_json TYPE string.    DATA: lv_ebeln TYPE ebeln.    DATA: BEGIN OF ls_out,            ebeln TYPE ebeln,            bukrs TYPE bukrs,            bsart TYPE bsart,            aedat TYPE aedat,            ernam TYPE ernam,            lifnr TYPE lifnr,            ekorg TYPE ekorg,          END OF ls_out.    DATA: BEGIN OF ls_output,            code    TYPE char3,            clnt    TYPE sy-mandt,            status  TYPE char10,            content TYPE string,            data    LIKE ls_out,          END OF ls_output.          DATA(rt_parameters) =  mo_request->get_uri_query_parameters( )." 獲取參數(shù) "          LOOP AT rt_parameters ASSIGNING FIELD-SYMBOL(<fs_par>).      TRANSLATE <fs_par>-name TO UPPER CASE.      TRANSLATE <fs_par>-value TO UPPER CASE.    ENDLOOP.    ls_output-clnt = sy-mandt.    READ TABLE rt_parameters INTO DATA(ls_par) WITH KEY name = 'EBELN'.    IF sy-subrc IS INITIAL AND ls_par-value IS NOT INITIAL.      CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'        EXPORTING          input  = ls_par-value        IMPORTING          output = lv_ebeln.      SELECT SINGLE * INTO CORRESPONDING FIELDS OF ls_out FROM ekko        WHERE ebeln = lv_ebeln.      IF sy-subrc IS INITIAL.        ls_output-data = ls_out.        ls_output-code = cl_rest_status_code=>gc_success_ok.        ls_output-status = 'success'.        ls_output-content = '獲取成功'.      ELSE.        ls_output-data = ls_out.        ls_output-code = cl_rest_status_code=>gc_success_ok.        ls_output-status = 'fail'.        ls_output-content = '獲取失敗'.      ENDIF.    ELSE.      ls_output-data = ls_out.      ls_output-code = cl_rest_status_code=>gc_redirection_permanent.      ls_output-status = 'fail'.      ls_output-content = '參數(shù)錯誤'.    ENDIF.
    /ui2/cl_json=>serialize(   EXPORTING     data          = ls_output     compress      = abap_false     pretty_name   = /ui2/cl_json=>pretty_mode-camel_case   RECEIVING     r_json        = lv_output_json ).     " 響應(yīng)內(nèi)容"     mo_response->create_entity( )->set_string_data( lv_output_json ).    " 響應(yīng)內(nèi)容類型 ： application/json"    mo_response->create_entity( )->set_content_type( iv_media_type = if_rest_media_type=>gc_appl_json ).    " 響應(yīng)狀態(tài) ： 非必須"    mo_response->set_status( cl_rest_status_code=>gc_success_ok ).    " 響應(yīng)說明  ： 非必須"    mo_response->set_reason( cl_rest_status_code=>get_reason_phrase( cl_rest_status_code=>gc_success_ok ) ).  ENDMETHOD.

POST方式獲取body.

" POST 方式傳入?yún)?shù)，JSON"    DATA(lv_input_json) = io_entity->get_string_data( ).

二、使用SICF配置服務(wù)

配置如下，處理器為 ZLOCAL_CL_REST ,即第一次創(chuàng)建的類。

三、Postman 測試

1、正確調(diào)用

如果路徑不正確會提示沒有合適的資源。

方法沒啟用，提示不受支持。

使用token

使用token 需要在 POST 方式調(diào)用，先對類ZLOCAL_CL_GET_PURCHASEORDER中的方法IF_REST_RESOURCE~POST 重構(gòu)，為了測試這里簡單重構(gòu)了。

METHOD if_rest_resource~post.  TYPES:BEGIN OF ts_indata,          matnr TYPE matnr,          maktx TYPE maktx,        END OF ts_indata.  DATA: ls_data TYPE  ts_indata.  TYPES: BEGIN  OF ts_outdata,           code TYPE char3.      INCLUDE TYPE ts_indata.  TYPES:        END OF ts_outdata.  DATA: ls_outdata TYPE ts_outdata.  " POST 方式傳入?yún)?shù)，JSON"  DATA(lv_input_json) = io_entity->get_string_data( ).
  " JSON 轉(zhuǎn)換為內(nèi)表"  /ui2/cl_json=>deserialize(    EXPORTING      json = lv_input_json    CHANGING        data = ls_data ).
  CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT'    EXPORTING      input        = ls_data-matnr    IMPORTING      output       = ls_data-matnr    EXCEPTIONS      length_error = 1      OTHERS       = 2.
  SELECT SINGLE maktx FROM makt INTO ls_data-maktx WHERE matnr = ls_data-matnr.
  " 內(nèi)表轉(zhuǎn)換JSON"  DATA: lv_output_json TYPE string.
  MOVE-CORRESPONDING ls_data TO ls_outdata.
  ls_outdata-code = cl_rest_status_code=>gc_success_ok .
  /ui2/cl_json=>serialize(     EXPORTING       data          = ls_outdata       compress      = abap_false       pretty_name   = /ui2/cl_json=>pretty_mode-camel_case     RECEIVING       r_json        = lv_output_json ).
  " 響應(yīng)內(nèi)容"  mo_response->create_entity( )->set_string_data( lv_output_json ).  " 響應(yīng)狀態(tài) ： 非必須"  mo_response->set_status( cl_rest_status_code=>gc_success_ok ).  " 響應(yīng)說明  ： 非必須"  mo_response->set_reason( cl_rest_status_code=>get_reason_phrase( cl_rest_status_code=>gc_success_ok ) ).ENDMETHOD.