Abap - 遍历xml文档的整个节点？

DATA: lv_xml TYPE string.

lv_xml =
  |<?xml version="1.0" encoding="UTF-8"?>\n| &&
  |<root>\n| &&
  |  <node1>value1</node1>\n| &&
  |  <node2>value2</node2>\n| &&
  |  <node3>value3</node3>\n| &&
  |</root>|.

DATA(lo_xml_doc) = cl_xml_document=>create_from_string( lv_xml ).

" 获取根节点
DATA(lo_root) = lo_xml_doc->get_root_element( ).

" 遍历所有子节点
WHILE lo_root IS BOUND.
  DATA(lo_node) = lo_root->get_next_node( ).
  IF lo_node IS BOUND.
    " 处理节点
    WRITE: / lo_node->get_name( ).
    lo_root = lo_node.
  ELSE.
    EXIT.
  ENDIF.
ENDWHILE.