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