VPF::Подключение к МсСкл в процедуре

Scatman

Дата 30.12.2008, 08:32 (ссылка)

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

Загрузка ...

Новичок

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

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

У нас фб 2,1
Есть процедура в которой используется подключение к МсСкл
Кусок процедуры

Код


  ADO = ADOConnect('Provider=SQLOLEDB.;Persist Security Info=False;User ID=ReadOnly;Password=z;Initial Catalog=InventoryTest;Data Source=Lgota');
  if (ADO = 0) then Exception Gb_Exception;

Error=1;

  dvStr = '';
  if (iRegion   <> '0' and iRegion <> '') then dvStr = dvStr || ',@RegionName=''' || iRegion || '''';
  if (iPartners <> '0' and iPartners <> '1') then dvStr = dvStr || ',@Partners=''' || iPartners || '''';
  if (iArticuls <> '0' and iArticuls <> '1') then dvStr = dvStr || ',@Articuls=''' || iArticuls || '''';
  if (dvStr <> '') then dvStr = substr32K(dvStr, 1, strlen(dvStr) - 1);
  
  dvStr = 'execute dbo.Get_OtlSpros ' || dvStr;
Error=2;

  Query = ADOCreateQuery(ADO, dvStr);
  if (Query = 0) then Exception Gb_Exception; 

Error=3;
  dvRD2s = ADOQueryOpen(Query);
  if (dvRD2s = 0) then begin
                           Exception Gb_Exception;    --Ошибка в этом блоке 
                       end

если вывести в лог описание ошибки dvTmp = log(GetErrorParam());
то в логе пишет "Время ожидания истекло"

Кто нить сталкивался с этим и как бороться??

Akella

Дата 31.12.2008, 01:15 (ссылка)

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

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 20
Всего: 329

кверя не может открыться.... почему? не знаю.. мож запрос некорректный?

Scatman

Дата 2.1.2009, 07:26 (ссылка)

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

Загрузка ...

Новичок

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

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

к сожалению эта команда работает но зависит от загрузки МсСкл что не совсем корректно

Всех с НАСТУПИВШИМ 2009 годом Быка

Akella

Дата 3.1.2009, 13:47 (ссылка)

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

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 20
Всего: 329

Цитата(Scatman @ 2.1.2009, 07:26

)

к сожалению эта команда работает

Scatman

Дата 3.1.2009, 19:15 (ссылка)

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

Загрузка ...

Новичок

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

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

Цитата(Akella @ 3.1.2009, 13:47)

Цитата(Scatman @ 2.1.2009, 07:26

)

к сожалению эта команда работает

Понимаю что запутал ))
Но ситуация такова что он запускается то с первого раза то с 20 а при условии что сам отчет обрабатывает большие массивы информации и работает от 10-20 минут до ошибки то это проблема.

Добавлено через 1 минуту и 55 секунд
Вот и хотелось бы исправить эту ошибку или найти способ ее обойти

Akella

Дата 3.1.2009, 22:46 (ссылка)

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

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 20
Всего: 329

Может эту задачу лучше решить не в IBExpert`е, а в C++/Delphi, например?

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Firebird, Interbase \| Следующая тема »