#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда
#Область ОбработчикиСобытий
Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
ОтчетыИС.ИнициализироватьСхемуКомпоновки(ЭтотОбъект);
КонецПроцедуры
#КонецОбласти
#Область СлужебныйПрограммныйИнтерфейс
Процедура ОпределитьНастройкиФормы(Форма, КлючВарианта, Настройки) Экспорт
Настройки.События.ПриСозданииНаСервере = Истина;
КонецПроцедуры
Процедура ПриСозданииНаСервере(Форма, Отказ, СтандартнаяОбработка) Экспорт
Параметры = Форма.Параметры;
Если Параметры.Свойство("ПараметрКоманды")
И Параметры.ОписаниеКоманды.Свойство("ДополнительныеПараметры") Тогда
Если Параметры.ОписаниеКоманды.ДополнительныеПараметры.ИмяКоманды = "АнализРасхожденийПриМаркировкеТоваровИСМП" Тогда
ТипОснования = Метаданные.ОпределяемыеТипы.ОснованиеМаркировкаТоваровИСМП.Тип;
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ РАЗРЕШЕННЫЕ РАЗЛИЧНЫЕ
| ДокументИСМП.ДокументОснование КАК ДокументОснование
|ИЗ
| Документ.МаркировкаТоваровИСМП КАК ДокументИСМП
|ГДЕ
| ДокументИСМП.Ссылка В(&МассивСсылок)
|И
| НЕ ДокументИСМП.ДокументОснование В (&ПустыеОснования)";
Запрос.УстановитьПараметр("МассивСсылок", Параметры.ПараметрКоманды);
Запрос.УстановитьПараметр("ПустыеОснования", ИнтеграцияИС.МассивПустыхЗначенийСоставногоТипа(ТипОснования));
МассивСсылок = Запрос.Выполнить().Выгрузить().ВыгрузитьКолонку("ДокументОснование");
Форма.ФормаПараметры.Отбор.Вставить("ДокументОснование", МассивСсылок);
КонецЕсли;
КонецЕсли;
ОтчетыИС.ИнициализироватьСхемуКомпоновки(ЭтотОбъект, Форма);
КонецПроцедуры
Функция ПереопределяемаяЧасть() Экспорт
Возврат ОтчетыИС.ШаблонПолученияДанныхПрикладныхДокументов() + ИнтеграцияИСМП.ШаблонПолученияВидаПродукцииИзНоменклатуры();
КонецФункции
#КонецОбласти
#КонецЕсли