OnCalcField ClientDataSet

Na clientDataSetSuma imam onCalcField event koji mi daje neku sumu!
Event sam maknuo i pozivam ga sa btnClickom -> clientDataSetSuma.OnCalcFields := clientDataSetSumaCalcFields;
Pošto kasnije ponovno pozivam clientDataSetSuma ( sa clientDataSetSuma.first), da mi se isti code ne vrti dvaput (pa čak i 3. puta),
kažem clientDataSetSuma.OnCalcFields := nil;
Tu sada dolazi do problema, jer polje (suma) koje mi je racunao na onCalcField mi se izgubi u clientDataSetSuma! Sve mi stavi na 0!
Nil-anjem procedure clientDataSetSuma.OnCalcFields mi nestanu podaci koje sam dobio istom procedurom !
Kako to izbijeći/riješiti ??

Kako nil-ati onCalcField, a da se u clientdataset-u ne mijenja ništa !!?

Imam mozda jednostavnije pitanje!

var
Form1: TForm1;
running : Currency;

implementation

{$R *.dfm}

procedure TForm1.SQLQuery1CalcFields(DataSet: TDataSet);
var
dug_sveukupno : Currency;
begin
dug_sveukupno := SQLQuery1DUG_SVEUKUPNO.AsCurrency;
running := running + dug_sveukupno;

SQLQuery1RUNNING.Value := running;
end;


Ovo mi sada sve radi ok, samo što mi kod prvog zapisa kaže da je dug_sveukupno = 0, a dug_sveukupno je 850?
Zašto mi za prvi zapis daje nulu ?