В практике разработки на платформе 1С:Предприятие 8.3 (особенно в режиме управляемых форм) часто возникает задача: перед записью документа или справочника проверить выполнение определенных условий и, если они не соблюдены, задать пользователю уточняющий вопрос. Например: «Обнаружены расхождения, исправить автоматически и продолжить запись?». Реализация этого сценария таит в себе подводные камни, которые могут привести не просто к логической ошибке, а к полному краху приложения (Runtime Error, Access Violation).
В этой статье мы подробно разберем ситуацию, когда последовательность действий «ПередЗаписью -> Вопрос -> Записать» вешает систему, выясним истинную причину падения платформы и рассмотрим архитектурно правильный способ реализации таких проверок.
Рассмотрим сценарий, который приводит к критической ошибке. Разработчик пытается реализовать логику в модуле управляемой формы следующим образом:
ПередЗаписью выполняется проверка.Отказ = Истина.ПоказатьВопрос.ЭтаФорма.Записать().Проанализируем причину крэша. Как выяснилось в ходе обсуждения, проблема часто кроется не в самом вызове Записать(), а в подготовке параметров для этого метода. В одном из примеров была допущена фатальная ошибка формирования структуры:
// Ошибочный код, вызывающий падение платформы
ПараметрыКонтроля = Новый Структура;
ПараметрыКонтроля.Вставить("ПараметрыЗаписи", ПараметрыКонтроля); // Рекурсивная ссылка!
Записать(ПараметрыКонтроля.ПараметрыЗаписи);
Техническая причина краха: Когда структура передается в метод Записать(), платформа инициирует процесс передачи данных с клиента на сервер. Для этого выполняется сериализация объекта. Если структура содержит ссылку на саму себя (циклическую ссылку), алгоритм сериализации попадает в бесконечную рекурсию. В современных версиях платформы это должно обрабатываться исключением, однако при определенных условиях или в старых релизах это приводит к переполнению программного стека (Stack Overflow) и аварийному завершению процесса 1cv8.exe или rphost.exe.
Чтобы избежать зацикливания и корректно обработать запись в асинхронном режиме, необходимо использовать переменную-флаг на уровне модуля формы. Разберем этот механизм по шагам.
Шаг 1. Объявление переменной контекста. Мы должны определить переменную, которая будет «помнить», что пользователь уже дал согласие на запись. Это позволит нам не заходить в цикл бесконечных вопросов.
&НаКлиенте
Перем РазрешитьЗапись; // Переменная для управления флагом записи
Шаг 2. Обработка события ПередЗаписью. Здесь мы проверяем наш флаг. Если он в значении Ложь (по умолчанию), мы прерываем стандартный процесс и задаем вопрос.
&НаКлиенте
Процедура ПередЗаписью(Отказ, ПараметрыЗаписи)
// Если флаг установлен, значит мы пришли сюда программно после вопроса
Если РазрешитьЗапись = Истина Тогда
РазрешитьЗапись = Ложь; // Сбрасываем флаг для следующих действий
Возврат;
КонецЕсли;
// Проверяем условия, требующие внимания пользователя
Если НужноЗадатьВопросПользователю() Тогда
Отказ = Истина; // Отменяем текущую (интерактивную) запись
// Сохраняем системные параметры записи, чтобы вызвать их позже
СтруктураПараметров = Новый Структура;
СтруктураПараметров.Вставить("ПараметрыЗаписи", ПараметрыЗаписи);
Оповещение = Новый ОписаниеОповещения("ПослеВопросаОЗаписи", ЭтаФорма, СтруктураПараметров);
ПоказатьВопрос(Оповещение, "Данные заполнены некорректно. Исправить и записать?", РежимДиалогаВопрос.ДаНет);
КонецЕсли;
КонецПроцедуры
Шаг 3. Обработка ответа пользователя. В этой процедуре мы анализируем ответ и инициируем повторную запись.
&НаКлиенте
Процедура ПослеВопросаОЗаписи(Результат, ДополнительныеПараметры) Экспорт
Если Результат = КодВозвратаДиалога.Да Тогда
// Выполняем исправление данных
ИсправитьДанныеНаСервере();
// Устанавливаем флаг, чтобы обработчик ПередЗаписью нас пропустил
РазрешитьЗапись = Истина;
// Вызываем запись с теми же параметрами (РежимЗаписи, РежимПроведения)
Записать(ДополнительныеПараметры.ПараметрыЗаписи);
КонецЕсли;
КонецПроцедуры
Проанализируем поведение системы, когда пользователь нажимает стандартную кнопку «Записать и закрыть». Если мы просто вызовем Записать(ПараметрыЗаписи), форма будет сохранена, но не закроется автоматически, так как программный вызов Записать() в управляемых формах не инициирует закрытие окна.
Для корректной эмуляции поведения системной кнопки нужно проверить свойство Закрыть в структуре параметров записи. Рассмотрим дополненный код обработки оповещения:
&НаКлиенте
Процедура ПослеВопросаОЗаписи(Результат, ДополнительныеПараметры) Экспорт
Если Результат = КодВозвратаДиалога.Да Тогда
РазрешитьЗапись = Истина;
// Пытаемся записать объект
Если Записать(ДополнительныеПараметры.ПараметрыЗаписи) Тогда
// Если была нажата кнопка "Записать и закрыть", закрываем форму
Если ДополнительныеПараметры.ПараметрыЗаписи.Свойство("Закрыть")
И ДополнительныеПараметры.ПараметрыЗаписи.Закрыть Тогда
Закрыть();
КонецЕсли;
КонецЕсли;
КонецЕсли;
КонецПроцедуры
Иногда прямой вызов Записать() из процедуры оповещения может конфликтовать с внутренними механизмами платформы (особенно если форма сложная или используются расширения). Чтобы гарантировать «чистый» стек вызовов, рекомендуется инициировать запись через ПодключитьОбработчикОжидания.
Разберем, как это работает:
Записать() в новом контексте.
&НаКлиенте
Процедура ПослеВопросаОЗаписи(Результат, ДополнительныеПараметры) Экспорт
Если Результат = КодВозвратаДиалога.Да Тогда
РазрешитьЗапись = Истина;
// Передаем параметры через временное хранилище формы или реквизит
ПараметрыДляЗаписи = ДополнительныеПараметры.ПараметрыЗаписи;
ПодключитьОбработчикОжидания("ВыполнитьОтложеннуюЗапись", 0.1, Истина);
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура ВыполнитьОтложеннуюЗапись()
Записать(ПараметрыДляЗаписи);
КонецПроцедуры
Подведем итоги нашего исследования. Крахи платформы в 90% случаев связаны с нарушением работы с памятью или бесконечными циклами в низкоуровневых операциях (таких как сериализация данных).
Основные правила безопасности:
ПоказатьВопрос, ПоказатьПредупреждение) не блокируют выполнение кода. Весь последующий код должен находиться в процедуре обратного вызова (callback).ПараметрыЗаписи содержит важные признаки (например, признак необходимости закрытия формы), которые нужно обрабатывать вручную при программном вызове метода Записать().Соблюдение этих правил позволит вам создавать надежные и интуитивно понятные интерфейсы, не опасаясь внезапного «вылета» программы у пользователя.