Добавление дополнительных отчётов и обработок в подсистему, созданную в расширении

17.02.25

Задачи пользователя - Адаптация типовых решений

Появилась такая необходимость. Поиск информации привёл к статье https://infostart.ru/1c/articles/1065764/, но она от 2019 года, с тех пор многое поменялось, актуальность несколько снизилась. Решил написать для ищущих.

За основу взята статья //infostart.ru/1c/articles/1065764/.

Многие моменты, например с правами, будут пропущены. Это остаётся на откуп внедряющего. Тут только основные принципы и нюансы.

Начало ровно такое же, как в статье выше. Не буду это описывать, там достаточно подробно.

Расхождения начинаются в тех моментах, когда после всех проделанных процедур ничего не работает как надо. В комментариях даже есть намёки на это, но не развёрнутые.

Основная причина в том, что созданная подсистема в расширении имеет тип не "СправочникСсылка.ИдентификаторыОбъектовМетаданных", а "СправочникСсылка.ИдентификаторыОбъектовРасширений". Из-за этого она не попадает в стандартные свойства. Вся работа в общем то и сведётся к тому, чтобы их расширить

0) Справочник ИдентификаторыОбъектовРасширений

1) ОМ ДополнительныеОтчетыИОбработки

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

2) ОФ ДополнительныеОтчетыИОбработки

3) ОФ НастройкаМоихОтчетовИОбработок

4) Справочник ИдентификаторыОбъектовМетаданных

&ИзменениеИКонтроль("ИдентификаторОбъектаМетаданных")
Функция АлгДОО_ИдентификаторОбъектаМетаданных(ОписаниеОбъектаМетаданных, ВызыватьИсключение)

	ТипОписанияОбъектаМетаданных = ТипЗнч(ОписаниеОбъектаМетаданных);
	Если ТипОписанияОбъектаМетаданных = Тип("Тип") Тогда

		ОбъектМетаданных = Метаданные.НайтиПоТипу(ОписаниеОбъектаМетаданных);

		Если ОбъектМетаданных <> Неопределено Тогда
			ПолноеИмяОбъектаМетаданных = ОбъектМетаданных.ПолноеИмя();

		ИначеЕсли Не ВызыватьИсключение Тогда
			Возврат Null;
		Иначе
			ТекстОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
			НСтр("ru = 'Некорректное значение параметра %1 в функции %2.
			|Указан несуществующий объект метаданных: ""%3"".'"),
			"ОписаниеОбъектаМетаданных",
			"ОбщегоНазначения.ИдентификаторОбъектаМетаданных",
			ОписаниеОбъектаМетаданных);
			ВызватьИсключение ТекстОшибки;
		КонецЕсли;

	ИначеЕсли ТипОписанияОбъектаМетаданных = Тип("Строка") Тогда
		ПолноеИмяОбъектаМетаданных = ОписаниеОбъектаМетаданных;

	ИначеЕсли ТипОписанияОбъектаМетаданных = Тип("ОбъектМетаданных") Тогда
		ПолноеИмяОбъектаМетаданных = ОписаниеОбъектаМетаданных.ПолноеИмя();
#Вставка
// Понимаю, что использовать Строку - спорное решение, но подобрать Тип не смог. Кто сможет - напишите в комментах. Может просто туплю.
	ИначеЕсли Строка(ТипОписанияОбъектаМетаданных) = "Идентификатор объекта метаданных расширения" Тогда
		ПолноеИмяОбъектаМетаданных = ОписаниеОбъектаМетаданных.ПолноеИмя;
#КонецВставки
	ИначеЕсли Не ВызыватьИсключение Тогда
		Возврат Null;
	Иначе
		ТекстОшибки = СтроковыеФункцииКлиентСервер.ПодставитьПараметрыВСтроку(
		НСтр("ru = 'Некорректный тип параметра %1 в функции %2:
		|""%3"".'"),
		"ОписаниеОбъектаМетаданных",
		"ОбщегоНазначения.ИдентификаторОбъектаМетаданных",
		ТипОписанияОбъектаМетаданных);
		ВызватьИсключение ТекстОшибки;
	КонецЕсли;

	Массив = Новый Массив;
	Массив.Добавить(ПолноеИмяОбъектаМетаданных);

	Идентификаторы = ИдентификаторыОбъектовМетаданных(Массив, ВызыватьИсключение, Истина);
	Идентификатор = Идентификаторы.Получить(ПолноеИмяОбъектаМетаданных);
	Если Идентификатор = Неопределено Тогда
		Возврат Null;
	КонецЕсли;

	Возврат Идентификатор;

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

5) Справочник ДополнительныеОтчетыИОбработки

Вот вроде бы и всё. Если что-то всплывёт ещё - поправлю публикацию.

Проверено на БП 3.0.169.18.

Вступайте в нашу телеграмм-группу Инфостарт

Расширение Своя подсистема Дополнительные отчёты и обработки

+6 –

См. также

Табличная часть в доп. реквизитах и формирование таблиц в шаблоне docx для 1С:ДО 3.0

Адаптация типовых решений 1С:Предприятие 8 1С:Документооборот Россия Платные (руб)

