Мальчики, парни, мужчины, с наступающим Праздником!

Желаю каждому в этот мужской день получить самое желанное и нежданное, самое нужное и редкое, самое драгоценное и волшебное,
самое красивое и восхитительное б е с п л а т н о и в двойном экземпляре!
Не забывайте носить своих девочек на руках

Спасибо, что вы у нас такие умные и отзывчивые!

При активизации строки ТЧ изменяю цвет фона этой строки, используя код:

Процедура ТЗПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
    Если Элемент.ТекущаяСтрока = ДанныеСтроки Тогда
        ОформлениеСтроки.ЦветФона = WebЦвета.Розовый;
    КонеЦЕсли;
КонецПроцедуры

Процедура ТЗПриАктивизацииСтроки(Элемент)
    Элемент.ОбновитьСтроки();
КонецПроцедуры

Спасибо всем за ответы.
В процедуре ПриЗаписи() в модуле документа "ПлатежноеТребование" написала так:

Процедура ПриЗаписи(Отказ)
    Если ЭтотОбъект.ПометкаУдаления = Истина тогда
             ...
    иначе
            Запрос = Новый Запрос;
            Запрос.Текст ="ВЫБРАТЬ  
                    |    ДокументДляСозданияПлатежногоТребования.Ссылка,
                    |    ДокументДляСозданияПлатежногоТребования.ПлатежноеТребование
                    |ИЗ
                    |    Документ.ДокументДляСозданияПлатежногоТребования КАК ДокументДляСозданияПлатежногоТребования
                    |ГДЕ
                    |    ДокументДляСозданияПлатежногоТребования.ПлатежноеТребование.Ссылка = &ПТ";
            
            Запрос.УстановитьПараметр("ПТ", ЭтотОбъект.Ссылка);
            
            Результат = Запрос.Выполнить().Выгрузить();               
            
            Если Результат.Количество() = 0 тогда
                ДокументДоп = Документы.ДокументДляСозданияПлатежногоТребования.СоздатьДокумент(); 
                ...
                ДокументДоп.Записать(РежимЗаписиДокумента.Проведение);
            
            иначе
                Выборка = Запрос.Выполнить().Выбрать();
                Пока Выборка.Следующий() цикл
                    ДокДоп = Выборка.Ссылка.ПолучитьОбъект();
                    ДокДоп.Записать(РежимЗаписиДокумента.Проведение);
                КонецЦикла;
            КонецЕсли;
    КонецЕсли; 
КонецПроцедуры

БПС-Сбербанк (Беларусь)