Shulou(Shulou.com)06/02 Report--

This article describes how to convert abap structures or inner tables to and from json strings. The relevant knowledge, in the actual case operation process, many people will encounter such a dilemma, and then let the editor lead you to learn how to deal with these situations! I hope you can read it carefully and be able to achieve something!

There are many classes available, such as cl_trex_json_serializer and cl_trex_json_deserializer,SAP also provide us with CL_FDT_JSON, / UI2/CL_JSON and so on for serialization and deserialization of JSON.

Due to a problem with the version of sap, some classes may not exist on the server and cannot be used. The blogger details how to use serialization and deserialization with abap code

At the same time, the / UI2/CL_JSON code is available for download.

Here I provide an includeZBC_UI2_JSON_CLS.txt that handles the / UI2/CL_JSON code for you to add to the main program in the absence of this class.

- -

1. How to use cl_trex_json_serializer and cl_trex_json_deserializer to serialize and deserialize.

(there is no class cl_trex_json_deserializerZBC_CL_TREX_JSON_DESERIALIZER.txt,include in my sap version for upload.)

REPORT yaiolos_test_06.

"*

"! Usage examples and documentation can be found on SCN:

"http://wiki.scn.sap.com/wiki/display/Snippets/One+more+ABAP+to+JSON+Serializer+and+Deserializer

"*"

INCLUDE zbc_ui2_json_cls.

INCLUDE zbc_cl_trex_json_deserializer.

DATA: lt_flight TYPE STANDARD TABLE OF sflight WITH HEADER LINE

Lv_json TYPE string

Lv_json_out TYPE string

Lv_json_len TYPE i.

DATA:

Serializer TYPE REF TO cl_trex_json_serializer

Deserializer TYPE REF TO zcl_trex_json_deserializer.

START-OF-SELECTION.

* serialization

*

* Usage examples and documentation can be found on https://www.cnblogs.com/hhelibeb/p/6617488.html

*

SELECT * FROM sflight INTO TABLE lt_flight.

CREATE OBJECT serializer

EXPORTING

DATA = lt_flight [].

Serializer- > serialize ().

Lv_json = serializer- > get_data ().

Lv_json_out = lv_json.

DO.

Lv_json_len = strlen (lv_json_out).

IF lv_json_len

< 100. WRITE / lv_json_out. EXIT. ELSE. WRITE / lv_json_out+100. ENDIF. lv_json_out = lv_json_out+100. ENDDO. ***反序列化 REFRESH lt_flight. CREATE OBJECT deserializer. deserializer->

Deserialize (

EXPORTING json = lv_json

IMPORTING abap = lt_flight []).

LOOP AT lt_flight.

WRITE /: lt_flight-carrid.

ENDLOOP.

2. Use / ui2/cl_json to serialize and deserialize json strings.

REPORT yaiolos_test_07.

"*

"! Usage examples and documentation can be found on SCN:

"http://wiki.scn.sap.com/wiki/display/Snippets/One+more+ABAP+to+JSON+Serializer+and+Deserializer

"*"

INCLUDE zbc_ui2_json_cls.

INCLUDE zbc_cl_trex_json_deserializer.

DATA: lt_flight TYPE STANDARD TABLE OF sflight

Ls_flight TYPE sflight

Lrf_descr TYPE REF TO cl_abap_typedescr

Lv_json TYPE string.

DATA: lv_json_len TYPE i

Lv_json_out TYPE string.

DEFINE macro_write.

Lv_json_out = & 1.

Do.

Lv_json_len = strlen (lv_json_out).

If lv_json_len

< 100. write / lv_json_out. exit. else. write / lv_json_out+100. endif. lv_json_out = lv_json_out+100. enddo. END-OF-DEFINITION. START-OF-SELECTION. SELECT * FROM sflight INTO TABLE lt_flight. * serialize table lt_flight into JSON, skipping initial fields and converting ABAP field names into camelCase lv_json = zui2_json=>

Serialize (data = lt_flight compress = abap_true pretty_name = zui2_json= > pretty_mode-camel_case).

Macro_write lv_json.

CLEAR lt_flight.

* deserialize JSON string json into internal table lt_flight doing camelCase to ABAP like field name mapping

Zui2_json= > deserialize (EXPORTING json= lv_json pretty_name = zui2_json= > pretty_mode-camel_case CHANGING data = lt_flight).

LOOP AT lt_flight INTO ls_flight.

WRITE / ls_flight-carrid.

ENDLOOP.

The difference with the conversion of 1 is whether the field name contains a "number. 1 cannot be parsed using the standard json format, and 2 is more generic.

"how to convert abap structure or inner table to and from json strings." This is the end of the introduction, thank you for reading. If you want to know more about the industry, you can follow the website, the editor will output more high-quality practical articles for you!

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.