Xml 1С8

@ysh · Регистрация: 21.01.2009

Author24 — интернет-сервис помощи студентам

помогите с выгрузкой прайс листа в хмл 1С 8.1. УТ.
Может кто делал уже??

@umkmowm181538 · 02.08.2009, 17:14

В типовой УТ есть выгрузка в формате CommerceML.
Вот код для выгрузки всей номенклатуры:
[codebox] Каталог="C:\Temp";
ИмяФайла=Каталог+?(Прав(Каталог,1)="\","","\")+"sklad.xml";
ЗаписьХМЛ=Новый ЗаписьXML;
ЗаписьХМЛ.ОткрытьФайл(ИмяФайла);
ЗаписьХМЛ.ЗаписатьОбъявлениеXML();
Выборка = Справочники.Номенклатура.Выбрать();
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("Root");
Пока Выборка.Следующий() Цикл
ЗаписатьXML(ЗаписьХМЛ,Выборка.ПолучитьОбъект());
КонецЦикла;
ЗаписьХМЛ.ЗаписатьКонецЭлемента();
ЗаписьХМЛ.Закрыть();
[/codebox]
Вам же, наверное, нужно выгружать отдельные реквизиты.

@ysh · 02.08.2009, 17:50

Спасибо! Но как мне сделать чтобы выгружались отдельные реквизиты, например, меня интересует
Наименование
Категория
Производитель
колво на складе
цена

@ysh · 02.08.2009, 19:06

Пока Выборка.Следующий() Цикл
Объект = Выборка.ПолучитьОбъект();
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("item");
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("id");
ЗаписьХМЛ.ЗаписатьТекст(Объект.Наименование);
ЗаписьХМЛ.ЗаписатьКонецЭлемента();
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("category");
ЗаписьХМЛ.ЗаписатьТекст(Объект.Артикул);
ЗаписьХМЛ.ЗаписатьКонецЭлемента();
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("vendor");
ЗаписьХМЛ.ЗаписатьТекст(Объект.СтранаПроисхождения);
ЗаписьХМЛ.ЗаписатьКонецЭлемента();
КонецЦикла;

Сделал так, на "Объект.Наименование" не ругаеться, а на Артикул и СтрануПроисхождения ошибка
{Форма.Форма(68)}: Ошибка при вызове метода контекста (ЗаписатьТекст): Несоответствие типов (параметр номер 1)
ЗаписьХМЛ.ЗаписатьТекст(Объект.Артикул);

@umkmowm181538 · 03.08.2009, 00:28

Каталог="C:\Temp";
ИмяФайла=Каталог+?(Прав(Каталог,1)="\","","\")+"sklad.xml";
ЗаписьХМЛ=Новый ЗаписьXML;
ЗаписьХМЛ.ОткрытьФайл(ИмяФайла);
ЗаписьХМЛ.ЗаписатьОбъявлениеXML();
Выборка = Справочники.Номенклатура.Выбрать();
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("Root");
Пока Выборка.Следующий() Цикл
если выборка.ЭтоГруппа Тогда
продолжить;
КонецЕсли;
Объект = Выборка.ПолучитьОбъект();
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("item");
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("id");
ЗаписьХМЛ.ЗаписатьТекст(Объект.Наименование);
ЗаписьХМЛ.ЗаписатьКонецЭлемента();
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("category");
ЗаписьХМЛ.ЗаписатьТекст(Объект.Артикул);
ЗаписьХМЛ.ЗаписатьКонецЭлемента();
ЗаписьХМЛ.ЗаписатьНачалоЭлемента("vendor");
ЗаписьХМЛ.ЗаписатьТекст(Объект.СтранаПроисхождения.Наименование);
ЗаписьХМЛ.ЗаписатьКонецЭлемента();
ЗаписьХМЛ.ЗаписатьКонецЭлемента();
КонецЦикла;
ЗаписьХМЛ.ЗаписатьКонецЭлемента();
ЗаписьХМЛ.Закрыть();

@ysh · 03.08.2009, 11:41

Точно дело в группе)). А не подскажите, как получить остаток по товару и его цену розничную??

@umkmowm181538 · 03.08.2009, 16:56

Запускаем конструктор запроса, выбираем нужные таблицы... левое соедиенение.... Но... это стандартная задача, которая гораздо луше описана в любой книжке.

@ysh · 03.08.2009, 18:00

Не найду какой регистр хранит ТипЦен (розничный нужен)??

@umkmowm181538 · 03.08.2009, 18:17

Регистр сведений "ЦеныНоменклатуры" с отбором по измерению "ТипЦен".

