Subtotal in Xtreme Report?

int nCount = GetReportCtrl().GetRows()->GetCount();

for (int i = nCount - 1; i >= 0; i--)

{

     CXTPReportRow* pRow = GetReportCtrl().GetRows()->GetAt(i);

     if (pRow->IsGroupRow())

     {

            // calculate subtotals

            double dSubtotal = 0;

            CXTPReportRows* pChildren = pRow->GetChilds();

            for (int j = pChildren->GetCount() - 1; j >= 0; j--)

            {

                 CXTPReportRow*  pChild = pChildren->GetAt(j);

                 CMessageRecordItemPrice*  pItem = DYNAMIC_DOWNCAST(CMessageRecordItemPrice, pChild->GetRecord()->GetItem(COLUMN_PRICE));

                 dSubtotal  += pItem->GetValue();

            }

            

            // set caption

            CXTPReportGroupRow* pGroupRow = (CXTPReportGroupRow*)pRow;

            CString strSubtotal;

            strSubtotal.Format(_T("(Subtotal:  %f)"), dSubtotal);

            pGroupRow->SetCaption(pGroupRow->GetCaption()  + strSubtotal);

     }

}