Расширение конфигурации для «1С:Документооборот КОРП», редакция 3.0. позволяет: 1.использовать произвольные табличные части в качестве дополнительных реквизитов к документу; 2 использовать произвольные табличные части в шаблонах в формате docx для автоматического заполнения таблиц.

31800 руб.

29.06.2023 10013 30 15

Автоматическое снятие резервов в Заказах покупателей для 1С:УНФ

Логистика, склад и ТМЦ Адаптация типовых решений Пользователь 1С:Предприятие 8 1С:Управление нашей фирмой 1.6 1С:Управление нашей фирмой 3.0 Россия Управленческий учет Платные (руб)

Чтобы не допустить путаницы с обещаниями клиентам и для четкого контроля исполнения заказов мы используем резервирование товаров. Расширение для УНФ, чтобы автоматически отменять старые резервы и не мешалть эффективно продавать.

9000 руб.

02.08.2023 6697 24 5

Автоматическое разнесение банковской выписки

Банковские операции Адаптация типовых решений Бухгалтер Пользователь 1С:Предприятие 8 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

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

9600 руб.

17.06.2025 1954 6 0

Дизайнер форм 1С

Разработка Инструментарий разработчика Работа с интерфейсом Адаптация типовых решений Нейросети 1C:Бухгалтерия 1C:ERP 1С:ЗУП 1С:КА 1С:УНФ 1С:УТ 1С:Розница 1С:ДО 1С:ERP Управление предприятием 2 Платные (руб)

Разработка "Дизайнер форм 1С" реализована в виде расширения 1С и является универсальным инструментом для разработки прототипа форм с целью демонстраций, технических заданий и т.д. Без участия разработчика с возможностью экспорта в файл внешней обработки и генерации формы используя искусственный интеллект.

36000 руб.

28.08.2025 2474 1 2

Вывод факсимиле в табличные документы (УПД, УКД, Счёт-фактура, ТОРГ-12, Акт сверки, М-15, заказ клиента и др.) для 1С УТ 11.5, КА 2.5, ERP 2.5, УНФ 3, Розница 3

Печатные формы Адаптация типовых решений Бухгалтер Пользователь 1С:Предприятие 8 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Платные (руб)

Расширение позволяет вывести в табличном документе факсимиле печати и подписей и/или вывести произвольную картинку из прикреплённых файлов организации для 1С УТ 11.5, КА 2.5, ERP 2.5, УНФ 3, Розница 3. Вывод факсимиле возможен в табличные документы УПД, УКД, Счёт-фактура, ТОРГ-12 и другие. Возможно настроить вывод для любых типовых макетов (Акт сверки, М-15, ТТН), для этого потребуется отредактировать макет и разместить на нём картинки с соответствующими именами, при выводе на печать в размещённые картинки будут выводиться факсимиле из прикреплённых рисунков. Редактирование осуществляется через типовой механизм в пользовательском интерфейсе.

3500 руб.

07.02.2023 10645 103 17

Отгрузка заказа клиента в 1 клик для УТ 11.5, КА 2.5, ERP 2.5

Адаптация типовых решений Создание на основании Пользователь 1С:Предприятие 8 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Управленческий учет Платные (руб)

Расширение позволяет в 1 клик поставить весь состав заказа клиента в отгрузку и открыть заполненные формы документов отгрузки по заказу.

4800 руб.

25.08.2023 2983 7 0

Выгрузка из ЗиКГУ 3.1 Распоряжения о перечислении денежных средств на карты "Мир"

Адаптация типовых решений Бухгалтер 1С:Предприятие 8 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бюджетный учет Платные (руб)

Разработка для упрощения процедуры передачи данных о выплатах для конфигурации 1С:ЗиКГУ. Данное расширение предоставляет возможность экспортировать данные «Распоряжения» непосредственно из документа "Ведомость в банк" в формате XML.

3840 руб.

13.11.2024 2582 3 4

Настройки сообщений ЭДО при запуске ЗУП.

Адаптация типовых решений Программист 1С:Предприятие 8 1С:Бухгалтерия 3.0 1С:Зарплата и Управление Персоналом 3.x Россия Абонемент ($m)

Маленькая заметка (в трех разных масштабах) для тех, кто часто видит окно при входе в ЗУП «Новые сообщения для расшифровки по 1С-Отчетность», которое появляется через 60 секунд после запуска программы, как раз когда вы уже добрались до интересующей вас формы и начали в ней что-то активно делать:

1 стартмани

17.06.2024 8230 84 Znata_PI 12

Подписаться на ответы Инфостарт бот

Свернуть все

Для отправки сообщения требуется регистрация/авторизация

Автор:

Михаил Шебунин (MikeSh)

Рейтинг: 59

Для получения уведомлений о новых публикациях автора подключите телеграм бот: Инфостарт бот

Публикация:

№ 2316232

Создание 17.02.25 17:40

Обновление 17.02.25 17:40

Статистика:

Просмотры 1727

Загрузки 0

Рейтинг 6

Комментарии 0

Характеристики:

Код открыт Да

Рубрики Адаптация типовых решений

Кому Программист

Тип файла Нет файла

Платформа Управляемые формы

Конфигурация Универсальные

Операционная система Не имеет значения

Страна Россия

Отрасль Не имеет значения

Налоги Не имеет значения

Вид учета Не имеет значения

Доступ к файлу Бесплатно (free)