При интеграции различных конфигураций 1С (например, связи «Розницы 2.2» на платформе 8.3 и «Альфа-Авто» на платформе 8.1) разработчики часто сталкиваются с необходимостью не просто прочитать данные, но и изменить объект во внешней базе. Типичный сценарий: найти документ по номеру, изменить его статус или заполнить реквизиты и записать. Однако при попытке вызвать метод ПолучитьОбъект у найденной ссылки через COM-соединение часто возникает исключительная ситуация.
В этой статье мы подробно разберем, почему возникает ошибка «Процедура или функция с указанным именем не определена (Предупреждение)», проанализируем механизмы работы COM-соединения и рассмотрим наиболее эффективный способ решения этой проблемы.
Рассмотрим ситуацию: мы успешно подключились к внешней базе через V81.COMConnector или V83.COMConnector, нашли нужный документ (например, Чек ККМ) с помощью метода НайтиПоНомеру или запроса. Мы получили COM-объект типа «Ссылка». Но как только мы вызываем Ссылка.ПолучитьОбъект(), система выдает ошибку, указывающую на строку в модуле документа внешней базы, где вызывается метод Предупреждение() или Вопрос().
Проанализируем ситуацию: COM-соединение (внешнее соединение) — это невизуальный сеанс. В этом режиме работы недоступны любые интерфейсные методы, такие как Предупреждение, Вопрос, ОткрытьФорму и т.д. Когда мы вызываем ПолучитьОбъект, платформа 1С инициализирует модуль объекта. Если в старых конфигурациях (как «Альфа-Авто» на 8.1) логика проверки или заполнения в модуле написана без учета контекста выполнения, выполнение кода прерывается ошибкой при попытке обращения к процедурам, существующим только в толстом или тонком клиенте.
Самый надежный способ обойти ограничения контекста — это не пытаться манипулировать объектом напрямую на стороне «базы-клиента» (откуда подключаемся), а делегировать эту задачу «базе-серверу» (куда подключаемся). Для этого мы создадим специальную экспортную процедуру в общем модуле внешней базы.
Шаг 1. Подготовка внешней базы (Приемника)
В базе, где нужно изменить документ (в нашем примере — Альфа-Авто), создадим общий модуль или воспользуемся существующим. Важно, чтобы у модуля стояли галочки «Сервер» и «Внешнее соединение». Пропишем в нем процедуру:
Процедура ПогаситьЧекПоСигналуИзРозницы(НомерДокумента, НомерЧекаККМ, ДатаДокумента) Экспорт
// Ищем ссылку на документ внутри контекста самой базы
ЧекСсылка = Документы.Чек.НайтиПоНомеру(НомерДокумента, ДатаДокумента);
Если Не ЧекСсылка.Пустая() Тогда
// Здесь ПолучитьОбъект сработает стабильнее,
// но ошибки контекста все равно могут возникнуть, если модуль "грязный"
ЧекОбъект = ЧекСсылка.ПолучитьОбъект();
// Устанавливаем необходимые реквизиты
ЧекОбъект.НомерЧека = НомерЧекаККМ;
ЧекОбъект.Пробит = Истина;
// Записываем объект без выполнения лишних проверок, если это допустимо
ЧекОбъект.Записать(РежимЗаписиДокумента.Запись);
КонецЕсли;
КонецПроцедуры
Шаг 2. Вызов из основной базы (Источника)
Теперь в базе «Розница» мы вызываем эту процедуру через наше COM-соединение, передавая только примитивные типы данных (строки, числа, даты). Это позволяет избежать передачи «тяжелых» COM-ссылок и проблем с инициализацией модулей на стороне клиента.
// Инициализируем соединение
COMConnector = Новый COMObject("V81.COMConnector");
ПутьКБизе = "File=""D:\Bases\Alpha"";Usr=""Admin"";Pwd=""123"";";
V8 = COMConnector.Connect(ПутьКБизе);
// Подготавливаем данные для передачи
НомерДок = ЭтотОбъект.Чек.Номер;
НомерФР = ЭтотОбъект.Чек.НомерЧекаККМ;
ДатаДок = ЭтотОбъект.Чек.Дата;
// Вызываем удаленную процедуру через объект соединения
V8.ИмяВашегоОбщегоМодуля.ПогаситьЧекПоСигналуИзРозницы(НомерДок, НомерФР, ДатаДок);
// Очищаем соединение
V8 = Неопределено;
Если у вас есть возможность вносить изменения в конфигурацию внешней базы, проанализируем модуль объекта, на который ругается система. Чтобы метод ПолучитьОбъект работал через COM, необходимо обернуть все вызовы диалоговых окон в инструкции препроцессора.
Рассмотрим пример исправления кода в модуле документа:
#Если Клиент Тогда
Предупреждение("Документ уже пробит!");
#КонецЕсли
В этом случае, при создании внешнего соединения, фрагмент кода внутри #Если Клиент будет проигнорирован компилятором, и ошибка «Процедура не определена» исчезнет. Это более правильный с точки зрения архитектуры 1С подход, но он требует возможности изменять код во всех модулях, где встречаются подобные вызовы.
Разберем несколько важных моментов, которые помогут сделать обмен данными более стабильным:
Строка(Ссылка.УникальныйИдентификатор()), а во второй базе находим объект через Документы.Чек.ПолучитьСсылку(Новый УникальныйИдентификатор(ПереданнаяСтрока)).ТекущийПользователь) могут быть не заполнены. Если логика записи документа опирается на эти параметры, их нужно инициализировать сразу после подключения: V8.ПараметрыСеанса.ТекущийПользователь = НужныйПользовательСсылка;.V81.COMConnector на 64-битных серверах часто требуется регистрация 32-битной компоненты в службе компонентов Windows (COM+), иначе соединение не будет установлено.Резюмируем: Столкнувшись с ошибкой при вызове ПолучитьОбъект через COM, в первую очередь попробуйте перенести логику изменения данных на сторону внешней базы, создав там экспортный метод. Это избавит вас от проблем с контекстом выполнения и сделает ваш код более устойчивым к изменениям в модулях документов.