RunInterface

[n0where]

хочу запустить пересчет сальдо для отдельной МЦ.

Код: Выделить всё

#ifndef ComponentVersion
#define ComponentVersion
#end

#include countsal.vih

Interface

...

function RereschetCaldo (cMC: comp; cSP:word):boolean;
var cSO:CountSalObj;
begin
 result := (cSO.CountMC(cMC, cSP, 0, GetServerDate));
end;

При запуске RereschetCaldo вылазиет ошибка типа интерфейс не инициализирован.
В чем загвоздка

[Ged]

var cSO:CountSal;

[n0where]

Ошибок нет )

Но сальдо всеравно не пересчитывает.

Код: Выделить всё

(cSO.CountMC(katmc.nRec, 1, 0, date(0,0,0));

результат false

[Ged]

функ. у разработка не корректно описана...
то что false - не факт что сальдо не пересчиталось

[n0where]

Теперь конечно нужно пересчитать текущие остатки для определеённой мс, но почемуто нет такого же метода для этого.

Interface L_OSTATKI::TekSRas
Расчет текущих остатков
Параметры
dFor : Date
wDoCalcReserv : Word
wInteractive : Word

без какиз либо функций... Можно как нибудь такое организовать...