|
Выгрузка в YML из 1С 8.2 | ☑ | ||
---|---|---|---|---|
0
CHEBURECK
03.12.13
✎
15:58
|
Кто нибудь делал выгрузку в YML. Поделитесь опытом Плииииз
|
|||
1
МихаилМ
03.12.13
✎
16:14
|
||||
2
CHEBURECK
03.12.13
✎
16:18
|
(1) там нет ничего путного. мне бы примерный код..
|
|||
3
1sik
03.12.13
✎
16:31
|
(0)могу на почту хороший пример кинуть
|
|||
4
CHEBURECK
03.12.13
✎
16:34
|
(3) кинь пожалуйста,спасибо большое
|
|||
5
1sik
03.12.13
✎
16:37
|
Адрес не видно. captcha глючит ввожу код с картинки а он не принимает.
|
|||
6
CHEBURECK
03.12.13
✎
16:38
|
||||
7
1sik
03.12.13
✎
16:43
|
Отправил
|
|||
8
CHEBURECK
04.12.13
✎
09:19
|
(7) Спасибо большое очень помогло. Оказалось все проще чем в шаблоне который яндекс предоставляет
|
|||
9
CHEBURECK
04.12.13
✎
09:20
|
СтандартнаяОбработка=ложь;
Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение); Диалог.Заголовок = "Выберите путь для сохранения прайса в xml"; Диалог.МножественныйВыбор = Ложь; Фильтр = "Текстовый файл (*.xml)|*.xml"; Диалог.Фильтр = Фильтр; Если Диалог.Выбрать() Тогда XML_Путь = Диалог.ПолноеИмяФайла; Иначе Сообщить("Не выбран путь для сохранения!"); Возврат; КонецЕсли; Попытка Файл_XML = Новый ЗаписьXML(); Файл_XML.ОткрытьФайл(XML_Путь, "windows-1251"); Исключение Сообщить("Ошибка при создание XML файла! " + Символы.ПС + ОписаниеОшибки()); КонецПопытки; Файл_XML.ЗаписатьОбъявлениеXML(); Файл_XML.ЗаписатьНачалоЭлемента("offers"); Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ..."; Запрос.УстановитьПараметр("ПроцентСкидки", СкидкаОтРозничнойЦены); Запрос.УстановитьПараметр("Подразделение", Подразделение); Запрос.УстановитьПараметр("Склады", Склады); Запрос.УстановитьПараметр("ГруппаНоменклатуры", ГруппаНоменклатуры); Запрос.УстановитьПараметр("ТипЦен", РозничнаяЦена); Запрос.УстановитьПараметр("ТекДата", ТекущаяДата()); ТЗ_З = Запрос.Выполнить().Выбрать(); Пока ТЗ_З.Следующий() цикл Файл_XML.ЗаписатьНачалоЭлемента("offer"); Файл_XML.ЗаписатьАтрибут("Производитель", Строка(ТЗ_З.БрендПодразделения)); Файл_XML.ЗаписатьАтрибут("Артикул", Строка(ТЗ_З.Артикул)); Файл_XML.ЗаписатьАтрибут("Наименование", Строка(ТЗ_З.Наименование)); Файл_XML.ЗаписатьАтрибут("Количество",Строка(ТЗ_З.Количество)); Файл_XML.ЗаписатьАтрибут("Цена", Строка(ТЗ_З.Цена)); Файл_XML.ЗаписатьКонецЭлемента(); КонецЦикла; Файл_XML.ЗаписатьКонецЭлемента(); Файл_XML.Закрыть(); |
|||
10
Eeelena
23.12.13
✎
20:07
|
всем здравствуйте. не могли бы вы мне тоже скинуть такой пример. очень нужно
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |