Настройка истории изменений. Подключение новых объектов (которых нет в списке) к системе версионирования (БСП) без изменения конфигурации

20.11.23

Разработка - БСП (Библиотека стандартных подсистем)

Много материалов и видео в сети о том, как подключить объект, которого нет в списке настроек, к системе версионирования БСП. Суть сводится к изменению определяемого типа, на который все завязано. Но это предполагает изменение конфигурации. Недавно встала задача подключить объект, которого нет в определяемом типе без снятия замков. Пришлось изучить вопрос глубже. Здесь пояснения и краткая инструкция с картинками. Как подключиться, используя только расширение.

Решил написать статью по мотивам случая из моей практики. Возможно, кто то сталкивается с подобным. А информация, изложенная здесь, покажется кому то полезной. Клиент захотел добавить историю для объекта, которого нет в списке настройки. Т.е. он сам пошел туда и не нашел в списке. А желание иметь историю не пропало. 

Решение в сети предлагается. Нужно изменить определяемый тип "ВерсионируемыеДанные". На него все завязано. Вносишь туда тип объекта и он сразу становится доступен в списке настройки. И версии вроде сохраняются. И просмотр должен быть. Если работает. то прекрасно сделано. Все завязали на один тип. Супер.

Однако клиент сказал, что конфигурация на замке и снимать его не планируется.

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

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

 

Через пару часов медитации выяснилось следующее: 

1. Версии хранятся в регистре "ВерсииОбъектов", измерение которого "Объект" содержит типы ДокументСсылка, СправочникСсылка и т.д. Уже хорошо. Значит при проблемах с расширением данные никуда не денутся и расширять ничего не надо. 

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

3. В интерфейсе просмотр зависит от общей команды "ИсторияИзменений". В ней определены тип "ВерсионируемыеДанные". Тут потребуется своя команда в расширении.

4. Собственно действие записи версии осуществляется подписками "ЗаписатьВерсиюОбъекта" и "ЗаписатьВерсиюДокумента". Для первой источники включены в определяемый тип "ВерсионируемыеДанныеОбъект". Для второй явно заданы. Что немного странно. Тут тоже потребуются объекты и действия в расширении.

 

И, собственно, все. Типы, команда, подписки, форма. Как потом выяснилось, еще и общий модуль. Как то так.

Переходим к описанию необходимых манипуляций в расширении. Предположим, для определенности, что для практических целей нас интересуют только документы и справочники. Если Вас интересуют только документы или только справочники, то ненужные пункты нужно пропустить.


Манипуляции следующие:

1. При необходимости добавить в расширение новые объекты (документы или справочники). Если это объекты расширения, то пропустить.

2. Добавить в расширение новый определяемый тип "ВерсионируемыеДанныеРасширенный" и Включить в него типы ссылок (внимание - ссылок) новых документов и справочников.

 

 

3. Добавить в расширение общую команду "ИсторияИзмененийРасширенная" копированием из общей команды конфигурации "ИсторияИзменений" и установить тип параметра команды "ОпределяемыйТип.ВерсионируемыеДанныеРасширенный".

 

 

4. Добавить в расширение общий модуль "ВерсионированиеОбъектовСобытия" и добавить в него следующие процедуры:
Процедура ЗаписатьВерсиюОбъектаРасширенная(Источник, Отказ) Экспорт
    ЗаписатьВерсиюОбъекта(Источник, Отказ);
КонецПроцедуры
Процедура ЗаписатьВерсиюДокументаРасширенная(Источник, Отказ, РежимЗаписи, РежимПроведения) Экспорт
    ЗаписатьВерсиюДокумента(Источник, Отказ, РежимЗаписи, РежимПроведения);
КонецПроцедуры

 

 

