CONVERT JSON TO ABAP AND ABAP TO JSON

 TYPES : BEGIN OF ty_final,

         employeeno   TYPE char10 

         employeename TYPE char20,

         address      TYPE char50,

         phone        TYPE  char10,

         END OF ty_final.

DATA :

  lv_data        TYPE string,

  lv_json        TYPE string,

  lo_json_parser TYPE REF TO /ui2/cl_json,

  lt_entity_data TYPE STANDARD TABLE OF ty_final,

  lt_entity_data1 TYPE STANDARD TABLE OF ty_final.

SELECT * FROM ztest_emp INTO TABLE lt_entity_data.

******CONVERT ABAP FORMAT TO JSON FORMAT

  lv_data = /ui2/cl_json=>serialize( data = lt_entity_data compress = abap_true pretty_name = /ui2/cl_json=>pretty_mode-camel_case ).

*******CONVERT JSON FORMAT TO ABAP FORMAT 

/ui2/cl_json=>deserialize(

  EXPORTING

  json = lv_data

  pretty_name = /ui2/cl_json=>pretty_mode-camel_case

  CHANGING

  data = lt_entity_data1

  ).

CL_DEMO_OUTPUT=>WRITE_DATA( lt_entity_data ).

CL_DEMO_OUTPUT=>WRITE_DATA( lv_data ).

CL_DEMO_OUTPUT=>DISPLAY( lt_entity_data1 ).