Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 12.07.2013, 23:18
Alexx_Pol Alexx_Pol вне форума
Прохожий
 
Регистрация: 14.05.2013
Сообщения: 9
Версия Delphi: Delphi 6
Репутация: 10
По умолчанию Загрузка данных: .bat и темповая таблица

Доброго времени суток! Сейчас пытаюсь решить следующую задачу: перенос файлов с локального компьютера в директорию на сервере, копируя сначала файл в поле BLOB темповой таблицы, а затем перенося его в из поля BLOB в директорию на сервере. Сначала я выполнению load.bat, который при помощи ораклевой программки Sqlldr.exe и файла .ctl заносит файл в таблицу. Затем запускаю функцию Blob_To_File_Dir, которая "сливает" содержимое поля BLOB в директорию REPORT_DIR на сервере:
Код:
procedure TWHOBuhReportForm.btn2Click(Sender: TObject);
var
     name_rep: string;
const
    p_rep_dir = 'REPORT_DIR';
begin
    WinExec('c:\oracle\ora92\bin\LOAD\load.bat',1);
    Sleep(3000);
    name_rep := 'TEST_32766.txt';
    WHODbDm.ExecSQL('declare result BINARY_INTEGER; begin  result:= sa.pa_file_storage.Blob_To_File_Dir(null,:p1_dir,:p2_rep); end; '
                ,[p_rep_dir ,name_rep]);
end;
По отдельности эти два фрагмента работают правильно, но если их запускать друг за другом, то функция ругается NO_DATA_FOUND, хотя логи утверждают, что строка в таблицу записана (пробовал с обычной таблицей - так и есть). Насколько я понимаю, у меня ничего не получится, пока функция не будет отрабатывать в одной сессии с занесением строки в таблицу (темповая таблица создана с параметром ON COMMIT PRESERVE ROWS). Подскажите, как это сделать? Можно ли выполнение функции "засунуть" в файл .ctl? Буду рад любым советам!
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 22:16.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025