VPF::Ошибка при добавлении CLOB - Форум программистов

Plamenk

Дата 14.10.2005, 11:30 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 258
Регистрация: 18.2.2003

Репутация: нет
Всего: 3

Всем Привет!

Вообщем проблема достаточно простая надо сформировать XML (11Kb) преобразовать его в CLOB и сохранить в БД. данное действие надо выполнить много раз (30 000).

Делаю сейчас следующим образом (код представлен в обрезаном ввиде, но суть я думаю будет понятна):

Код


 procedure ImportDoc(....)
  is

    m_XmlDocTeamplate CLOB;
    m_XmlDocCLOB CLOB;
    m_domDoc dbms_xmldom.DOMDocument;    

    lCounterCommit Number := 0;
  begin

    --Получаем шаблон XML представления документа
    select c.xmldata into m_XmlDocTeamplate from configparam c where c.parentkey='TemplateOrder' and c.childkey is null;
    
    --Заполняем в шаблоне информацию одинаковую для всех XML документов
    m_domDoc := dbms_xmldom.newDOMDocument(m_XmlDocTeamplate);

    dbms_lob.createtemporary(m_XmlDocTeamplate, true, dbms_lob.session);    
    -- В этом методе изменяются некоторые узлы  
    PreFillDocData(...);

   --Записываем в CLOB
   dbms_xmldom.writeToClob(m_domDoc, m_XmlDocTeamplate);

   
    for rec in (select  ... from ...)
    loop
      
      -- Загружаем шаблон в DOM    
      m_domDoc := dbms_xmldom.newDOMDocument(m_XmlDocTeamplate);

      -- Создаем CLOB для нового документа
      dbms_lob.createtemporary(m_XmlDocCLOB, true, dbms_lob.session);
      
       -- Формируем XMLDom
       CreateDocument(....);

      --Записываем в CLOB
      dbms_xmldom.writeToClob(m_domDoc, m_XmlDocCLOB);

      --Добавляем в таблицу
     ....
    
      --Освобождаем CLOB
      dbms_lob.freetemporary(m_XmlDocCLOB);
      
      lCounterCommit := lCounterCommit + 1;
      if (lCounterCommit > 999) then
         lCounterCommit := 0;
         commit;
      end if;
      
    end loop;
    
    --Освобождаем CLOB шаблона
    dbms_lob.freetemporary(m_XmlDocTeamplate);
  end ImportDoc;

Данный код валиться с ошибкой (см. прикрепленный файл) примерно после 2500 итераций.

Вопрос: Что я делаю не так? (Oracle9i)

Заранее Все БОЛЬШОЕ СПАСИБО!

Это сообщение отредактировал(а) Plamenk - 14.10.2005, 12:24

Присоединённый файл ( Кол-во скачиваний: 6 )

err3.jpg 13,51 Kb