|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
&НаКлиенте Процедура ОтчетДвиженияНоменклатуры(Команда) ФормаОтчета = ПолучитьФорму("Отчет.ПеремещенияНоменклатуры.Форма"); КомпоновщикНастроек = ФормаОтчета.Отчет.КомпоновщикНастроек; Настройки = КомпоновщикНастроек.Настройки; ЭлементНастройки = Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("Номенклатура")); ЭлементНастройки.Значение = Элементы.Товары.ТекущиеДанные.Номенклатура; Если ЗначениеЗаполнено(ЭлементНастройки.ИдентификаторПользовательскойНастройки) Тогда ПользовательскийПараметр = КомпоновщикНастроек.ПользовательскиеНастройки.Элементы.Найти(ЭлементНастройки.ИдентификаторПользовательскойНастройки); Если ТипЗнч(ПользовательскийПараметр) = Тип("ЗначениеПараметраНастроекКомпоновкиДанных") Тогда ПользовательскийПараметр.Значение = ЭлементНастройки.Значение; КонецЕсли; КонецЕсли; ФормаОтчета.Открыть(); ФормаОтчета.СкомпоноватьРезультат(); КонецПроцедуры |