Как прочитать XML файл

Процедура ПримерЗаписи()
	
	Выборка = запрос.Выполнить().Выбрать();
	
	СписокНоменклатуры = новый Массив;

	Пока Выборка.Следующий() Цикл
		
		//Каждую номенклатуру помещаем в струткуру
		ДанныеНоменклатуры = новый Структура("Код, Наименование, Ссылка, ЭтоГруппа, Родитель",
		 						Выборка.Код, Выборка.Наименование,XMLСтрока(Выборка.Ссылка),Выборка.ЭтоГруппа,); 
								
		//Если есть родитель, то создаем рекурсивно родителя
		Если НЕ Выборка.Родитель.Пустая() Тогда
			ДанныеНоменклатуры.Родитель =  ДобавитьРодителей(Выборка.Ссылка.Родитель);
		КонецЕсли;
	
		СписокНоменклатуры.Добавить(ДанныеНоменклатуры);
	
	КонецЦикла;
	
	Запись = Новый ЗаписьXML;
	Запись.УстановитьСтроку(); 
	
	//Преобразуем массив в объект XDTO
	МассивВОбъектеXDTO = СериализаторXDTO.ЗаписатьXDTO(СписокНоменклатуры);
	
	//Записываем объект XDTO в XML строку
	ФабрикаXDTO.ЗаписатьXML(Запись, МассивВОбъектеXDTO); 
	
	ДанныеXML = Запись.Закрыть(); // документ готов!
	
	
КонецПроцедуры

Функция ДобавитьРодителей(Родитель)
	
	ДанныеРодителя = новый Структура("Код, Наименование, Ссылка, ЭтоГруппа, Родитель",
		 						Родитель.Код, Родитель.Наименование,XMLСтрока(Родитель.Ссылка),Родитель.ЭтоГруппа,);

	Если НЕ Родитель.Родитель.Пустая() Тогда
		ДанныеРодителя.Родитель = ДобавитьРодителей(Родитель.Родитель);
	КонецЕсли;
	
	Возврат ДанныеРодителя;
КонецФункции

Процедура ПримерЧтения()
	
	ТекстXML  = ТвойТекстВХМL;   
	
	ЧтениеXML = новый ЧтениеXML;
	ЧтениеXML.УстановитьСтроку(ТекстXML);
		
	МассивНоменклатуры = СериализаторXDTO.ПрочитатьXML(ЧтениеXML);
	
	
	Для каждого Стр из МассивНоменклатуры Цикл
		
		Номенклатура = СоздатьНоменклатуру(Стр);
		
	КонецЦикла;  
	

КонецПроцедуры

Функция СоздатьНоменклатуру(ДанныеНоменклатуры)   
	
	///Проверка на существование ссылки. Если ссылка найдена, пропускаем.
	СсылкаНоменклатуры = XMLЗначение(Тип("СправочникСсылка.Номенклатура"),ДанныеНоменклатуры.Ссылка);  
	
	/// проверяем по реквизиту "ВерсияДанных"
	Если НЕ ЗначениеЗаполнено(СсылкаНоменклатуры.ВерсияДанных) Тогда   
		
		Если ДанныеНоменклатуры.ЭтоГруппа Тогда
			СПР = Справочники.Номенклатура.СоздатьГруппу();
		Иначе
			СПР = Справочники.Номенклатура.СоздатьЭлемент();    
		КонецЕсли;  
		СПР.УстановитьСсылкуНового(СсылкаНоменклатуры);
	Иначе
		
		СПР 				= СсылкаНоменклатуры.ПолучитьОбъект(); 
	КонецЕсли;

	СПР.Код 			= ДанныеНоменклатуры.Код;     
	СПР.Наименование 	= ДанныеНоменклатуры.Наименование; 
		
	///Если есть родитель, сначала нужно создать родителя, и так до самого корня начала
	Если ДанныеНоменклатуры.Родитель <> Неопределено Тогда
		СПР.Родитель 		= СоздатьНоменклатуру(ДанныеНоменклатуры.Родитель);	
	КонецЕсли;
					
	СПР.Записать();
					
	Возврат СПР.Ссылка;
  		
КонецФункции  

ЧтениеXML = Новый ЧтениеXML;
ЧтениеXML.ОткрытьФайл(ПолеИмениФайла);
фабрика = Новый ФабрикаXDTO;
ДокументXDTO = фабрика.ПрочитатьXML(ЧтениеXML);

Таблица = СсылкаДокумент.Тест.Выгрузить();
Таблица.Очистить();

Для Каждого СтрокаТЧ Из ДокументXDTO.Строка Цикл
Новаястрока = Таблица.Добавить();
КонецЦикла;