@@ -467,6 +467,10 @@ procedure TDealPaymentData.sdvDealPaymentSetText(var Text: string;
else
fTotalPrice := FPayFormula.Calculate(Text);
end;
+
+ if AValue.Owner.ValueByName('StopCalc').AsBoolean then
+ fTotalPrice := 0;
iID := ARecord.ValueByName('ID').AsInteger;
if CheckStartedPrice(iID) then
begin
