1С 8.3 Выгрузка Таблицы Значений в XML
Данные > Примеры кода 1С > 1С 8.3 XML
Перейти в раздел примеры кода 1С 8.3:
Сохранение Таблицы Значений в xml в 1С 8.3:
&НаСервере
Процедура Сохранение_ТЗ_в_XML(ТЗ)
xml_файл = "D:\vygruzka_tz.xml";
XML = Новый ЗаписьXML;
XML.ОткрытьФайл(xml_файл);
СериализаторXDTO = Новый СериализаторXDTO(ФабрикаXDTO);
СериализаторXDTO.ЗаписатьXML(XML, ТЗ);
XML.Закрыть();
КонецПроцедуры
&НаСервере
Процедура Создание_и_заполнение_ТЗ()
// Создаем таблицу значений
ТЗ = Новый ТаблицаЗначений;
// Добавляем колонки в таблицу значений
ТЗ.Колонки.Добавить("Овощь");
ТЗ.Колонки.Добавить("Цвет");
ТЗ.Колонки.Добавить("Вкус");
// Добавляем строки в таблицу значений
Стр = ТЗ.Добавить();
Стр.Овощь = "Дыня";
Стр.Цвет = "Желтая";
Стр.Вкус = "Сладкая";
Стр = ТЗ.Добавить();
Стр.Овощь = "Лук";
Стр.Цвет = "Зеленый";
Стр.Вкус = "Горький";
Стр = ТЗ.Добавить();
Стр.Овощь = "Помидор";
Стр.Цвет = "Красный";
Стр.Вкус = "Сочный";
Сохранение_ТЗ_в_XML(ТЗ);
КонецПроцедуры
Процедура Сохранение_ТЗ_в_XML(ТЗ)
xml_файл = "D:\vygruzka_tz.xml";
XML = Новый ЗаписьXML;
XML.ОткрытьФайл(xml_файл);
СериализаторXDTO = Новый СериализаторXDTO(ФабрикаXDTO);
СериализаторXDTO.ЗаписатьXML(XML, ТЗ);
XML.Закрыть();
КонецПроцедуры
&НаСервере
Процедура Создание_и_заполнение_ТЗ()
// Создаем таблицу значений
ТЗ = Новый ТаблицаЗначений;
// Добавляем колонки в таблицу значений
ТЗ.Колонки.Добавить("Овощь");
ТЗ.Колонки.Добавить("Цвет");
ТЗ.Колонки.Добавить("Вкус");
// Добавляем строки в таблицу значений
Стр = ТЗ.Добавить();
Стр.Овощь = "Дыня";
Стр.Цвет = "Желтая";
Стр.Вкус = "Сладкая";
Стр = ТЗ.Добавить();
Стр.Овощь = "Лук";
Стр.Цвет = "Зеленый";
Стр.Вкус = "Горький";
Стр = ТЗ.Добавить();
Стр.Овощь = "Помидор";
Стр.Цвет = "Красный";
Стр.Вкус = "Сочный";
Сохранение_ТЗ_в_XML(ТЗ);
КонецПроцедуры
0
комментарии
____________________
Перепечатка текста и фотографий разрешена при наличии прямой ссылки на источник