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

&НаСервере
Процедура УстановитьТарифы()

    Отбор = Новый Структура;
    Отбор.Вставить("ВидСтрахования", Объект.ВидСтрахования);

    Тариф = РегистрыСведений.ТарифыСтрахования.ПолучитьПоследнее(
        Объект.Дата,
        Отбор
    );

    Если Тариф <> Неопределено Тогда

        Для Каждого СтрокаРиска Из Объект.СтраховыеРиски Цикл

            СтрокаРиска.Тариф = Тариф.Тариф;
            СтрокаРиска.СрокМесяцев = Объект.ВидСтрахования.СрокДействия;

            СтрокаРиска.СтраховаяПремия =
                СтрокаРиска.СтраховаяСумма * СтрокаРиска.Тариф / 100;

        КонецЦикла;

    КонецЕсли;

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