Загрузка данных


&НаКлиенте
Процедура ДатаНачалаПриИзменении(Элемент)

    РассчитатьДатуОкончания();

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

&НаСервере
Процедура РассчитатьДатуОкончания()

    Если Объект.СтраховыеРиски.Количество() > 0 Тогда

        Срок = Объект.СтраховыеРиски[0].СрокМесяцев;

        Если Срок > 0 Тогда
            Объект.ДатаОкончания =
                ДобавитьМесяц(Объект.ДатаНачала, Срок);
        КонецЕсли;

    КонецЕсли;

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