Создание отчетов. Урок 22 - Как встроить/добавить отчет в 1С УТ, КА без программиста (2024)

Хорошо, что мы создали отчет, но открывать его через "файл"-"открыть" не удобно. Потому что всем нужны права на открытие обработок, во вторых всем нужно рассылать отчеты.

В данном ролике покажу 2 варианта как можно встроить отчет в вашу систему 1С:
1. Добавление через "дополнительные отчеты и обработки"
2. Добавление через "расширение конфигурации" (я рекомендую это)

---------------------------------------
Текст для "модуля объекта" для варианта 1:
//Начало текста
Функция СведенияОВнешнейОбработке() Экспорт
ПараметрыРегистрации = Новый Структура;
ПараметрыРегистрации.Вставить("Вид", "ДополнительныйОтчет");

ПараметрыРегистрации.Вставить("Наименование", НСтр("ru = '" + Метаданные().Синоним + "'"));
ПараметрыРегистрации.Вставить("Версия", "1.0.1");
ПараметрыРегистрации.Вставить("БезопасныйРежим", Ложь);
ПараметрыРегистрации.Вставить("Информация", НСтр("ru = 'Отчет " + Метаданные().Синоним + "'"));

ТаблицаКоманд = ПолучитьТаблицуКоманд();
ДобавитьКоманду(ТаблицаКоманд, НСтр("ru = '" + Метаданные().Синоним + "'"), Метаданные().Имя, "ОткрытиеФормы");
ПараметрыРегистрации.Вставить("Команды", ТаблицаКоманд);
Возврат ПараметрыРегистрации;

КонецФункции

Процедура ДобавитьКоманду(ТаблицаКоманд, Представление, Идентификатор, Использование, ПоказыватьОповещение = Ложь, Модификатор = "")
НоваяКоманда = ТаблицаКоманд.Добавить();
НоваяКоманда.Представление = Представление;
НоваяКоманда.Идентификатор = Идентификатор;
НоваяКоманда.Использование = Использование;
НоваяКоманда.ПоказыватьОповещение = ПоказыватьОповещение;
НоваяКоманда.Модификатор = Модификатор;
КонецПроцедуры

Функция ПолучитьТаблицуКоманд()
Команды = Новый ТаблицаЗначений;
Команды.Колонки.Добавить("Представление", Новый ОписаниеТипов("Строка"));
Команды.Колонки.Добавить("Идентификатор", Новый ОписаниеТипов("Строка"));
Команды.Колонки.Добавить("Использование", Новый ОписаниеТипов("Строка"));
Команды.Колонки.Добавить("ПоказыватьОповещение", Новый ОписаниеТипов("Булево"));
Команды.Колонки.Добавить("Модификатор", Новый ОписаниеТипов("Строка"));
Возврат Команды;
КонецФункции
//Конец текста

По телефону (WhatsApp, telegram): 8 [phone]