Процедура УстановитьПолучитьПараметрыДатыКомпоновке(Установить=Истина) Экспорт НайденныйПараметр = ЭтотОбъект.КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("НачалоПериода"); Если НайденныйПараметр>Неопределено тогда Если Установить тогда Если ТипЗнч(НайденныйПараметр.Значение)=Тип("Дата") тогда НайденныйПараметр.Значение = НачалоДня(НачалоПериода); Иначе НайденныйПараметр.Значение.Дата = НачалоДня(НачалоПериода); КонецЕсли; Иначе Если ТипЗнч(НайденныйПараметр.Значение)=Тип("Дата") тогда НачалоПериода = НайденныйПараметр.Значение; Иначе НачалоПериода = НайденныйПараметр.Значение.Дата; КонецЕсли; КонецЕсли; НайденныйПараметр.Использование = истина; КонецЕсли; НайденныйПараметр = ЭтотОбъект.КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("ОкончаниеПериода"); Если НайденныйПараметр>Неопределено тогда Если Установить тогда Если ТипЗнч(НайденныйПараметр.Значение)=Тип("Дата") тогда НайденныйПараметр.Значение = КонецДня(ОкончаниеПериода); Иначе НайденныйПараметр.Значение.Дата = КонецДня(ОкончаниеПериода); КонецЕсли; иначе Если ТипЗнч(НайденныйПараметр.Значение)=Тип("Дата") тогда КонецПериода = НайденныйПараметр.Значение; Иначе КонецПериода = НайденныйПараметр.Значение.Дата; КонецЕсли; КонецЕсли; НайденныйПараметр.Использование = истина; КонецЕсли; КонецПроцедуры