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


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

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

3 Comments

  1. Djun

    Может загрузка из SM+ в бухгалтерию еще есть? 🙂

    Reply
  2. kirillich

    Вот же, тут они есть… Форум по Супермагу

    Reply
  3. dimens

    Выгрузку в Бухгалтерию 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;

    // Здесь пишешь код создания и определения полей документов

    конеццикла;

    конецесли;

    Reply

Leave a Comment

Ваш адрес email не будет опубликован. Обязательные поля помечены *