<?xml version="1.0" encoding="UTF-8" ?>
- <Корневой Докумен="НарядЗаказ">
- <ЭлементДокументаНарядЗаказ>
<НомерЗаказа>125/5</НомерЗаказа>
<Дата>22.11.2012 23:08:44</Дата>
<ТипИзделия>ПШ встроенный две двери горизонтальные</ТипИзделия>
</ЭлементДокументаНарядЗаказ>
- <ЭлементДокументаНарядЗаказ>
<НомерЗаказа>125/6</НомерЗаказа>
<Дата>30.11.2012 11:35:25</Дата>
<ТипИзделия>ПШ встроенный две двери горизонтальные</ТипИзделия>
</ЭлементДокументаНарядЗаказ>
- <ЭлементДокументаНарядЗаказ>
<НомерЗаказа>125/7</НомерЗаказа>
<Дата>01.12.2012 12:00:00</Дата>
<ТипИзделия>ПШ встроенный две двери горизонтальные</ТипИзделия>
</ЭлементДокументаНарядЗаказ>
</Корневой>
Нужно присвоить значения списку. Что я не так делаю?
Процедура ПрочитатьXMLфайл(файлик)
//
ПутьКфайлу=файлик[0];
Чтение = Новый ЧтениеXML;
Чтение.ОткрытьФайл(ПутьКФайлу);
СЗ= Новый СписокЗначений;
Пока Чтение.Прочитать() Цикл
Если Чтение.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда
Чтение.ПрочитатьАтрибут()
ИначеЕсли Чтение.ТипУзла = ТипУзлаXML.Текст Тогда
Если Чтение.Имя ="НомерЗаказа" Тогда
СЗ.Добавить(Чтение.Значение);
КонецЕсли;
// Сообщить("Текст:" + СЗ.Добавить(Чтение.Значение));
Если Чтение.Имя ="Дата" Тогда
СЗ.Добавить(Чтение.Значение);
//Сообщить("Текст:" + СЗ.Добавить(Чтение.Значение));
КонецЕсли;
Если Чтение.Имя ="ТипИзделия" Тогда
СЗ.Добавить(Чтение.Значение);
//Сообщить("Текст:" + СЗ.Добавить(Чтение.Значение));
КонецЕсли;
ИначеЕсли Чтение.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда
// Сообщить("--Конец:" + Чтение.Имя);
КонецЕсли;
КонецЦикла;
ВывестиЗначения(СЗ);