SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-04-30 11:46:38 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

latest

Browse Source
This commit is contained in:
Lars Hvam 2014-06-28 14:43:36 +02:00
parent 3725f87902
commit 279287b053
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
zagit.abap
View File

@ -217,8 +217,10 @@ CLASS lcl_serialize IMPLEMENTATION.
METHOD xml_add_structure.
DATA: li_element TYPE REF TO if_ixml_element,
li_structure TYPE REF TO if_ixml_element,
li_text TYPE REF TO if_ixml_text,
lv_string TYPE string,
lv_name TYPE string,
lo_descr_ref TYPE REF TO cl_abap_structdescr.
FIELD-SYMBOLS: <ls_comp> TYPE abap_compdescr,
@ -226,8 +228,8 @@ CLASS lcl_serialize IMPLEMENTATION.
lo_descr_ref ?= cl_abap_typedescr=>describe_by_data( ig_structure ).
lv_name = lo_descr_ref->get_relative_name( ).
li_structure = ii_xml_doc->create_element( lv_name ).
LOOP AT lo_descr_ref->components ASSIGNING <ls_comp>.
@ -241,9 +243,11 @@ CLASS lcl_serialize IMPLEMENTATION.
li_element->append_child( li_text ).
ii_root->append_child( li_element ).
li_structure->append_child( li_element ).
ENDLOOP.
ii_root->append_child( li_structure ).
ENDMETHOD. "structure_to_xml
METHOD xml_render.