gifts2017

Выгрузка остатков и цен в SuperMag Plus

Опубликовал Нет Нет (dimens) в раздел Обмен - Обмен через XML

Выгрузка остатков и цен в SuperMag Plus по документу Инвентаризация из конфигурации Астор:Торговый Дом 5.х через XML файл.

Выгрузка остатков и цен в программу SuperMag Plus сделана по XML формату SM Plus для Карточки товара и документов Приходная накладная, Акт переоценки.

Скачать файлы

Наименование Файл Версия Размер Кол. Скачив.
Выгрузка остатков
.ert 49,00Kb
20.10.11
13
.ert 49,00Kb 13 Скачать
Выгрузка розничных цен
.ert 49,00Kb
20.10.11
4
.ert 49,00Kb 4 Скачать

См. также

Подписаться Добавить вознаграждение

Комментарии

1. Александр Журавлёв (Djun) 20.10.11 18:51
Может загрузка из SM+ в бухгалтерию еще есть? :)
2. Олег Кулабухов (kirillich) 21.10.11 12:55
3. Нет Нет (dimens) 05.11.11 23:35
Выгрузку в Бухгалтерию 8-ки пока не делал.
Пока есть обмен с базой 7-ки.
Вот пример запроса (автор не я):
соединение = Новый COMОбъект ("OracleInProcServer.XOraSession");
МоеСоединение=Соединение.OpenDatabase("Имя_базы","supermag/qqq",0 );
ТекстЗапроса="select d.id,
|d.createdat,
|w.supplierdoc, w.supplierinvoice, w.supplinvoicecreate,
|d.clientindex,cl.inn, d.locationto
|from smwaybillsin w, smdocuments d, smclientinfo cl
|where d.createdat between :data1 and :data2
| and d.docstate=3
| and d.doctype ='WI'
| AND w.doctype='WI'
| and d.opcode=0
| and d.userop is null
| and d.id=w.id
| and d.clientindex=cl.id";
МоеСоединение.Parameters.Add ("Data1",ДатаНач,1);
МоеСоединение.Parameters.Add ("Data2",ДатаКон,1);
НаборЗаписей=МоеСоединение.CreateDynaset(ТекстЗапроса,0);
если НаборЗаписей.RecordCount()<>0 тогда
пока не НаборЗаписей.EOF() цикл
Строка=Накладные.Добавить();
Строка.ID=НаборЗаписей.Fields("ID").Value;
// Здесь пишешь код создания и определения полей документов
конеццикла;
конецесли;
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа