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