Закрытие файлов в Б5 3.4

User

Сообщений: 3170 Регистрация: 08.11.2007

Красноярск

18.06.2008 07:42:29

БЭСТ5 3.4 СП8. Вызов плагина из ЗП. Ввод и компиляция плагина через редактор XBA.

Столкнулся с проблемой закрытия файлов. Максимально упростил пример.

Если пишу:

Код
NetUse("F_Accounts", LoadPath() + "salary\accounts.dbf") F_Accounts->(dbGoTop()) SayAndWait(F_Accounts->TNum) altd() F_Accounts->(DBCLOSEAREA())

То после выполнения плагина вылетает ошибка (см. скриншот).

Если в плагине открыть еще один алиас и не закрывать его. Вот так:

Код

  NetUse("F_Accounts", LoadPath() + "salary\accounts.dbf")
  NetUse("F_cardspri", LoadPath() + "salary\cardspri.dbf")
  F_Accounts->(dbGoTop())
  SayAndWait(F_Accounts->TNum)
  altd()
  F_Accounts->(DBCLOSEAREA())

То ошибки после выполнения плагина не будет, а открытый алиас останется. Другими словами ошибка происходит, если закрывать все созданные алиасы.

Что я делаю не так? Такая ошибка только у меня?

Прикрепленные файлы

Error_XBA.JPG (24.86 КБ)

Алексей Новиков

User

Сообщений: 872 Регистрация: 11.10.2007

Пермь

18.06.2008 07:54:48

Добрый день.

Ошибка в том, что на момент запуска плагина в текущей рабочей области открыта база, по которой работает Initlist. Плагин открывает свои базы, меняя рабочую область. Функция dbclosearea() закрывает файл в текущей области, не меняя области. Поэтому когда плагин возвращает управление в БЭСТ, initilist пытается работать на закрытой области. Отсюда ошибка.

Самое простое решение - это заключить тело плагина между парой функций dbpush() - dbpop(), которые сохраняют и восстанавливают состояние рабочей области, соответственно.
Также, можно запоминать установленную рабочую область при входе в плагин, получив её с помощью alias() и восстановить её в конце плагина с помощью dbselectarea().

С уважением, Новиков Алексей.

Денис

User

Сообщений: 3170 Регистрация: 08.11.2007

Красноярск

18.06.2008 08:52:15

Цитата
Алексей Новиков пишет: Самое простое решение - это заключить тело плагина между парой функций dbpush() - dbpop(), которые сохраняют и восстанавливают состояние рабочей области, соответственно.

Спасибо! Похоже помогло.

Форум