Не отрабатывает событие при закрытии формы

Процедура ПослеЗакрытияФормыОбъекта(РезультатЗакрытия, ДополнительныеПараметры) Экспорт
    Если ЗначениеЗаполнено(ДополнительныеПараметры.Форма.Объект.Ссылка) Тогда
        ПоказатьПредупреждение(, "Ссылка получена", 3);        
		ЗафиксироватьТранзакцию();
    КонецЕсли;
КонецПроцедуры

Форм = Об.ПолучитьФорму("ФормаДокумента",ЭтаФорма);
Оповещение = Новый ОписаниеОповещения("ПослеЗакрытияФормыОбъекта", ЭтотОбъект, Новый Структура("Форма", ЭтаФорма));
ОткрытьФорму(Форм,,ЭтаФорма,УИД,,,Оповещение,);