Чтение XML

В методе ЗагрузитьКурсыВалюты() модуля Общие::КурсыВалют::КурсыВалютСервер демонстрируется разбор XML-документа с помощью типа ЧтениеXml.

знч ЧтениеXml = новый ЧтениеXml(Ответ.Тело, Кодировка = "windows-1251")
пер ТекущийИд: Строка
пер ЭтоЭлементКода: Булево
пока ЧтениеXml.Следующий()
    если ЧтениеXml.ВидУзла == ВидУзлаXml.НачалоЭлемента и ЧтениеXml.Имя == "Item"
        ТекущийИд = ЧтениеXml.ЗначениеАтрибутаПоИндексу(0)
    ;
    если ЭтоЭлементКода и ЧтениеXml.ВидУзла == ВидУзлаXml.Текст и Валюта.Код == ЧтениеXml.Значение
        Валюта.ВнешнийИдентификатор = ТекущийИд
        прервать
    ;
    ЭтоЭлементКода = ЧтениеXml.ВидУзла == ВидУзлаXml.НачалоЭлемента и ЧтениеXml.Имя == "ISO_Char_Code"
;