Mengurai file XML besar dengan PL/SQL

Anda membaca file baris demi baris, tetapi menimpa xmlClob . Anda dengan setiap baris, tidak menambahkan. Anda dapat membangun CLOB dengan membaca varchar2 buffer dan menambahkan, tetapi Anda juga dapat menggunakan DBMS_LOB prosedur bawaan untuk melakukannya untuk Anda:

DECLARE
  xmlClob CLOB;
  xmlFile BFILE;
  x XMLType;

  src_offset number := 1 ;
  dest_offset number := 1 ;
  lang_ctx number := DBMS_LOB.DEFAULT_LANG_CTX;
  warning integer;
BEGIN
  xmlFile := BFILENAME('XMLPARSERADRESYCUZK', 'pokus.xml');
  DBMS_LOB.CREATETEMPORARY(xmlClob, true);
  DBMS_LOB.FILEOPEN(xmlFile, DBMS_LOB.FILE_READONLY);
  DBMS_LOB.LOADCLOBFROMFILE(xmlClob, xmlFile, DBMS_LOB.LOBMAXSIZE, src_offset,
    dest_offset, DBMS_LOB.DEFAULT_CSID, lang_ctx, warning);
  x := XMLType.createXML(xmlClob);
  DBMS_LOB.FILECLOSEALL();
  DBMS_LOB.FREETEMPORARY(xmlClob);
  FOR r IN (
...

Ketika saya menggunakannya dan memuat file Anda, saya mendapatkan output:

CUZK Pod smdli.t.m 1800/9

Anda mungkin ingin beberapa pemeriksaan kesalahan di sekitar DBMS_LOB panggilan, ini hanya demo sederhana.