ДанныеНакладной = Новый ТаблицаЗначений();
ДанныеНакладной.Колонки.Добавить("НоменклатураАртикул");
ДанныеНакладной.Колонки.Добавить("Количество");
ДанныеНакладной.Колонки.Добавить("Цена");
Для Каждого Стр Из Товары Цикл
Если Стр.Номенклатура.Артикул = "" Тогда
Сообщить ("Внимание! В номенклатуре " + Стр.Номенклатура + " не определен артикул.");
Иначе
СтрокаТЗ = ДанныеНакладной.Добавить();
СтрокаТЗ.НоменклатураАртикул = Стр.Номенклатура.Артикул;
СтрокаТЗ.Количество = Стр.Количество;
СтрокаТЗ.Цена = Стр.Цена;
КонецЕсли;
КонецЦикла;
Сериализатор = Новый СериализаторXDTO(ФабрикаXDTO);
XML = Новый ЗаписьXML;
ИмяФайла = "" + КРВ_ВспомогательныеФункции.УбратьНули(Номер)
+ " - " + КРВ_ВспомогательныеФункции.УбратьНедопустимыеСимволы(Контрагент);
XML.ОткрытьФайл("d:\1C_DATA\ОБМЕН\" + ИмяФайла + ".xml");
Сериализатор.ЗаписатьXML(XML, ДанныеНакладной);
Получить выделенные строки списка (с сохранением выделения)
Транспонировать таблицу значений
Ищу процедуру для сохранения МВТ в файл, и последующей загрузки из файла
НастройкиФорматовСохраненияТабличногоДокумента (БСП)
ЗаполнитьТаблицуЗначений (БСП)
Дополнить таблицу значений - приемника данными из таблицы значений - источника