Пересчет сальдовых остатков МЦ

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Евгений
Посетитель
Сообщения: 41
Зарегистрирован: 25 авг 2005, 09:50

Пересчет сальдовых остатков МЦ

Сообщение Евгений »

Привет всем!!!!

Подскажите, пожалуйста, выполнение интерфейса/процедуры по пересчету сальдовых остатков МЦ (модуль Складской учет > Операции > Сальдовые остатки МЦ > Пересчет сальдовых остатков). Как выполнить пересчет в своем интерфейсе?

Гал-ка 8.0
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

пересчет сальдо типа того
wasUpdateFlag:=TRUE
wasUpdateFlag := comp(string(year(Cur_Date))+string(month(Cur_Date))+
string(day(Cur_Date))+
string(hour(Cur_Time))+string(minute(Cur_Time))+
string(second(Cur_Time))+string(sec100(Cur_Time)) );

SpOrder.cSaldoFnd := wasUpdateFlag;

update current SpOrder;

AddSaldoMC(SpOrder.SP, SpOrder.cMC, SpOrder.ccPodr, SpOrder.ccMOL, SpOrder.cParty,
SpOrder.kol, SpOrder.srPrice, SpOrder.vPrice, SpOrder.cVal,
SpOrder.priceN, SpOrder.vPriceN,
SpOrder.dOrd, 2, FALSE);

а можно и так. Пометить в Pick (wlist=7) и вызвать
RunInterface(CountSal,skPr+100) ;
пересчет цен в расходный ордерах отдельная песня -
чего то мне не нравилось вызвывать просто фейс - вроде он пометку МЦ сбрасывал. По всем можно и просто вызвать с параметрами.
поищите фейс RecalcSpAuto - он вроде пересчитывает.
Ответить