如何將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 ).

 

 

 

 

運行后彈出一個窗口顯示HTML也可以通過‘+’‘—’來收起或展開JSON，很方便。

如果不想把HTML顯示在窗口中，可以利用一下show_html中的參數CONTAINER，將HTML顯示在自己畫的屏幕中。

其他：TRANSFORMATION sjson2html可以通過Tcode STRANS來查看。

以上。