Добрый день всем. Вопрос избитый , и по нему частично были ответы в других ветках. Но хотелось бы обобщить, так сказать ....
Есть Интерфейс пересчета сальдовых и текущих остатков L_SKLAD::CountSal
нужно реализовать пересчет сальдовых и текущих остатков по выбранным МЦ .
Function CountMC(pcMC: comp; pwSkPr, pwTypeCalc: word; pdDateCalc: date): boolean;
есть работающий вариант вида iCountSal.CountMC(tmpTBL.cMC, 0, 2, pdDateCalc)
работает в цикле по своей таблице с отобранными нреками ...
Вопрос в следующем ...
В интерфейсе есть параметры пересчета :
1) группа чекбоксов ( складской учет, производство, ремонт, строительство)
2) группа переключателей даты ( сдаты первого ордера, с заданной даты, с даты закрытия периода)
3) чекбокс расчета текущих остатков ( не снимая просроч. резервы и снимая просроченные резервы)
4) фильтр по мц (помеченные записи)
КАК в параметрах функции CountMC учесть их все ?
В моем случае, необходимо пересчитать сальдовые по складскому учету + производство с даты закрытия периода + расчитать текущие без снятия просроченных резервов .
как добавить сюда пересчет текущих остатков ?
Пересчет сальдовых и текущих остатков
Модераторы: m0p3e, edward_K, Модераторы
-
- Заслуженный деятель интернет-сообщества
- Сообщения: 5188
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: SPB galaxy spb
Re: Пересчет сальдовых и текущих остатков
Пересчет резервов идет так
Для пересчета текущих остатков и резерва используйте из L_Ostatki
RunInterface('TekSRas', Cur_Date, 1, 0);
или просто
RunInterface('RasTek1')
Перед этим можете набить Pick с wList =7
Код: Выделить всё
#include CalcRes.vih
interface ....
#include CalcRes.var
oCalcRes.CalcReserv(dFor, whatCalc = 1, TRUE)
RunInterface('TekSRas', Cur_Date, 1, 0);
или просто
RunInterface('RasTek1')
Перед этим можете набить Pick с wList =7