DATA: json_ser TYPE REF TO cl_trex_json_serializer.
* json_des TYPE REF TO cl_trex_json_deserializer.
DATA: lv_url TYPE string."http 服务接口地址
DATA: lo_http_client TYPE REF TO if_http_client.
DATA: lv_len TYPE i."发送报文长度
DATA: lv_respon TYPE string.
DATA: lv_subrc TYPE sy-subrc.
DATA: lv_json_str TYPE string. "发送报文
DATA: lv_msgty TYPE c,
lv_msgtx TYPE string,
message TYPE string,
code TYPE char1.
DATA: lt_json TYPE STANDARD TABLE OF aufk WITH HEADER LINE,
ls_json TYPE aufk.
* 设置HTTP接口地址
lv_url = 'https://XXXXXX:443/service/esupplier/importVendorItems/1.0.0/1/'.
* 内表->JSON
CREATE OBJECT json_ser
EXPORTING
data = lt_json[].
CALL METHOD json_ser->serialize.
CALL METHOD json_ser->get_data
RECEIVING
rval = lv_json_str.
"创建客户端请求
CALL METHOD cl_http_client=>create_by_url
EXPORTING
url = lv_url
IMPORTING
client = lo_http
ABAP 访问REST服务设置Auth2的Token
最新推荐文章于 2024-06-19 17:00:23 发布
本文详细介绍了如何在ABAP环境中配置OAuth2授权,以便安全地访问REST服务并获取Access Token。通过步骤指导,展示了从设置认证客户端到实际请求Token的全过程。
摘要由CSDN通过智能技术生成