@ysh · 03.08.2009, 18:50

Сообщение от unknown181538

Регистр сведений "ЦеныНоменклатуры" с отбором по измерению "ТипЦен".

извиняюсь за тупые вопросы, но остаток я получаю из Регистра накопления ТоварыОрганизацийОстатки, а ТипЦен из ЦеныНоменклатуры.
Как мне все это можно совместить, чтобы вывести одним отчетом?? Спасибо!

@umkmowm181538 · 03.08.2009, 19:06

Сначала определитесь, нужно ли вам выводить в отчет позиции, по которым нет остатков или цен.
Затем выбираете соответственные таблицы.
Например:
Справочник.Номенклатура
РегистрНакопления.ТоварыОрганизацииОстатки
РегистрСведений.ЦеныНоменклатуры

Соединения
Левое спровочника с остатками по номенклатура
Левое спровочника с ценами по номенклатура

@ysh · 05.08.2009, 13:48

--

@umkmowm181538 · 05.08.2009, 14:14

А типы цен одинаковые выводятся?
Возможно остатки с разных складов... но так вроде не должно быть...

@ysh · 05.08.2009, 14:52

Сообщение от unknown181538

А типы цен одинаковые выводятся?
Возможно остатки с разных складов... но так вроде не должно быть...

Да фильтранул по рознице, выводит только розничные. Дело в том , что запустил стандартную ПечатьПрайса и остатки не сходяться

Мда...виноват, все таки в разрезе склада необходимо, спасибо!

@ysh · 06.08.2009, 16:26

тему можно закрывать

@ysh 0 / 0 / 0 Регистрация: 21.01.2009 Сообщений: 133
	03.08.2009, 18:50	10
	Сообщение от unknown181538 Регистр сведений "ЦеныНоменклатуры" с отбором по измерению "ТипЦен". извиняюсь за тупые вопросы, но остаток я получаю из Регистра накопления ТоварыОрганизацийОстатки, а ТипЦен из ЦеныНоменклатуры. Как мне все это можно совместить, чтобы вывести одним отчетом?? Спасибо! 0

@ysh 0 / 0 / 0 Регистрация: 21.01.2009 Сообщений: 133
	05.08.2009, 13:48	12
	-- 0

@ysh 0 / 0 / 0 Регистрация: 21.01.2009 Сообщений: 133
		1
	Xml 1С8 02.08.2009, 15:42. Показов 32998. Ответов 14 Метки нет (Все метки) помогите с выгрузкой прайс листа в хмл 1С 8.1. УТ. Может кто делал уже?? 0

