1s Отчёт продажи по ответственным

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