Line up sub report to footer

[Elliott]

I am wondering if it is possible to do the following:

I have 4 reports that have 3 totals at the bottom: Cases, Allowance and Dollars
I need to insert a sub report to the report footer to appear immediately under the grand total line that also uses Cases, Allowance and Dollars
I'd like to create one sub report, not 4
is it possible to move and / or resize the textboxes on the sub report to line up with the report being produced?

[Elliott]

well, I arrived at a solution

I set up WriteOnly properties in the subreport for Height,Width and Location

Partial Public Class MySubReport

    Inherits Telerik.Reporting.Report

#Region "Properties"   

  
   Public WriteOnly Property OverlapDollars_Height As Telerik.Reporting.Drawing.Unit

        Set(value As Telerik.Reporting.Drawing.Unit)

            OverlapDollarsDataTextBox.Height = value

        End Set

    End Property

 

    Public WriteOnly Property OverlapDollars_Width As Telerik.Reporting.Drawing.Unit

        Set(value As Telerik.Reporting.Drawing.Unit)

            OverlapDollarsDataTextBox.Width = DirectCast(value, Telerik.Reporting.Drawing.Unit)

        End Set

    End Property

 

    Public WriteOnly Property OverlapDollars_Location As Telerik.Reporting.Drawing.PointU

        Set(value As Telerik.Reporting.Drawing.PointU)

            OverlapDollarsDataTextBox.Location = value

        End Set

    End Property

 

Public WriteOnly Property ActualDollars_Height As Telerik.Reporting.Drawing.Unit

        Set(value As Telerik.Reporting.Drawing.Unit)

            ActualDollarsDataTextBox.Height = value

        End Set

    End Property

 

    Public WriteOnly Property ActualDollars_Width As Telerik.Reporting.Drawing.Unit

        Set(value As Telerik.Reporting.Drawing.Unit)

            ActualDollarsDataTextBox.Width = DirectCast(value, Telerik.Reporting.Drawing.Unit)

        End Set

    End Property

 

    Public WriteOnly Property ActualDollars_Location As Telerik.Reporting.Drawing.PointU

        Set(value As Telerik.Reporting.Drawing.PointU)

            ActualDollarsDataTextBox.Location = value

        End Set

    End Property

etc

at the point that the DataSource for each report is set

        Dim rpt As New Reports.VrMainReport

           Dim thisReport As InstanceReportSource = rpt.SRActualTotals.ReportSource

        Dim subRpt As MySubReport = thisReport.ReportDocument

        Dim x_Unit, Y_Unit As Telerik.Reporting.Drawing.Unit

        Dim APoint As Telerik.Reporting.Drawing.PointU

        subRpt.OverlapDollars_Width = rpt.netCostSumFunctionTextBox1.Width

        subRpt.OverlapDollars_Height = rpt.netCostSumFunctionTextBox1.Height

        subRpt.ActualDollars_Width = rpt.netCostSumFunctionTextBox1.Width

        subRpt.ActualDollars_Height = rpt.netCostSumFunctionTextBox1.Height

        x_Unit = rpt.netCostSumFunctionTextBox1.Location.X - rpt.subreportControl.Left

        Y_Unit = New Telerik.Reporting.Drawing.Unit(0)

        APoint = New Telerik.Reporting.Drawing.PointU(x_Unit, Y_Unit)

        subRpt.OverlapDollars_Location = APoint

        x_Unit = rpt.netCostSumFunctionTextBox1.Location.X - rpt.subreportControl.Left

        Y_Unit = rpt.netCostSumFunctionTextBox1.Height

        APoint = New Telerik.Reporting.Drawing.PointU(x_Unit, Y_Unit)

        subRpt.ActualDollars_Location = APoint

and so forth

same size, lines up