如何将JSON转换为HTML格式并显⽰
ABAP接⼝程序开发中时常会⽤到JSON格式来传输数据,在监控传输的JSON串内容时,把JSON转换为HTML格式来显⽰会很便利。下⾯提供⼀个简单例⼦来实现JSON转化为HTML并显⽰的功能。pdf转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 TO10 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 ).
运⾏后弹出⼀个窗⼝显⽰HTML也可以通过‘+’‘—’来收起或展开JSON,很⽅便。
如果不想把HTML显⽰在窗⼝中,可以利⽤⼀下show_html中的参数CONTAINER,将HTML显⽰在⾃⼰画的屏幕中。
其他:TRANSFORMATION sjson2html可以通过Tcode STRANS来查看。
以上。