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