5. Добавить в расширение подписку "ЗаписатьВерсиюОбъектаДокумент", установить в источник типы новых документов объектов (внимание - объектов), установить событие "ПередЗаписью" и выбрать обработчик "ВерсионированиеОбъектовСобытия.ЗаписатьВерсиюДокументаРасширенная".

 

 

6. Добавить в расширение подписку "ЗаписатьВерсиюОбъектаСправочник", установить в источник типы новых справочников объектов (внимание - объектов), установить событие "ПередЗаписью" и выбрать обработчик "ВерсионированиеОбъектовСобытия.ЗаписатьВерсиюОбъектаРасширенная".

7. Добавить в расширение конфигурации форму "НастройкиХраненияИстории" регистра сведений "НастройкиВерсионированияОбъектов".

8. Добавить в модуль формы расширения копию процедуры "ЗаполнитьТипыОбъектовВДеревеЗначений" модуля формы из конфигурации с именем "ЗаполнитьТипыОбъектовВДеревеЗначенийРасширенныйТип".

9. Добавить аннотацию к процедуре: "&ИзменениеИКонтроль("ЗаполнитьТипыОбъектовВДеревеЗначений")".

10. Добавить в процедуре вставку после строки:
МассивТипов = Метаданные.ОбщиеКоманды.ИсторияИзменений.ТипПараметраКоманды.Типы();
#Вставка
МассивТиповРасширения = Метаданные.ОбщиеКоманды.ИсторияИзмененийРасширенная.ТипПараметраКоманды.Типы();
Для Каждого ЭлементМассива Из МассивТиповРасширения Цикл
    МассивТипов.Добавить(ЭлементМассива);
КонецЦикла;
#КонецВставки

 

 

11. Сохранить конфигурацию и расширение. Обновить базу данных. 

После этих манипуляций новые объекты должны появиться в списке настроек и можно будет задать параметры сохранения версий. При установке параметров должны создаваться версии. Просмотр и откат версий должен быть доступен. Я лично проделал это на КА 2.5.7.402 и УНФ 3.0.5.199. Тестировал все на платформе 8.3.23.1912. Полагаю, что это должно работать на всех конфигурациях, основанных на БСП.

Теперь последнее. Фактически, мы распространили механизм версионирования на расширение. Поэтому когда Вам потребуется включить версии для других документов или справочников достаточно будет проделать следующие действия в расширении:

1. При необходимости добавить в расширение новые объекты (документы или справочники). Если это объекты расширения, то пропустить.

2. Включить ссылку на объект в определяемый тип расширения "ВерсионируемыеДанныеРасширенный".

3. Добавить в источник команды  "ЗаписатьВерсиюОбъектаДокумент" типы новых документов (если они есть).

4. Добавить в источник команды  "ЗаписатьВерсиюОбъектаСправочник" типы новых справочников (если они есть).

И все. Далее - настраиваем в списке настроек и работаем.

Еще раз, надеюсь, что кому то пригодится или откроет что то новое. И что я не изобрел велосипед и никого не ввел в заблуждение. У меня работает.

Удачи.

подключение история изменений версии версионирование типовая конфигурация практика БСП программирование механизмы инструмент

См. также

БСП (Библиотека стандартных подсистем) Программист Платные (руб)

Синтакс-помощник БСП - cправочник по библиотеке стандартных подсистем. В состав справочника входит описание экспортных процедур и функций, размещенных в областях кода ПрограммныйИнтерфейс БСП.

1800 руб.

21.11.2024    135    1    0    

2

БСП (Библиотека стандартных подсистем) Программист Платформа 1С v8.3 Бесплатно (free)

В статье описан алгоритм для включения документа или справочника в систему БСП. Будет полезно программистам 1С, начинающим работать с БСП.

24.10.2024    1121    PROSTO-1C    0    

13

БСП (Библиотека стандартных подсистем) Работа с интерфейсом Программист Платформа 1С v8.3 Бесплатно (free)

В материале описан универсальный механизм работы с добавленными элементами на общую форму «ФормаОтчета». Думаю, облегчит работу многим разработчикам.

