如何将json转换成html格式

130 阅读 0 评论 86 点赞

我是靠谱客的博主发嗲大门，这篇文章主要介绍如何将json转换成html格式，现在分享给大家，希望可以做个参考。

本教程操作环境：windows10系统、html5版，DELL G3电脑，该方法适用于所有品牌电脑。

将json转换成html格式的方法：

ABAP接口程序开发中时常会用到JSON格式来传输数据，在监控传输的JSON串内容时，把JSON转换为HTML格式来显示会很便利。

下面提供一个简单例子来实现JSON转化为HTML并显示的功能。

其中：

1，使用/ui2/cl_json=>serialize来生成JSON串，

2，调用 TRANSFORMATION sjson2html来转换HTML，

3，使用cl_abap_browser=>show_html显示HTML。

代码：

复制代码REPORT ztest_display_json.
DATA:lv_json     TYPE string,
     lv_convert  TYPE string,
     lo_json_ser TYPE REF TO cl_trex_json_serializer,
     lv_err_text TYPE string,
     lt_ekpo     TYPE STANDARD TABLE OF ekpo.
SELECT *
  INTO CORRESPONDING FIELDS OF TABLE lt_ekpo
  FROM ekpo
  UP TO 10 ROWS.
* 将内表转化为JSON
lv_json = /ui2/cl_json=>serialize( data = lt_ekpo[] ).
TRY.
*   将JSON转换为HTML
    CALL TRANSFORMATION sjson2html SOURCE XML lv_json
                                   RESULT XML DATA(lv_html).
  CATCH cx_xslt_runtime_error INTO DATA(lo_err).
    lv_err_text = lo_err->get_text( ).
    WRITE: lv_err_text.
    RETURN.
ENDTRY.
* 显示HTML
lv_convert = cl_abap_codepage=>convert_from( lv_html ).
cl_abap_browser=>show_html( html_string = lv_convert ).
REPORT ztest_display_json.
 
DATA:lv_json     TYPE string,
     lv_convert  TYPE string,
     lo_json_ser TYPE REF TO cl_trex_json_serializer,
     lv_err_text TYPE string,
     lt_ekpo     TYPE STANDARD TABLE OF ekpo.
 
SELECT *
  INTO CORRESPONDING FIELDS OF TABLE lt_ekpo
  FROM ekpo
  UP TO 10 ROWS.
 
* 将内表转化为JSON
lv_json = /ui2/cl_json=>serialize( data = lt_ekpo[] ).
 
TRY.
*   将JSON转换为HTML
    CALL TRANSFORMATION sjson2html SOURCE XML lv_json
                                   RESULT XML DATA(lv_html).
  CATCH cx_xslt_runtime_error INTO DATA(lo_err).
    lv_err_text = lo_err->get_text( ).
    WRITE: lv_err_text.
    RETURN.
ENDTRY.
 
* 显示HTML
lv_convert = cl_abap_codepage=>convert_from( lv_html ).
cl_abap_browser=>show_html( html_string = lv_convert ).1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
REPORT ztest_display_json.
DATA:lv_json     TYPE string,
     lv_convert  TYPE string,
     lo_json_ser TYPE REF TO cl_trex_json_serializer,
     lv_err_text TYPE string,
     lt_ekpo     TYPE STANDARD TABLE OF ekpo.
SELECT *
  INTO CORRESPONDING FIELDS OF TABLE lt_ekpo
  FROM ekpo
  UP TO 10 ROWS.
* 将内表转化为JSON
lv_json = /ui2/cl_json=>serialize( data = lt_ekpo[] ).
TRY.
*   将JSON转换为HTML
    CALL TRANSFORMATION sjson2html SOURCE XML lv_json
                                   RESULT XML DATA(lv_html).
  CATCH cx_xslt_runtime_error INTO DATA(lo_err).
    lv_err_text = lo_err->get_text( ).
    WRITE: lv_err_text.
    RETURN.
ENDTRY.
* 显示HTML
lv_convert = cl_abap_codepage=>convert_from( lv_html ).
cl_abap_browser=>show_html( html_string = lv_convert ).
REPORT ztest_display_json.
 
DATA:lv_json     TYPE string,
     lv_convert  TYPE string,
     lo_json_ser TYPE REF TO cl_trex_json_serializer,
     lv_err_text TYPE string,
     lt_ekpo     TYPE STANDARD TABLE OF ekpo.
 
SELECT *
  INTO CORRESPONDING FIELDS OF TABLE lt_ekpo
  FROM ekpo
  UP TO 10 ROWS.
 
* 将内表转化为JSON
lv_json = /ui2/cl_json=>serialize( data = lt_ekpo[] ).
 
TRY.
*   将JSON转换为HTML
    CALL TRANSFORMATION sjson2html SOURCE XML lv_json
                                   RESULT XML DATA(lv_html).
  CATCH cx_xslt_runtime_error INTO DATA(lo_err).
    lv_err_text = lo_err->get_text( ).
    WRITE: lv_err_text.
    RETURN.
ENDTRY.
 
* 显示HTML
lv_convert = cl_abap_codepage=>convert_from( lv_html ).
cl_abap_browser=>show_html( html_string = lv_convert ).
登录后复制