&НаКлиенте
Процедура ТолькоРазработкаПриИзменении(Элемент)
Если ЗначениеЗаполнено(ЭтаФорма.ТолькоРазработка) Тогда
КомпоновщикНастроек = Отчет.КомпоновщикНастроек.Настройки;
ПараметрСКД = КомпоновщикНастроек.Отбор.Элементы[0].Использование=Истина;
ПараметрСКД.Значение = Отчет.КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("Разработка");
ПараметрСКДФикс = КомпоновщикНастроек.Отбор.Элементы[0].Использование = Истина;
ПараметрСКДФикс.Использование = Истина;
ПараметрСКДФикс.Значение = ПараметрСКД.Значение;
ПараметрСКД = КомпоновщикНастроек.Отбор.Элементы[0].Использование;
ПараметрСКД.Использование=Истина;
ПараметрСКД.Значение = Отчет.КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы.Найти("Разработка");
ПараметрСКДФикс = КомпоновщикНастроек.Отбор.Элементы[0].Использование;
ПараметрСКДФикс.Использование = Истина;
ПараметрСКДФикс.Значение = ПараметрСКД.Значение;
КонецЕсли;
КонецПроцедурыОтбор = ОтчетОстатки.ПостроительОтчета.Отбор;
Если Отбор.Найти("Номенклатура") = Неопределено Тогда
Отбор.Добавить("Номенклатура");
КонецЕсли;
Отбор["Номенклатура"].Использование = Истина;
Отбор["Номенклатура"].Значение = Номенклатура;
Отбор["Номенклатура"].ВидСравнения =
?(Номенклатура.ЭтоГруппа,
ВидСравнения.ВСпискеПоИерархии,
ВидСравнения.Равно);