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