Oracle PL/SQL: Vòng qua các nút XMLTYPE

Question

Tôi có một XMLTYPE với nội dung sau:

<?xml version="1.0"?> 
    <users> 
     <user> 
      <name>user1</name> 
     </user> 
     <user> 
      <name>user2</name> 
     </user> 
     <user> 
      <name>user3</name> 
     </user> 
    </users> 

Làm thế nào tôi có thể lặp trong PL/SQL qua tất cả các yếu tố "người sử dụng"? Cảm ơn

Answer 1

Bạn có thể lặp qua các yếu tố sử dụng EXTRACT và XMLSequence (tách XML vào khối riêng biệt - ở đây người dùng) như thế này:

SQL> SELECT extractvalue(column_value, '/user/name') "user" 
    2 FROM TABLE(XMLSequence(XMLTYPE(
    3     '<?xml version="1.0"?> 
    4      <users> 
    5       <user> 
    6        <name>user1</name> 
    7       </user> 
    8       <user> 
    9        <name>user2</name> 
10       </user> 
11       <user> 
12        <name>user3</name> 
13       </user> 
14      </users>').extract('/users/user'))) t; 

user 
-------- 
user1 
user2 
user3 

Answer 2

Bạn có thể sử dụng XQuery. Hãy xem câu lệnh chọn bên dưới. v_xml_doc là biến XMLTYPE chứa dữ liệu XML.

select name 
from XMLTable('for $i in /users/user 
          return $i' 
          passing v_xml_doc 
          columns name varchar2(200) path 'name' 
       ) 

Answer 3

Làm thế nào về điều này:

PROCEDURE xmltest IS 
    v_userlist XMLType; 
    v_count NUMBER(38) := 1; 
BEGIN 
    /* define XML variable */ 
    v_userlist := XMLType('<?xml version="1.0"?> 
    <users> 
     <user> 
      <name>user1</name> 
     </user> 
     <user> 
      <name>user2</name> 
     </user> 
     <user> 
      <name>user3</name> 
     </user> 
    </users>'); 

    /* for each user, print out their name (each element can be extracted using xpath '//user[1]' '//user[2]' etc) */ 
    WHILE v_userlist.existsNode('//user[' || v_count || ']') = 1 LOOP 
    dbms_output.put_line(v_userlist.extract('//user[' || v_count || ']/name/text()').getStringVal()); 
    v_count := v_count + 1; 
    END LOOP; 
END; 

Answer 4

ITS VERY GOOD!! 

CADENA CLOB; 
BEGIN 
    SELECT CASE 
      WHEN EXISTSNODE (:NEW.MENSAJE, '/Body') <> 0 THEN 'ERROR' 
      ELSE NULL 
      END 
    INTO :NEW.DESCRIPCION_ERROR 
    FROM DUAL; 

    CADENA := :NEW.MENSAJE.EXTRACT ('/Body/xmlOriginal/text()').getStringVal(); 
    CADENA := REPLACE (CADENA, '&lt;', '<'); 
    CADENA := REPLACE (CADENA, '&gt;', '>'); 

Answer 5

select xt.* from xmltable('/users/user' passing xmltype('<users> 
    <user> 
     <name>user1</name> 
    </user> 
    <user> 
     <name>user2</name> 
    </user> 
    <user> 
     <name>user3</name> 
    </user> 
</users>') columns name varchar2(10) path 'name') xt