Функция РедактироватьНаборДанныхСхемыКомпоновкиДанных(ВладелецФормы, НаборДанных, Схема) Экспорт

	#Если Сервер И Не Сервер Тогда
		Схема = Новый СхемаКомпоновкиДанных;
		НаборДанных = Схема.НаборыДанных.Найти();
	#КонецЕсли
	мРежимРедактораЗапроса = Истина;
	мРедактируемыйНаборДанных = НаборДанных;
	ИнициализацияСлужебногоРежима();
	мСтрокаЗапроса.Запрос = НаборДанных.Имя;
	мСтрокаЗапроса.АвтозаполнениеДоступныхПолей = НаборДанных.АвтозаполнениеДоступныхПолей;
	
	//Добавил Шульц 28.07.2020
	Попытка 
		ТаблицаЗаполненыхПараметров = ВладелецФормы.ЭлементыФормы.Структура.ТекущиеДанные.ПараметрыДанных.Элементы;
	Исключение
		ТаблицаЗаполненыхПараметров=Неопределено;
	КонецПопытки;
	//Конец добавил Шульц 28.07.2020
	
	ПараметыСхемы = Схема.Параметры;
	Для Каждого ПараметрСхемы Из ПараметыСхемы Цикл
		СтрокаПараметров = мСтрокаЗапроса.ПараметрыЗапроса.Добавить();
		СтрокаПараметров.ИмяПараметра = ПараметрСхемы.Имя;
		ирОбщий.ОбновитьКопиюСвойстваВНижнемРегистреЛкс(СтрокаПараметров, "ИмяПараметра");
		СтрокаПараметров.Значение = ПараметрСхемы.Значение;
		СтрокаПараметров.ТипЗначения = ПараметрСхемы.ТипЗначения;
		Если СтрокаПараметров.Значение = Неопределено Тогда
			СтрокаПараметров.Значение = СтрокаПараметров.ТипЗначения.ПривестиЗначение(СтрокаПараметров.Значение); // Чтобы Неопределено превращать в пустые ссылки
		КонецЕсли; 
		Если ПараметрСхемы.Выражение <> "" Тогда
			СтрокаПараметров.ЭтоВыражение = "СКД";
			СтрокаПараметров.Выражение = ПараметрСхемы.Выражение; 
			//СтрокаПараметров.Выражение = СтрЗаменить(СтрокаПараметров.Выражение, "&", "Параметры."); 
		ИначеЕсли ТипЗнч(ПараметрСхемы.Значение) = Тип("СписокЗначений") Тогда 
			СтрокаПараметров.ЭтоВыражение = 2;
		Иначе
			СтрокаПараметров.ЭтоВыражение = Ложь;
		КонецЕсли;
		
		//Добавил Шульц 28.07.2020
		Если ТаблицаЗаполненыхПараметров<>Неопределено Тогда 
			НайденаяСтрока=ТаблицаЗаполненыхПараметров.Найти(ПараметрСхемы.Имя);
			Если НайденаяСтрока<>Неопределено Тогда
				Если ТипЗнч(НайденаяСтрока.Значение) = Тип("СтандартнаяДатаНачала") Тогда
					СтрокаПараметров.Значение=НайденаяСтрока.Значение.Дата;
				ИначеЕсли ТипЗнч(СтрокаПараметров.Значение)=ТипЗнч(НайденаяСтрока.Значение) Тогда
					СтрокаПараметров.Значение=НайденаяСтрока.Значение;
				КонецЕсли;
			КонецЕсли;
		КонецЕсли;
		//Конец добавил Шульц 28.07.2020
	КонецЦикла;
	мСтрокаЗапроса.ТекстЗапроса = НаборДанных.Запрос;
	мСтрокаЗапроса.ТипЗапроса = "Компоновка";
	Форма = ЭтотОбъект.ПолучитьФорму(, ВладелецФормы);
	Форма.Открыть();
	
КонецФункции