Изменить язык и источник только в копии документации

Копируем собственную аннотацию рекурсивно. Новые source и язык задаём дочерней документации копии, исходные ru и URN остаются прежними.

Подготовка

1. Каждый фрагмент выполните отдельно на сервере учебной базы. Полная собственная XSD с urn:guide:product и нотацией BookImage включена в код.

2. Это xs:notation внутри XSD, не узел НотацияDOM из DTD. В коде нет DOCTYPE, внешних сущностей, импорта схемы, чтения файла или сетевого запроса.

3. public и system — вымышленные собственные URN. Объявление метки не загружает изображение и не подтверждает существование файла.

4. Проверить у НаборСхемXML проверяет схему, не XML-экземпляр товара. Изменения относятся только к собственной модели в памяти.

XSD = "<xs:schema xmlns:xs=""http://www.w3.org/2001/XMLSchema""
| xmlns:g=""urn:guide:product"" targetNamespace=""urn:guide:product""
| elementFormDefault=""qualified"" version=""1.0"" xml:lang=""ru"">
| <xs:annotation><xs:documentation>Учебный товар, не контракт внешнего API</xs:documentation></xs:annotation>
| <xs:simpleType name=""Sku""><xs:restriction base=""xs:string"">
|  <xs:length value=""4""/><xs:pattern value=""[A-Z][0-9]{3}""/>
| </xs:restriction></xs:simpleType>
| <xs:complexType name=""Product""><xs:sequence>
|  <xs:element name=""name"" type=""xs:string""/>
|  <xs:element name=""quantity"" type=""xs:nonNegativeInteger""/>
|  <xs:element name=""note"" type=""xs:string"" minOccurs=""0""/>
| </xs:sequence><xs:attribute name=""code"" type=""g:Sku"" use=""required""/>
| </xs:complexType>
| <xs:element name=""product"" type=""g:Product""/>
| <xs:notation name=""BookImage"" public=""urn:guide:book-image:public"" system=""urn:guide:book-image:system"">
|  <xs:annotation><xs:documentation source=""urn:guide:notation-note"" xml:lang=""ru"">Учебная метка изображения, не загрузка картинки</xs:documentation></xs:annotation>
| </xs:notation>
|</xs:schema>";
Чтение = Новый ЧтениеXML;
Чтение.УстановитьСтроку(XSD);
Попытка
    ЧтениеДерева = Новый ПостроительDOM;
    ДокументСхемы = ЧтениеДерева.Прочитать(Чтение);
    Чтение.Закрыть();
Исключение
    Чтение.Закрыть();
    ВызватьИсключение;
КонецПопытки;
Построитель = Новый ПостроительСхемXML;
Схема = Построитель.СоздатьСхемуXML(ДокументСхемы.ЭлементДокумента);
Если Схема = Неопределено Тогда
    ВызватьИсключение "Не удалось построить учебную схему";
КонецЕсли;
Набор = Новый НаборСхемXML;
Набор.Добавить(Схема);
Если Не Набор.Проверить() Тогда
    ВызватьИсключение "Учебная XSD не прошла проверку";
КонецЕсли;
Если Схема.ОбъявленияНотаций.Количество() <> 1 Тогда
    ВызватьИсключение "Ожидалась одна собственная нотация";
КонецЕсли;
Нотация = Схема.ОбъявленияНотаций.Получить(0);
Если ТипЗнч(Нотация) <> Тип("ОбъявлениеНотацииXS") Или Нотация.Имя <> "BookImage" Тогда
    ВызватьИсключение "Не найдена собственная BookImage";
КонецЕсли;
Аннотация = Нотация.Аннотация;
Если Аннотация = Неопределено Тогда
    ВызватьИсключение "У BookImage нет собственной аннотации";
КонецЕсли;
Если Аннотация.Документация.Количество() <> 1 Тогда
    ВызватьИсключение "Ожидалась одна собственная документация нотации";
КонецЕсли;
Документация = Аннотация.Документация.Получить(0);
Сообщить(Документация.Источник = "urn:guide:notation-note");
Сообщить(Документация.Язык = "ru");
Сообщить(Документация.Контейнер = Аннотация);
Сообщить(Не Документация.Содержит(Аннотация));
КопияАннотации = Аннотация.КлонироватьКомпоненту(Истина);
Если ТипЗнч(КопияАннотации) <> Тип("АннотацияXS") Тогда
    ВызватьИсключение "Не получена копия своей аннотации";
КонецЕсли;
Если КопияАннотации.Документация.Количество() <> 1 Тогда
    ВызватьИсключение "В копии ожидалась одна документация";
КонецЕсли;
КопияДокументации = КопияАннотации.Документация.Получить(0);
КопияДокументации.Источник = "urn:guide:notation-note:copy";
КопияДокументации.Язык = "en";
Сообщить(КопияАннотации.Содержит(КопияДокументации));
Сообщить(Не Аннотация.Содержит(КопияАннотации));
Сообщить(Документация.Источник = "urn:guide:notation-note");
Сообщить(Документация.Язык = "ru");
ОтдельнаяКопия = Документация.КлонироватьКомпоненту(Истина);
Если ТипЗнч(ОтдельнаяКопия) <> Тип("ДокументацияXS") Тогда
    ВызватьИсключение "Не получена отдельная копия документации";
КонецЕсли;
ОтдельнаяКопия.Язык = "de";
Сообщить(Документация.Язык = "ru");
Сообщить(Не Документация.Содержит(ОтдельнаяКопия));

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

1. Документация принадлежит аннотации, но сама не содержит своего родителя; направление Содержит важно.

2. Рекурсивная копия аннотации проверяется по типу и количеству документации до индекса 0.

3. Новый язык en не переводит текст автоматически. Источник copy — только собственная метка.

4. Меняются только скалярные свойства дочернего объекта копии. Проверяется сохранность исходных ru и source.

5. Отдельное клонирование ДокументацияXS тоже не присоединяет результат к исходной аннотации.

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

1. Десять сообщений Истина.

2. Исходная документация остаётся ru и urn:guide:notation-note; изменения копий не добавлены в схему.

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

Проверена независимость скалярных меток модели документации и направление владения.

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

1. Язык — языковая метка, не механизм перевода.

2. Этот пример не обещает независимость всех DOM-узлов после клонирования и не проверяет их изменение.

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