Subtotal a field that occurs in a group total

[Doug]

I have a report  that is using Q1 2013 (6.2.13.110).  This is a WINFORMS application written in VB.NET 2010

I have 3 group sections on the report where group 2 ("CltName") has a few summary fields as well as a Last(xxx) field (lets call it "GroupEndBalance".  I would like to create a summary field for "GroupEndBalance" in the "CltMasterNameGroup" but reporting will not allow a Sum(Last(xxx)) or a Sum(GroupEndBalance).

How can I get a summary of the "GroupEndBalance" field into the "CltMasterNameGroup".

I think if I was able to create a global variable and store the sum of this value on group2 change that may work but I am unsure as to how to accomplish that.

I have attached a screen shot of what the design of the report is so you can get an idea of what it looks like.

Any detailed ideas would be helpful.

Doug

[Doug]

I was able to come up with a solution to my problem.  Hopefully this was the correct way to make what I wanted to happen happen.

Inherits Telerik.Reporting.Report
Dim gBegBal As Double
Dim gEndBal As Double

Public Sub New()
    InitializeComponent()
    gBegBal = 0
    gEndBal = 0
End Sub

Private Sub TextBox26_ItemDataBinding(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox26.ItemDataBinding
    Dim txt As Telerik.Reporting.Processing.TextBox = DirectCast(sender, Telerik.Reporting.Processing.TextBox)
    Dim dataObject As Telerik.Reporting.Processing.IDataObject = DirectCast(txt.DataObject, Telerik.Reporting.Processing.IDataObject)
    gBegBal = gBegBal + DirectCast(dataObject("BegBal"), Decimal)
End Sub

Private Sub uiGroupBegBal_ItemDataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles uiGroupBegBal.ItemDataBound
    Dim txt As Telerik.Reporting.Processing.TextBox = DirectCast(sender, Telerik.Reporting.Processing.TextBox)
    txt.Value = gBegBal
    gBegBal = 0
End Sub


Private Sub uiGroupEndingBal_ItemDataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles uiGroupEndingBal.ItemDataBound
    Dim txt As Telerik.Reporting.Processing.TextBox = DirectCast(sender, Telerik.Reporting.Processing.TextBox)
    txt.Value = gEndBal
    gEndBal = 0
End Sub


Private Sub cltNameGroupFooter_ItemDataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles cltNameGroupFooter.ItemDataBound
    Dim gTextBox3 As Decimal = 0
    Dim section As Processing.GroupSection = DirectCast(sender, Processing.GroupSection)
    gTextBox3 = Convert.ToDecimal(DirectCast(Processing.ElementTreeHelper.GetChildByName(section, "TextBox3"), Telerik.Reporting.Processing.TextBox).Value)
    gEndBal = gEndBal + gTextBox3
End Sub

[Jon]

Funny timing, your issue is more or less the same as one I was having and I'd thought up a similar fudge to resolve.  Hopefully someone at telerik can suggest a built in mechanism for this!

[Stef]

Hello everyone,

Please note that this solution depends on the order in of the items in the report. If for some reason items change positions in the ReportItemBase.Items collection the events will appear in different order and the logic will fail.

It is not very clear from the screenshots what is the scenario and which TextBox items values are meant to be summed, but proper data structure with or without applied data function for a given scope should get the desired values.

If you send us more details about your scenario or even better a whole runnable sample project in a support ticket or via link to a shared document, it would be help us to provide you with more accurate suggestions.

Kind regards,
Stef
the Telerik team