0
LamerSuper
20.03.13
✎
15:01
|
В управляемой форме документа есть команда, запускающая отчет. В него нужно передать спецификацию как параметр. Почему то не передается параметрю Вот код :
&НаКлиенте
Процедура АнализСпецификацииРазузлованный(Команда)
ОтчетАнализ=Отчеты.АнализСпецификацииРазузлованойНТ.Создать();
Попытка
Если Элементы.ГруппаСтраницыЗаявки.ТекущаяСтраница.Имя="ГруппаАртикулы" ТОгда
Спецификация=Элементы.ТаблицаАртикулы.ТекущиеДанные.Спецификация;
КоличествоПродукции=Элементы.ТаблицаАртикулы.ТекущиеДанные.Количество;
ИначеЕсли Элементы.ГруппаСтраницыЗаявки.ТекущаяСтраница.Имя="ГруппаНоменклатуры" ТОгда
Спецификация=Элементы.ТаблицаНоменклатура.ТекущиеДанные.Спецификация;
КоличествоПродукции=Элементы.ТаблицаНоменклатура.ТекущиеДанные.Количество;
ИначеЕсли Элементы.ГруппаСтраницыЗаявки.ТекущаяСтраница.Имя="ГруппаСпецификации" ТОгда
Спецификация=Элементы.ТаблицаСпецификацииНоменклатуры.ТекущиеДанные.Спецификация;
КоличествоПродукции=Элементы.ТаблицаСпецификацииНоменклатуры.ТекущиеДанные.Количество;
КонецЕсли;
Исключение
КонецПопытки;
ФормаОтчета=ПолучитьФорму("Отчет.АнализСпецификацииРазузлованойНТ.Форма.ФормаОтчетаУправляемая");
Настройки = ФормаОтчета.Отчет.КомпоновщикНастроек.Настройки;
Коллекция = ФормаОтчета.Отчет.КомпоновщикНастроек.ПользовательскиеНастройки.Элементы; ОтчетАнализ.КомпоновщикНастроек.Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("Спецификация")).Значение=Спецификация;
ОтчетАнализ.КомпоновщикНастроек.Настройки.ПараметрыДанных.НайтиЗначениеПараметра(Новый ПараметрКомпоновкиДанных("КоличествоПоНоменклатуре")).Значение=КоличествоПродукции;
СтруктураВозврата = ОбработатьРасшифровкуНаСервере(ФормаОтчета.Отчет, ФормаОтчета.Результат, ФормаОтчета.ДанныеРасшифровки, ФормаОтчета.УникальныйИдентификатор,Спецификация,КоличествоПродукции);
ФормаОтчета.Результат = СтруктураВозврата.Результат;
ФормаОтчета.ДанныеРасшифровки = СтруктураВозврата.ДанныеРасшифровки;
ФормаОтчета.Элементы.Результат.ОтображениеСостояния.Видимость = Ложь;
ФормаОтчета.Элементы.Результат.ОтображениеСостояния.ДополнительныйРежимОтображения = ДополнительныйРежимОтображения.НеИспользовать;
ФормаОтчета.Открыть();
КонецПроцедуры
&НаСервере
Функция ОбработатьРасшифровкуНаСервере(Знач ОтчетХ, Знач РезультатХ, Знач ДанныеРасшифровкиХ, Знач ИДФормы,Спецификация,КоличествоПродукции)
ОтчетОбъект = ДанныеФормыВЗначение(ОтчетХ, Тип("ОтчетОбъект.АнализСпецификацииРазузлованойНТ"));
РезультатХ.Очистить();
ОтчетОбъект.СкомпоноватьРезультат(РезультатХ, ДанныеРасшифровкиХ);
АдресДанныеРасшифровки = ПоместитьВоВременноеХранилище(ДанныеРасшифровкиХ, ИДФормы);
Возврат Новый Структура("Результат,ДанныеРасшифровки", РезультатХ, АдресДанныеРасшифровки);
КонецФункции
Параметр не передается почему то. Что не так ????
|
|