Загрузка из XML в справочник Номенклатура

Question

Здравствуйте, Уважаемое сообщество.
Так вышло, что через много лет приходится вновь погружаться в программирование 1С.
У меня есть задача загрузить из XML файла определённой структуры

XML файл

<?xml version="1.0" encoding="utf-8" standalone="yes"?>

<data>
<tires>
<cae>PXR0033103</cae>
<price_sk3>11029</price_sk3>
<price_sk3_rozn>12350</price_sk3_rozn>
<name>245/40R17 91S Blizzak VRX</name>
<tiretype>Легковая</tiretype>

Bridgestone</brand>
<model>Blizzak VRX</model>
<width>245</width>
<height>40</height>
<diameter>R17</diameter>
<diametr_out>0</diametr_out>
<design>R</design>
<speed_index>S</speed_index>
<load_index>91</load_index>
<season>Зимняя</season>
</tires>
<tires>
<cae>NW00102</cae>
<price_sk3>6569</price_sk3>
<price_sk3_rozn>7355</price_sk3_rozn>
<name>265/60R18 114T Therma Spike TL (шип.)</name>
<tiretype>Легковая</tiretype>

Nitto</brand>
<model>Therma Spike</model>
<width>265</width>
<height>60</height>
<diameter>R18</diameter>
<diametr_out>0</diametr_out>
<design>R</design>
<speed_index>T</speed_index>
<load_index>114</load_index>
<thorn>Да</thorn>
<season>Зимняя</season>
</tires>
<tires>
<cae>100A1574</cae>
<price_sk3>4510</price_sk3>
<price_sk3_rozn>5002</price_sk3_rozn>
<name>225/50R16 96W Champiro UHP1</name>
<tiretype>Легковая</tiretype>

GT Radial</brand>
<model>Champiro UHP1</model>
<width>225</width>
<height>50</height>
<diameter>R16</diameter>
<diametr_out>0</diametr_out>
<design>R</design>
<speed_index>W</speed_index>
<load_index>96</load_index>
<season>Летняя</season>
</tires>
<camera>
<cae>125603</cae>
<price_mkrs>271</price_mkrs>

Michelin</brand>
<name>Michelin Chambre Scooter</name>
</camera>
<camera>
<cae>733003</cae>
<price_mkrs>244</price_mkrs>

Michelin</brand>
<name>Michelin Chambre Scooter</name>
</camera>
<camera>
<cae>788345</cae>
<price_mkrs>261</price_mkrs>

Michelin</brand>
<name>Michelin Chambre Road</name>
</camera>
<rims>
<cae>WHS140401</cae>
<price_sk3>6678</price_sk3>
<price_sk3_rozn>7528</price_sk3_rozn>
<name>8x19/5x120 ET30 D72,6 MODEL-58 B+R</name>

Yokatta</brand>
<model>MODEL-58</model>
<color>B+R</color>
<width>8</width>
<diameter>19</diameter>
<bolts_count>5</bolts_count>
<bolts_spacing>120</bolts_spacing>
<bolts_spacing2>0</bolts_spacing2>
<et>30</et>
<dia>72.6</dia>
<img_small>http://t.ru/pictures/wheels/Yokatta/MODEL-58/small/BPlusR.png</img_small>;
</rims>
<rims>
<cae>WHS141450</cae>
<price_sk3>4474</price_sk3>
<price_sk3_rozn>5255</price_sk3_rozn>
<name>6,5x17/5x114,3 ET48 D67,1 Прайм (КС721) Алмаз черный</name>

K&K</brand>
<model>Прайм (КС721)</model>
<color>Алмаз черный</color>
<width>6.5</width>
<diameter>17</diameter>
<bolts_count>5</bolts_count>
<bolts_spacing>114.3</bolts_spacing>
<bolts_spacing2>0</bolts_spacing2>
<et>48</et>
<dia>67.1</dia>
<img_small>http://t.ru/pictures/wheels/KiK/Prajm_(KS721)/small/Almaz_chernyj.jpg</img_small>;
</rims>
<rims>
<cae>WHS140629</cae>
<price_sk3>29332</price_sk3>
<price_sk3_rozn>33630</price_sk3_rozn>
<name>8,5x20/5x120 ET30 D72,5 STC-MS Matt Black Milled</name>

Fondmetal</brand>
<model>STC-MS</model>
<color>Matt Black Milled</color>
<width>8.5</width>
<diameter>20</diameter>
<bolts_count>5</bolts_count>
<bolts_spacing>120</bolts_spacing>
<bolts_spacing2>0</bolts_spacing2>
<et>30</et>
<dia>72.5</dia>
<img_small>http://t.ru/pictures/wheels/Fondmetal/STC-MS/small/Matt_Black_Milled.png</img_small>;
</rims>
<rims>
<cae>WHS149402</cae>
<price_sk4>11025</price_sk4>
<price_sk4_rozn>12789</price_sk4_rozn>
<name>8,5x20/5x150 ET58 D110,1 TY242 SF (пш)</name>

Replay</brand>
<model>TY242</model>
<color>SF</color>
<width>8.5</width>
<diameter>20</diameter>
<bolts_count>5</bolts_count>
<bolts_spacing>150</bolts_spacing>
<bolts_spacing2>0</bolts_spacing2>
<et>58</et>
<dia>110.1</dia>
<mount>пш</mount>
<mount_note>прессшайба</mount_note>
<img_small>http://t.ru/pictures/wheels/Replay/TY242/small/SF.png</img_small>;
</rims>
<fastener>
<cae>OGS083174</cae>
<price_mkrs>80</price_mkrs>
<price>100</price>

