Как выгрузить Таблицу Значений в XML Код 1C v 8.х Функция ВыгрузитьТЗ_в_XML(пТЗ,пФайлИмя)
ЗаписьXML = Новый ЗаписьXML;
ЗаписьXML. ОткрытьФайл( пФайлИмя) ;
ЗаписьXML. ЗаписатьОбъявлениеXML( ) ;
ЗаписьXML. ЗаписатьНачалоЭлемента( "Root" ) ;
Для А= 0 По пТЗ. Количество( ) - 1 Цикл
ЗаписьXML. ЗаписатьНачалоЭлемента( "item" ) ;
Для Каждого Колонка Из пТЗ. Колонки Цикл
ИмяАтрибута= Колонка. Имя;
ЗначениеАтрибута= пТЗ[А][Колонка. Имя];
ЗаписьXML. ЗаписатьАтрибут( ИмяАтрибута, Строка( ЗначениеАтрибута) ) ;
КонецЦикла ;
ЗаписьXML. ЗаписатьКонецЭлемента( ) ;
КонецЦикла ;
ЗаписьXML. ЗаписатьКонецЭлемента( ) ;
ЗаписьXML. Закрыть( ) ;
КонецФункции
Категория:
Работа с Таблицей Значений Как можно сформировать XML-документ произвольной структуры? Используется модель последовательного доступа (работа осуществляется только с одним текущим узлом):
Код 1C v 8.х Запись = Новый ЗаписьXML;
Запись. ОткрытьФайл( ПутьКФайлу) ;
Запись. ЗаписатьОбъявлениеXML( ) ;
Запись. ЗаписатьНачалоЭлемента( "Корневой" ) ;
Запись. ЗаписатьАтрибут( "Справочник" , "Номенклатура" ) ;
Запись. ЗаписатьКомментарий( "Краткая информация о номенклатуре" ) ;
Выборка = Справочники. Номенклатура. ВыбратьИерархически( ) ;
Пока Выборка. Следующий( ) Цикл
Если Выборка. ЭтоГруппа Тогда
Продолжить;
КонецЕсли ;
Запись. ЗаписатьНачалоЭлемента( "Элемент" ) ;
Запись. ЗаписатьАтрибут( "Код" , Строка( Выборка. Код) ) ;
Запись. ЗаписатьАтрибут( "Артикул" , Строка( Выборка. Артикул) ) ;
Запись. ЗаписатьТекст( Выборка. Наименование) ;
Запись. ЗаписатьКонецЭлемента( ) ;
КонецЦикла ;
Запись. ЗаписатьКонецЭлемента( ) ;
Запись. Закрыть( ) ;
В результате будет получен файл вида
Код <НачалоЭлемента
ИмяАтрибута = Значение ИмяАтрибута = Значение......>
Текст
<КонецЭлемента>
Создание XML-документа с помощью объекта ЗаписьXML производится путем помещения в строгой последовательности (иначе будет нарушена структура) «частей» узлов.
Категория:
JSON, XML, TXT, CSV, DBF