Quick Report посчитать сумму в столбце

[SlimFIT]

Добрый день. Может кто-то подсказать, как правильно производится подсчет суммы значений столбца в QuickReport? Есть запрос, который выводит все заказы для выбранного магазина, в выбранном диапазоне дат. Но не могу понять как вывести сумму заказов магазина за данный период. Может кто-нибудь указать на ошибку? Спасибо.

Нажатие кнопки:

DataModule1->ADOQuery5->Close();
DataModule1->ADOQuery5->SQL->Clear();
DataModule1->ADOQuery5->SQL->Text="select * from orders where id_shop='"+DataModule1->DataSource1->DataSet->FieldByName("id_shop")->Value+"' AND date BETWEEN'"+DateTimePicker1->Date.FormatString("MM.dd.yyyy")+"' AND '"+DateTimePicker2->Date.FormatString("MM.dd.yyyy")+"'";
DataModule1->ADOQuery5->Open();
 
DataModule1->ADOQuery8->Close();
DataModule1->ADOQuery8->SQL->Clear();
DataModule1->ADOQuery8->SQL->Text="select SUM(price) as S from orders where id_shop='"+DataModule1->DataSource1->DataSet->FieldByName("id_shop")->Value+"' AND date BETWEEN'"+DateTimePicker1->Date.FormatString("MM.dd.yyyy")+"' AND '"+DateTimePicker2->Date.FormatString("MM.dd.yyyy")+"'";
DataModule1->ADOQuery8->Open();

Форма с отчетом:

void __fastcall TForm20::QuickRep1BeforePrint(TCustomQuickRep *Sender,
      bool &PrintReport)
{
QRDBText3->DataSet=DataModule1->ADOQuery5;
QRDBText3->DataField="date";
QRDBText4->DataSet=DataModule1->ADOQuery5;
QRDBText4->DataField="price";
QRDBText5->DataSet=DataModule1->ADOQuery5;
QRDBText5->DataField="cargo";
QRDBText6->DataSet=DataModule1->ADOQuery8;
QRDBText6->DataField="S";