Событие прри записи объекта

[Алексей_1985_06]

Необходимо осуществлять проверку при записи элемента справочника (справочник иерархический).
У элемента есть реквизит "Комплекс", нужно чтобы при записи элемента, проверялось какой Комплекс указан у родителя этого элемента, и если они отличаются то необходимо его исправить. Все срабатывает, но только когда открывается существующий элемент, а когда новый то нет, я так понимаю что в БД нет еще ссылки (может ошибаюсь), подскажите как выйти из этой ситуации, какое событие использовать при условии что нужно показать вопрос пользователю....

Код Выделить Развернуть

&НаКлиенте
Процедура ПередЗаписью(Отказ, ПараметрыЗаписи)

Если Объект.Комплекс.Пустая() Тогда  // Если комплекс не заполнен
Сообщить("Комплекс не заполнен");
Возврат
КонецЕсли;

// Если комплекс заполнен, тогда выполним провеку:
КомплексРодителя = ПроверкаКомплекса(); // ПроверкаКомплекса(Объект.Ссылка) - это серверная процедура (см. код ниже)

// Если результат запроса пустой, т.е нет комплекса у родителя
Если КомплексРодителя = Неопределено Тогда
Возврат
КонецЕсли;


// Если комплексы у системы и ее родителя - разные, тогда:
Если  КомплексРодителя <> Объект.Комплекс Тогда    // Если комплексы не совпадают,
Оповещение = Новый ОписаниеОповещения("ПослеОтветаНаВопрос", ЭтотОбъект, КомплексРодителя); 

// Сформируем свой список кнопок:
СписокКнопок = Новый СписокЗначений;
СписокКнопок.Добавить("Исправить", "Исправить");
СписокКнопок.Добавить("Игнорировать", "Игнорировать");

// Покажем вопрос пользователю (со своими кнопками):
     ПоказатьВопрос(Оповещение, "Текущий элемент не может принадлежать к другому комплексу", СписокКнопок,,,"Обнаружена ошибка записи!");

Отказ = Истина;   // Отказ от записи  объекта    
КонецЕсли;

КонецПроцедуры

Код Выделить Развернуть

&НаКлиенте
Процедура ПослеОтветаНаВопрос(РезультатВопроса, ДополнительныеПараметры) Экспорт

Если РезультатВопроса = "Исправить" Тогда
Объект.Комплекс = ДополнительныеПараметры;
Сообщить("Вы правильно поступили");
КонецЕсли;

КонецПроцедуры

[alexandr_ll]

Алексей_1985_06, Есть же событие ПослеЗаписи()

[LexaK]

Алексей_1985_06, вообще лучше использовать модуль справочника
событие то-же ПередЗаписью
примерно так

Код Выделить Развернуть

Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)

Если Не Родитель.Пустая() и  Комплекс <>  Родитель.Комплекс Тогда
Комплекс =  Родитель.Комплекс;
КонецЕсли;



[Алексей_1985_06]

Алексей_1985_06, Есть же событие ПослеЗаписи()

Алексей_1985_06, вообще лучше использовать модуль справочника
событие то-же ПередЗаписью
примерно так

Код Выделить Развернуть

Процедура ПередЗаписью(Отказ,)

Если Не Родитель.Пустая() и  Комплекс <>  Родитель.Комплекс Тогда
Комплекс =  Родитель.Комплекс;
КонецЕсли;



Алексей_1985_06, вообще лучше использовать модуль справочника
событие то-же ПередЗаписью
примерно так

Код Выделить Развернуть

Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)

Если Не Родитель.Пустая() и  Комплекс <>  Родитель.Комплекс Тогда
Комплекс =  Родитель.Комплекс;
КонецЕсли;



Большое спасибо, но только как в этом случае показать диалог с вопросом пользователю, ведь ПоказатьВопрос () - не будет работать на сервере в модуле объекта?
Сейчас в модуле объекта (справочника) так:

Код Выделить Развернуть

Процедура ПередЗаписью(Отказ)

    Если Не Родитель.Пустая() и  Комплекс <>  Родитель.Комплекс Тогда
        Комплекс =  Родитель.Комплекс;
    КонецЕсли;



[LexaK]

но только как в этом случае показать диалог с вопросом пользователю,

в этом случае диалог ни кк не показать.
но можно вывести Сообщение - "Комплекс  изменен на ..."

просто как уведомление!

Конечно если нужно задать вопрос - Будем менять Комплекс  на Что-то? да, Нет
тогда действительно надо использовать функционал Формы.

все зависит от условностей и правил заполнения по умолчанию.
(в самой 1С-ке тысячи полей/реквизитов заполняются автоматически без всяких уведомлений)

[Алексей_1985_06]

alexandr_ll, После записи уже поздно менять значение реквизита, это нужно сделать до записи в БД