@umkmowm181538 0 / 0 / 0 Регистрация: 24.12.2008 Сообщений: 1,399
	02.08.2009, 17:14	2
	В типовой УТ есть выгрузка в формате CommerceML. Вот код для выгрузки всей номенклатуры: [codebox] Каталог="C:\Temp"; ИмяФайла=Каталог+?(Прав(Каталог,1)="\","","\")+"sklad.xml"; ЗаписьХМЛ=Новый ЗаписьXML; ЗаписьХМЛ.ОткрытьФайл(ИмяФайла); ЗаписьХМЛ.ЗаписатьОбъявлениеXML(); Выборка = Справочники.Номенклатура.Выбрать(); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("Root"); Пока Выборка.Следующий() Цикл ЗаписатьXML(ЗаписьХМЛ,Выборка.ПолучитьОбъект()); КонецЦикла; ЗаписьХМЛ.ЗаписатьКонецЭлемента(); ЗаписьХМЛ.Закрыть(); [/codebox] Вам же, наверное, нужно выгружать отдельные реквизиты. 0

@ysh 0 / 0 / 0 Регистрация: 21.01.2009 Сообщений: 133
	02.08.2009, 17:50	3
	Спасибо! Но как мне сделать чтобы выгружались отдельные реквизиты, например, меня интересует Наименование Категория Производитель колво на складе цена 0

@ysh 0 / 0 / 0 Регистрация: 21.01.2009 Сообщений: 133
	02.08.2009, 19:06	4
	Пока Выборка.Следующий() Цикл Объект = Выборка.ПолучитьОбъект(); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("item"); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("id"); ЗаписьХМЛ.ЗаписатьТекст(Объект.Наименование); ЗаписьХМЛ.ЗаписатьКонецЭлемента(); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("category"); ЗаписьХМЛ.ЗаписатьТекст(Объект.Артикул); ЗаписьХМЛ.ЗаписатьКонецЭлемента(); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("vendor"); ЗаписьХМЛ.ЗаписатьТекст(Объект.СтранаПроисхождения); ЗаписьХМЛ.ЗаписатьКонецЭлемента(); КонецЦикла; Сделал так, на "Объект.Наименование" не ругаеться, а на Артикул и СтрануПроисхождения ошибка {Форма.Форма(68)}: Ошибка при вызове метода контекста (ЗаписатьТекст): Несоответствие типов (параметр номер 1) ЗаписьХМЛ.ЗаписатьТекст(Объект.Артикул); 0

@umkmowm181538 0 / 0 / 0 Регистрация: 24.12.2008 Сообщений: 1,399
	03.08.2009, 00:28	5
	Каталог="C:\Temp"; ИмяФайла=Каталог+?(Прав(Каталог,1)="\","","\")+"sklad.xml"; ЗаписьХМЛ=Новый ЗаписьXML; ЗаписьХМЛ.ОткрытьФайл(ИмяФайла); ЗаписьХМЛ.ЗаписатьОбъявлениеXML(); Выборка = Справочники.Номенклатура.Выбрать(); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("Root"); Пока Выборка.Следующий() Цикл если выборка.ЭтоГруппа Тогда продолжить; КонецЕсли; Объект = Выборка.ПолучитьОбъект(); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("item"); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("id"); ЗаписьХМЛ.ЗаписатьТекст(Объект.Наименование); ЗаписьХМЛ.ЗаписатьКонецЭлемента(); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("category"); ЗаписьХМЛ.ЗаписатьТекст(Объект.Артикул); ЗаписьХМЛ.ЗаписатьКонецЭлемента(); ЗаписьХМЛ.ЗаписатьНачалоЭлемента("vendor"); ЗаписьХМЛ.ЗаписатьТекст(Объект.СтранаПроисхождения.Наименование); ЗаписьХМЛ.ЗаписатьКонецЭлемента(); ЗаписьХМЛ.ЗаписатьКонецЭлемента(); КонецЦикла; ЗаписьХМЛ.ЗаписатьКонецЭлемента(); ЗаписьХМЛ.Закрыть(); 0

@ysh 0 / 0 / 0 Регистрация: 21.01.2009 Сообщений: 133
	03.08.2009, 11:41	6
	Точно дело в группе)). А не подскажите, как получить остаток по товару и его цену розничную?? 0

@umkmowm181538 0 / 0 / 0 Регистрация: 24.12.2008 Сообщений: 1,399
	03.08.2009, 16:56	7
	Запускаем конструктор запроса, выбираем нужные таблицы... левое соедиенение.... Но... это стандартная задача, которая гораздо луше описана в любой книжке. 0

@ysh 0 / 0 / 0 Регистрация: 21.01.2009 Сообщений: 133
	03.08.2009, 18:00	8
	Не найду какой регистр хранит ТипЦен (розничный нужен)?? 0

@umkmowm181538 0 / 0 / 0 Регистрация: 24.12.2008 Сообщений: 1,399
	03.08.2009, 18:17	9
	Регистр сведений "ЦеныНоменклатуры" с отбором по измерению "ТипЦен". 0

@umkmowm181538 0 / 0 / 0 Регистрация: 24.12.2008 Сообщений: 1,399
	03.08.2009, 19:06	11
	Сначала определитесь, нужно ли вам выводить в отчет позиции, по которым нет остатков или цен. Затем выбираете соответственные таблицы. Например: Справочник.Номенклатура РегистрНакопления.ТоварыОрганизацииОстатки РегистрСведений.ЦеныНоменклатуры Соединения Левое спровочника с остатками по номенклатура Левое спровочника с ценами по номенклатура 0

	06.08.2009, 16:26

@umkmowm181538 0 / 0 / 0 Регистрация: 24.12.2008 Сообщений: 1,399
	05.08.2009, 14:14	13
	А типы цен одинаковые выводятся? Возможно остатки с разных складов... но так вроде не должно быть... 0

@ysh 0 / 0 / 0 Регистрация: 21.01.2009 Сообщений: 133
	05.08.2009, 14:52	14
	Сообщение от unknown181538 А типы цен одинаковые выводятся? Возможно остатки с разных складов... но так вроде не должно быть... Да фильтранул по рознице, выводит только розничные. Дело в том , что запустил стандартную ПечатьПрайса и остатки не сходяться Мда...виноват, все таки в разрезе склада необходимо, спасибо! 0

@ysh 0 / 0 / 0 Регистрация: 21.01.2009 Сообщений: 133
	06.08.2009, 16:26	15
	тему можно закрывать 0