QueryLoadAllRecords(ekstreQ);
    
  ekstreQ.Active:= True;
  CalcCariHesapDetay(ekstreQ);