Replay</brand>
<name>Вставка унифицированная C570 метал.сф.стикер</name>
<sub_type>Вставки/стикеры</sub_type>
</fastener>
<fastener>
<cae>OGS129366</cae>
<price_mkrs>30</price_mkrs>
<price>34</price>

LS</brand>
<name>Болт M14x1,25 (55/ 28) hex17 конус CH (КИТАЙ) 966-08</name>
<sub_type>Болты</sub_type>
</fastener>
<fastener>
<cae>OGS129368</cae>
<price_mkrs>35</price_mkrs>
<price>40</price>

LS</brand>
<name>Болт M14x1,5 (62/ 35) hex17 конус CH (КИТАЙ) 984</name>
<sub_type>Болты</sub_type>
</fastener>
<spare_parts>
<cae>OGS145879</cae>
<price_mkrs>1973</price_mkrs>

-</brand>
<name>AM 7Jx16H2 5x112 ET-35</name>
</spare_parts>
<spare_parts>
<cae>OGS146216</cae>
<price_mkrs>1653</price_mkrs>

-</brand>
<name>C 7,25Jx15H2 5x112 ET-35</name>
</spare_parts>
<spare_parts>
<cae>OGS146227</cae>
<price_mkrs>1336</price_mkrs>

-</brand>
<name>RC-04 7Jx15H2 5x112 ET-38</name>
</spare_parts>
</data>

данные в Справочники.Номенклатура
Есть следующая ВнешняяОбработка с таким кодом

Процедура КнопкаВыполнитьНажатие(Кнопка)
    ЧтениеXML = Новый ЧтениеXML;
    ЧтениеXML.ОткрытьФайл("F:\4P\M13714small.xml");
    Имя = ЧтениеXML.Имя;
    Массив = Новый Структура(Имя);                                                     
    Пока ЧтениеXML.Прочитать() Цикл                  
        ПолучитьXMLТип(ЧтениеXML);
        Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента  Тогда
                        
            Имя = ЧтениеXML.Имя;
            
            Сообщить("Начало " + ЧтениеXML.Имя);
            Пока ЧтениеXML.ПрочитатьАтрибут() Цикл
                Атрибут = ЧтениеXML.Значение;
                Сообщить("атрибут:" + ЧтениеXML.Имя + "=" + ЧтениеXML.Значение);
            КонецЦикла;
        КонецЕсли;
        
        Если ЧтениеXML.ТипУзла = ТипУзлаXML.Текст Тогда
            Массив.Вставить(Имя,ЧтениеXML.Значение);
            Сообщить(ЧтениеXML.Значение);
        КонецЕсли;
    
        Если ЧтениеXML.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда
            Если ЧтениеXML.Имя = "ЭлементСправочника" Тогда
            ДобавитьЭлемент(Массив);
            КонецЕсли;
            Сообщить("Конец " + ЧтениеXML.Имя);
        КонецЕсли;
    КонецЦикла;
    КонецПроцедуры

Процедура ДобавитьЭлемент(Массив)
    НовыйЭлемент = Справочники.Номенклатура.СоздатьЭлемент();
        НовыйЭлемент.Артикул = Массив.cae;
        НовыйЭлемент.Наименование = Массив.name;
	НовыйЭлемент.Brand = Массив.brand;
	НовыйЭлемент.Владелец =	Массив.tiretype;
        НовыйЭлемент.Model = Массив.model;
        НовыйЭлемент.Width = Массив.width;
	НовыйЭлемент.Height = Массив.height;
	НовыйЭлемент.Diameter = Массив.diameter;
	НовыйЭлемент.Diameter_out = Массив.diametr_out;
	НовыйЭлемент.Design = Массив.design;
	НовыйЭлемент.SpeedIndex = Массив.speed_index;
	НовыйЭлемент.LoadIndex = Массив.load_index;
	НовыйЭлемент.Season = Массив.season;
	НовыйЭлемент.Color = Массив.color;
	НовыйЭлемент.BoltsCount = Массив.bolts_count;
	НовыйЭлемент.BoltsSpacing = Массив.bolts_spacing;
	НовыйЭлемент.BoltsSpacing2 = Массив.bolts_spacing2;
	НовыйЭлемент.ET = Массив.et;
	НовыйЭлемент.DIA = Массив.dia;
	НовыйЭлемент.Записать();
	
	ОбновитьИнтерфейс();
КонецПроцедуры

Показать

Но единственно, что она делает это читает файл и выводит его в Служебные сообщения.
Brand, Model, Width и пр. заведены как справочники и добавлены соответствующие поля в ФормаЭлемента Справочника Номенклатуры.
Спасибо за внимание и ещё больше спасибо за помощь)

Прикрепленные файлы:

XML4P.epf
M13714small.xml

Accepted Answer

В общем обработка полностью переписана, но сам поиск по дублям сделан так
[CODE]Процедура ДобавитьЭлементRims(МассивRims)
	Для Каждого СтрокаДанных Из МассивRims Цикл
		артикул = СтрокаДанных.cae;
		Если Не ЗначениеЗаполнено(артикул) Тогда
			Продолжить;
		Иначе
			Если Справочники.Номенклатура.НайтиПоРеквизиту("артикул",артикул) = Справочники.Номенклатура.ПустаяСсылка() тогда
				НовыйЭлемент = Справочники.Номенклатура.СоздатьЭлемент();[/CODE]
Работает хорошо, создаёт быстро.