1С 8.x : Программное открытие Универсального отчета с отбором

 ОтчетКонтрагента = Отчеты.ВедомостьВзаиморасчетыСКонтрагентами.Создать();

	

	ОтчетКонтрагента.УстановитьНачальныеНастройки();

		

	ОтчетКонтрагента.УниверсальныйОтчет.ПостроительОтчета.ИзмеренияСтроки.Очистить();

	ОтчетКонтрагента.УниверсальныйОтчет.ПостроительОтчета.ИзмеренияКолонки.Очистить();

	ОтчетКонтрагента.УниверсальныйОтчет.ПостроительОтчета.ВыбранныеПоля.Очистить();

	ОтчетКонтрагента.УниверсальныйОтчет.ПостроительОтчета.Порядок.Очистить();

	

	ОтчетКонтрагента.УниверсальныйОтчет.ДобавитьИзмерениеСтроки("Контрагент");

	ОтчетКонтрагента.УниверсальныйОтчет.ДобавитьИзмерениеСтроки("ДоговорКонтрагента");

	

	//Контрагент

	ЭлементОтбора = ОтчетКонтрагента.УниверсальныйОтчет.ПостроительОтчета.Отбор["Контрагент"];

	ЭлементОтбора.Использование = Истина;

	ЭлементОтбора.ВидСравнения = ВидСравнения.Равно;

	ЭлементОтбора.Значение = ДоговорКонтрагента.Владелец;

	//ДоговорКонтрагента

	ЭлементОтбора = ОтчетКонтрагента.УниверсальныйОтчет.ПостроительОтчета.Отбор["ДоговорКонтрагента"];

	ЭлементОтбора.Использование = Истина;

	ЭлементОтбора.ВидСравнения = ВидСравнения.Равно;

	ЭлементОтбора.Значение = ДоговорКонтрагента.Ссылка;

	

	ОтчетКонтрагента.УниверсальныйОтчет.ДобавитьДополнительноеПоле("Период");

	ОтчетКонтрагента.УниверсальныйОтчет.ДобавитьДополнительноеПоле("Регистратор");

		

	ОтчетКонтрагента.УниверсальныйОтчет.ВыводитьДетальныеЗаписи = Истина;

	

	ОтчетКонтрагента.УниверсальныйОтчет.мВосстанавливатьНастройкиПриОткрытии = Ложь;

		

	ФормаОтчета = ОтчетКонтрагента.ПолучитьФорму();

	ФормаОтчета.Открыть();

	ФормаОтчета.ОбновитьОтчет();