РКО
Процедура ПриЗаписи()
Если ЗначениеЗапоненно(ДокументОснование) Тогда
/// Получаем Объект документа ОплатаАбонентов
ОбъектОплатаАбонентов = ДокументОснование.ПолучитьОбъект();
ОбъектОплатаАбонентов.ДокументОплаты = Ссылка;
ОбъектОплатаАбонентов.ДатаОплаты = Ссылка.Дата;
ОбъектОплатаАбонентов.Записать();
КонецЕсли;
КонецПроцедуры