二维码

[Rest API] ABAP中以HTTP方式调用WebService服务

Twilight发表于 2015-09-16 17:52Twilight 最后回复于 2015-09-16 17:52 [复制链接] 8032 0

将URL+Email字符串通过HTTP的方式发送,并返回接收数据,其实传输的数据都是XML文件的形式。

1、程序代码
  1. PARAMETERS: p_mail(100) LOWER CASE.                 " E-Mail id to be verified
  2. DATA: http_client TYPE REF TO if_http_client .
  3. DATA: w_string TYPE string,
  4.       w_result TYPE string,
  5.       r_str    TYPE string.
  6. DATA: result_tab TYPE TABLE OF string.

  7. START-OF-SELECTION .
  8.   CLEAR w_string .
  9.   CONCATENATE
  10.   'http://www.webservicex.net/ValidateEmail.asmx/IsValidEmail?Email=' p_mail
  11. INTO
  12.   w_string .
  13.   CALL METHOD cl_http_client=>create_by_url
  14.     EXPORTING
  15.       url                = w_string
  16.     IMPORTING
  17.       client             = http_client
  18.     EXCEPTIONS
  19.       argument_not_found = 1
  20.       plugin_not_active  = 2
  21.       internal_error     = 3
  22.       OTHERS             = 4.
  23.   CALL METHOD http_client->send
  24.     EXCEPTIONS
  25.       http_communication_failure = 1
  26.       http_invalid_state         = 2.
  27.   CALL METHOD http_client->receive
  28.     EXCEPTIONS
  29.       http_communication_failure = 1
  30.       http_invalid_state         = 2
  31.       http_processing_failed     = 3.
  32.   CLEAR w_result .
  33.   w_result = http_client->response->get_cdata( ).
  34.   REFRESH result_tab .
  35.   SPLIT w_result AT cl_abap_char_utilities=>cr_lf INTO TABLE result_tab .
  36. *cl_abap_char_utilities=>cr_lf  回车
复制代码

扩展阅读:abap中TAB符、回车、换行、换页、退格符等特殊字符的使用

2、程序测试结果
如果出现一下报错,需要将ip和域名,加到服务端host文件中
http post 1.jpg
以网页的形式查看返回数据
http post 2.jpg
已内表的形式查看返回数据

回复

使用道具 举报

快速回帖

本版积分规则
您需要登录后才可以回帖 登录 | 注册有礼

快速回复 返回顶部 返回列表