08.10.2024    1000    PROSTO-1C    4    

12

БСП (Библиотека стандартных подсистем) Программист Стажер Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

В статье рассмотрим пошаговую инструкцию создания дополнительного отчета с фоновым формированием результата.

04.10.2024    1851    MadRave    11    

24

БСП (Библиотека стандартных подсистем) Программист Стажер Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Пример отслеживания прогресса фонового выполнения дополнительной обработки с использованием программного интерфейса длительных операций БСП.

10.09.2024    1840    MadRave    1    

17

БСП (Библиотека стандартных подсистем) Программист Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

А что, если долгожданная реализация Паузы в 1С смутно напоминает старую, проверенную? А?!

06.09.2024    1265    n_mezentsev    10    

8

БСП (Библиотека стандартных подсистем) Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Добавим дополнительные свойства в новый документ средствами БСП

02.09.2024    4117    John_d    10    

52

БСП (Библиотека стандартных подсистем) Программист Платформа 1С v8.3 Бесплатно (free)

Всё больше организаций выбирает для серверов под 1С операционные системы Linux. Одним из отличий систем Windows и Linux является отсутствие COM объектов, которые зачастую использовались для формирования печатных форм офисных документов (Word). Конечно, можно выполнять печать и на клиенте, но есть риск импортозамещения. В работе у меня случались проблемы с зависанием процесса Word, поэтому я не люблю его использовать.

29.07.2024    5375    PROSTO-1C    12    

52
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. пользователь 14.01.24 19:03
Сообщение было скрыто модератором.
...
2. ChekarV 8 08.05.24 14:58 Сейчас в теме
Спасибо за хорошую статью. Но как побороли ошибку при сохранении настроек про то что не найдет ИдентификаторыОбъектовМетаданных для нового типа документа в расширении? Что то такое не вылетало?
Прикрепленные файлы:
5. mrAxe 26.06.24 17:14 Сейчас в теме
(2) Проблема у меня та же возникла.
Кроется она в скопированном модуле ЗаполнитьТипыОбъектовВДеревеЗначений
в строке НоваяСтрокаТаблицы.ТипОбъекта = ОбщегоНазначения.ИдентификаторОбъектаМетаданных(Тип);
Должен вернуться тип ИдентификаторыОбъектовРасширений, но этот тип не поддерживается, поэтому возвращается строка, и хоть визуально мы видим что все ок, строка сама по себе дальше вызывает ошибку. Решение нашел здесь.
https://infostart.ru/1c/tools/1665934/
Доработав то что здесь имеем лишь второй частью 7го пункта и 8ым.
arabesca; +1 Ответить
3. user1374747 234 24.05.24 10:49 Сейчас в теме
Нет. Не вылетало. Не сталкивался. Не могу конкретно рекомендовать.
По тексту ошибки, возможно, надо сделать запуск с ключом /c ЗапуститьОбновлениеИнформационнойБазы.
К сожалению, не очень понял фразу "для нового типа документа в расширении".
4. noxpina79 03.06.24 11:19 Сейчас в теме
(3)Спасибо, автору! Работает
6. mrAxe 26.06.24 17:15 Сейчас в теме
(2) Проблема у меня та же возникла.
Кроется она в скопированном модуле
ЗаполнитьТипыОбъектовВДеревеЗначений
в строке
НоваяСтрокаТаблицы.ТипОбъекта = ОбщегоНазначения.ИдентификаторОбъектаМетаданных(Тип);

Должен вернуться тип ИдентификаторыОбъектовРасширений, но этот тип не поддерживается, поэтому возвращается строка, и хоть визуально мы видим что все ок, строка сама по себе дальше вызывает ошибку. Решение нашел здесь Infostart
Доработав то что здесь имеем лишь второй частью 7го пункта и 8ым.
Оставьте свое сообщение