Проверить размещение ХранилищеЗначения, не извлекая сообщения обмена

Ресурс Хранилище в АрхивСообщенийОбменов имеет тип ХранилищеЗначения. Читаем только настройки размещения платформы 8.3.26+, не содержимое архива.

Подготовка

1. Запускайте в учебной копии конфигурации. Примеры читают структуру метаданных, но не создают объекты, не записывают регистры и не проводят документы.

2. Сверяйте вывод с деревом конфигурации в Конфигураторе. Имена, длины и настройки в УНФ, КА2, БП, УТ 11 и УТ 10.3 могут различаться.

3. Имена объектов взяты из XML КА2 Progress: C:\claude\KA2\Progress\XML_CF_KA2_PROGRESS. Исходные XML не изменяйте. Выполняйте код только в своей учебной копии соответствующей конфигурации.

4. В другой конфигурации предварительно найдите аналогичный объект в Конфигураторе и замените только строку имени в поиске. Отсутствие имени обрабатывается до чтения свойств; оно не доказывает отсутствие аналогичной возможности.

5. Каждый урок запускайте отдельно. Код не вызывает бизнес-функции модулей и обработчики команд, не переключает привилегированный режим и не меняет параметры сеанса.

Регистр = Метаданные.РегистрыСведений.Найти("АрхивСообщенийОбменов");
Если Регистр = Неопределено Тогда
    ВызватьИсключение "В учебной конфигурации отсутствует РегистрыСведений.АрхивСообщенийОбменов";
КонецЕсли;
Ресурс = Регистр.Ресурсы.Найти("Хранилище");
Если Ресурс = Неопределено Тогда
    ВызватьИсключение "В АрхивСообщенийОбменов отсутствует ресурс Хранилище";
КонецЕсли;
Если Не Ресурс.Тип.СодержитТип(Тип("ХранилищеЗначения")) Тогда
    ВызватьИсключение "Ресурс архива имеет другой тип";
КонецЕсли;
Сообщить(Ресурс.Тип.СодержитТип(Тип("ХранилищеЗначения")));
Политика = Ресурс.ИспользованиеХраненияВХранилищеДвоичныхДанных;
Сообщить("Настройка размещения: " + Строка(Политика));
УправляющееПоле = Ресурс.ПолеИспользованияХраненияВХранилищеДвоичныхДанных;
Если УправляющееПоле = Неопределено Тогда
    Сообщить("Управляющее поле размещения не назначено");
Иначе
    Сообщить(УправляющееПоле.ПолноеИмя());
    Сообщить(УправляющееПоле.Тип.СодержитТип(Тип("Булево")));
КонецЕсли;
Сообщить("Читалась только схема: сообщения и бинарные значения не получены");

Разбор по шагам

1. Перед новыми свойствами подтверждаем тип ХранилищеЗначения.

2. ИспользованиеХраненияВХранилищеДвоичныхДанных — настройка размещения, не двоичные данные сообщения.

3. ПолеИспользованияХраненияВХранилищеДвоичныхДанных проверяем на отсутствие; назначенное поле должно быть булевым.

4. Запускайте на платформе 8.5.1.1343 и отдельно сверяйте режим совместимости; в старых платформах новых свойств может не быть.

Как проверить результат

1. По предоставленному XML первая проверка типа Истина.

2. Вывод содержит текущую политику и явную ветку наличия/отсутствия управляющего поля; нет Получить() содержимого хранилища, запросов или записи.

Ожидаемый результат

Проверена техническая политика хранения без извлечения чувствительных сообщений.

На что обратить внимание

1. В старом XML эти новые назначения могут не быть экспортированы; не обещаем заранее конкретное значение политики.

2. Даже если справка разрешает запись свойства, данный пример его только читает и не переносит бинарные данные.

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