4 Answers, 1 is accepted
0
Hello Jim,
The Null checkbox shows checked when the Value of the report parameter is Null which is by default. You can 'uncheck' it programmatically only if you set a default value for the parameter which is different from null. If this is not applicable in your case, please elaborate on the scenario so that we can see exactly what you want to achieve.
Best wishes,
Chavdar
the Telerik team
Instantly find answers to your questions on the new Telerik Support Portal.
Watch a video on how to optimize your support resource searches and check out more tips on the blogs.
The Null checkbox shows checked when the Value of the report parameter is Null which is by default. You can 'uncheck' it programmatically only if you set a default value for the parameter which is different from null. If this is not applicable in your case, please elaborate on the scenario so that we can see exactly what you want to achieve.
Best wishes,
Chavdar
the Telerik team
Instantly find answers to your questions on the new Telerik Support Portal.
Watch a video on how to optimize your support resource searches and check out more tips on the blogs.
0
Jim
Top achievements
Rank 1
answered on 13 Oct 2009, 02:49 PM
Dear Telerik Support,
I am setting the default values of the parameters programmatically (see ProjectBudget.aspx.vb). I am also saving the values entered into the parameters each time the report is run (see ProjectBudget.vb). The problem is that any parameter that has AllowNull = True causes the value to display as disabled and the NULL checkbox is checked (see notnull.jpg). If I could uncheck the checkbox programmatically, it would cause the parameter to display as enabled and this would appear to solve my problem.
See attached screenshot and code.
Regards,
Woody
ProjectBudget.vb
Imports System.ComponentModel |
Imports System.Drawing |
Imports System.Windows.Forms |
Imports Telerik.Reporting |
Imports Telerik.Reporting.Drawing |
Imports System |
Imports System.Data |
Imports System.Data.SqlClient |
Public Class ProjectBudget |
Inherits Telerik.Reporting.Report |
Private WithEvents detail As Telerik.Reporting.DetailSection |
Private WithEvents tb_CurrentTime As Telerik.Reporting.TextBox |
Private WithEvents da_ReportData As System.Data.SqlClient.SqlDataAdapter |
Private WithEvents tb_ProjectTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_Project As Telerik.Reporting.TextBox |
Private WithEvents tb_Title As Telerik.Reporting.TextBox |
Private WithEvents tb_ReportDateTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_Subtitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BeginDateTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BeginDate As Telerik.Reporting.TextBox |
Private WithEvents tb_EndDate As Telerik.Reporting.TextBox |
Private WithEvents tb_EndDateTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BudgetTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_ActualTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BudgetDollarsTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BudgetUnitsTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_ActualUnitsTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_AcutalDollarsTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_RevenueTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BudRevenueUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_BudRevenueDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_ActRevenueDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_ActRevenueUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_Background As Telerik.Reporting.TextBox |
Private WithEvents tb_ActLaborDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_BudLaborDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_LaborTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BudLaborUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_ActLaborUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_ActMaterialsUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_BudMaterialsUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_MaterialsTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BudMaterialsDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_ActMaterialsDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_ActCapitalDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_BudCapitalDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_CapitalTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BudCapUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_ActCapitalUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_ActSubcontractUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_BudSubcontractUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_SubcontractTitle As Telerik.Reporting.TextBox |
Private WithEvents tb_BudSubcontractDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_ActSubcontractDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_ActNetUnits As Telerik.Reporting.TextBox |
Private WithEvents tb_ActNetDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_BudNetDollars As Telerik.Reporting.TextBox |
Private WithEvents tb_BudNetUnits As Telerik.Reporting.TextBox |
Private WithEvents textBox1 As Telerik.Reporting.TextBox |
Private WithEvents textBox2 As Telerik.Reporting.TextBox |
Private WithEvents textBox3 As Telerik.Reporting.TextBox |
Private WithEvents textBox4 As Telerik.Reporting.TextBox |
Private WithEvents textBox5 As Telerik.Reporting.TextBox |
Private WithEvents tb_Background2 As Telerik.Reporting.TextBox |
Private WithEvents tb_NetTitle As Telerik.Reporting.TextBox |
Public Sub New() |
'Declare objects/variables |
Dim lo_Database As New OutPar.Payroll |
InitializeComponent() |
Me.DataSource = Nothing |
'Clean up |
lo_Database = Nothing |
End Sub |
'NOTE: The following procedure is required by the telerik Reporting Designer |
'It can be modified using the telerik Reporting Designer. |
'Do not modify it using the code editor. |
Private Sub InitializeComponent() |
Dim formattingRule1 As Telerik.Reporting.Drawing.FormattingRule = New Telerik.Reporting.Drawing.FormattingRule |
Dim reportParameter1 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter2 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter3 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter4 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter5 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter6 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter7 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter8 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter9 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter10 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim reportParameter11 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter |
Dim styleRule1 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Dim styleRule2 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Dim styleRule3 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Dim styleRule4 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule |
Me.tb_CurrentTime = New Telerik.Reporting.TextBox |
Me.tb_ReportDateTitle = New Telerik.Reporting.TextBox |
Me.tb_Title = New Telerik.Reporting.TextBox |
Me.tb_Project = New Telerik.Reporting.TextBox |
Me.tb_ProjectTitle = New Telerik.Reporting.TextBox |
Me.tb_Subtitle = New Telerik.Reporting.TextBox |
Me.tb_BeginDateTitle = New Telerik.Reporting.TextBox |
Me.tb_BeginDate = New Telerik.Reporting.TextBox |
Me.tb_EndDate = New Telerik.Reporting.TextBox |
Me.tb_EndDateTitle = New Telerik.Reporting.TextBox |
Me.detail = New Telerik.Reporting.DetailSection |
Me.tb_BudgetTitle = New Telerik.Reporting.TextBox |
Me.tb_ActualTitle = New Telerik.Reporting.TextBox |
Me.tb_BudgetDollarsTitle = New Telerik.Reporting.TextBox |
Me.tb_BudgetUnitsTitle = New Telerik.Reporting.TextBox |
Me.tb_ActualUnitsTitle = New Telerik.Reporting.TextBox |
Me.tb_AcutalDollarsTitle = New Telerik.Reporting.TextBox |
Me.tb_RevenueTitle = New Telerik.Reporting.TextBox |
Me.tb_BudRevenueUnits = New Telerik.Reporting.TextBox |
Me.tb_BudRevenueDollars = New Telerik.Reporting.TextBox |
Me.tb_ActRevenueDollars = New Telerik.Reporting.TextBox |
Me.tb_ActRevenueUnits = New Telerik.Reporting.TextBox |
Me.tb_Background = New Telerik.Reporting.TextBox |
Me.tb_ActLaborDollars = New Telerik.Reporting.TextBox |
Me.tb_BudLaborDollars = New Telerik.Reporting.TextBox |
Me.tb_LaborTitle = New Telerik.Reporting.TextBox |
Me.tb_BudLaborUnits = New Telerik.Reporting.TextBox |
Me.tb_ActLaborUnits = New Telerik.Reporting.TextBox |
Me.tb_ActMaterialsUnits = New Telerik.Reporting.TextBox |
Me.tb_BudMaterialsUnits = New Telerik.Reporting.TextBox |
Me.tb_MaterialsTitle = New Telerik.Reporting.TextBox |
Me.tb_BudMaterialsDollars = New Telerik.Reporting.TextBox |
Me.tb_ActMaterialsDollars = New Telerik.Reporting.TextBox |
Me.tb_ActCapitalDollars = New Telerik.Reporting.TextBox |
Me.tb_BudCapitalDollars = New Telerik.Reporting.TextBox |
Me.tb_CapitalTitle = New Telerik.Reporting.TextBox |
Me.tb_BudCapUnits = New Telerik.Reporting.TextBox |
Me.tb_ActCapitalUnits = New Telerik.Reporting.TextBox |
Me.tb_ActSubcontractUnits = New Telerik.Reporting.TextBox |
Me.tb_BudSubcontractUnits = New Telerik.Reporting.TextBox |
Me.tb_SubcontractTitle = New Telerik.Reporting.TextBox |
Me.tb_BudSubcontractDollars = New Telerik.Reporting.TextBox |
Me.tb_ActSubcontractDollars = New Telerik.Reporting.TextBox |
Me.tb_ActNetUnits = New Telerik.Reporting.TextBox |
Me.tb_ActNetDollars = New Telerik.Reporting.TextBox |
Me.tb_BudNetDollars = New Telerik.Reporting.TextBox |
Me.tb_BudNetUnits = New Telerik.Reporting.TextBox |
Me.tb_NetTitle = New Telerik.Reporting.TextBox |
Me.textBox1 = New Telerik.Reporting.TextBox |
Me.textBox2 = New Telerik.Reporting.TextBox |
Me.textBox3 = New Telerik.Reporting.TextBox |
Me.textBox4 = New Telerik.Reporting.TextBox |
Me.textBox5 = New Telerik.Reporting.TextBox |
Me.tb_Background2 = New Telerik.Reporting.TextBox |
Me.da_ReportData = New System.Data.SqlClient.SqlDataAdapter |
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit() |
' |
'tb_CurrentTime |
' |
Me.tb_CurrentTime.Format = "{0:f}" |
Me.tb_CurrentTime.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(1.6001573801040649, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(4.4000000953674316, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_CurrentTime.Name = "tb_CurrentTime" |
Me.tb_CurrentTime.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(4.4479165077209473, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_CurrentTime.Style.Font.Name = "Arial" |
Me.tb_CurrentTime.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
Me.tb_CurrentTime.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom |
Me.tb_CurrentTime.StyleName = "PageInfo" |
Me.tb_CurrentTime.Value = "=NOW()" |
' |
'tb_ReportDateTitle |
' |
Me.tb_ReportDateTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.70007866621017456, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(4.4000000953674316, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ReportDateTitle.Name = "tb_ReportDateTitle" |
Me.tb_ReportDateTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.90007877349853516, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ReportDateTitle.Style.Font.Bold = True |
Me.tb_ReportDateTitle.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom |
Me.tb_ReportDateTitle.Value = "Report Date:" |
' |
'tb_Title |
' |
Me.tb_Title.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.30000004172325134, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Title.Name = "tb_Title" |
Me.tb_Title.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(8.9166669845581055, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.41871070861816406, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Title.Style.Font.Bold = True |
Me.tb_Title.Style.Font.Name = "Tahoma" |
Me.tb_Title.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(20, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
Me.tb_Title.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Center |
Me.tb_Title.Value = "Project Budget" |
' |
'tb_Project |
' |
Me.tb_Project.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(1.5000787973403931, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.1000000238418579, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Project.Name = "tb_Project" |
Me.tb_Project.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.9000000953674316, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Project.Value = "=Fields.Project" |
' |
'tb_ProjectTitle |
' |
Me.tb_ProjectTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.699999988079071, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.1000000238418579, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ProjectTitle.Name = "tb_ProjectTitle" |
Me.tb_ProjectTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.800000011920929, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ProjectTitle.Style.Font.Bold = True |
Me.tb_ProjectTitle.Value = "Project:" |
' |
'tb_Subtitle |
' |
Me.tb_Subtitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.71875017881393433, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Subtitle.Name = "tb_Subtitle" |
Me.tb_Subtitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(8.9166669845581055, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.28121057152748108, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Subtitle.Style.Font.Bold = True |
Me.tb_Subtitle.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
Me.tb_Subtitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Center |
Me.tb_Subtitle.Value = "=Fields.CompanyName" |
' |
'tb_BeginDateTitle |
' |
Me.tb_BeginDateTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.70007872581481934, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.2999998331069946, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BeginDateTitle.Name = "tb_BeginDateTitle" |
Me.tb_BeginDateTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.800000011920929, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BeginDateTitle.Style.Font.Bold = True |
Me.tb_BeginDateTitle.Value = "Start Date:" |
' |
'tb_BeginDate |
' |
Me.tb_BeginDate.Format = "{0:d}" |
Me.tb_BeginDate.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(1.5021620988845825, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.2999998331069946, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BeginDate.Name = "tb_BeginDate" |
Me.tb_BeginDate.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.6979167461395264, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BeginDate.Value = "=Fields.BeginDate" |
' |
'tb_EndDate |
' |
Me.tb_EndDate.Format = "{0:d}" |
Me.tb_EndDate.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(1.5000787973403931, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.5, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_EndDate.Name = "tb_EndDate" |
Me.tb_EndDate.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.7000000476837158, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_EndDate.Value = "=Fields.EndDate" |
' |
'tb_EndDateTitle |
' |
Me.tb_EndDateTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.69799548387527466, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.5, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_EndDateTitle.Name = "tb_EndDateTitle" |
Me.tb_EndDateTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.800000011920929, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_EndDateTitle.Style.Font.Bold = True |
Me.tb_EndDateTitle.Value = "End Date:" |
' |
'detail |
' |
Me.detail.Height = New Telerik.Reporting.Drawing.Unit(4.7999997138977051, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)) |
Me.detail.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.tb_BudgetTitle, Me.tb_ActualTitle, Me.tb_BudgetDollarsTitle, Me.tb_BudgetUnitsTitle, Me.tb_ActualUnitsTitle, Me.tb_AcutalDollarsTitle, Me.tb_RevenueTitle, Me.tb_BudRevenueUnits, Me.tb_BudRevenueDollars, Me.tb_ActRevenueDollars, Me.tb_ActRevenueUnits, Me.tb_Background, Me.tb_ActLaborDollars, Me.tb_BudLaborDollars, Me.tb_LaborTitle, Me.tb_BudLaborUnits, Me.tb_ActLaborUnits, Me.tb_ActMaterialsUnits, Me.tb_BudMaterialsUnits, Me.tb_MaterialsTitle, Me.tb_BudMaterialsDollars, Me.tb_ActMaterialsDollars, Me.tb_ActCapitalDollars, Me.tb_BudCapitalDollars, Me.tb_CapitalTitle, Me.tb_BudCapUnits, Me.tb_ActCapitalUnits, Me.tb_ActSubcontractUnits, Me.tb_BudSubcontractUnits, Me.tb_SubcontractTitle, Me.tb_BudSubcontractDollars, Me.tb_ActSubcontractDollars, Me.tb_ActNetUnits, Me.tb_ActNetDollars, Me.tb_BudNetDollars, Me.tb_BudNetUnits, Me.tb_NetTitle, Me.tb_Title, Me.tb_Subtitle, Me.tb_ProjectTitle, Me.tb_EndDateTitle, Me.tb_BeginDateTitle, Me.tb_BeginDate, Me.tb_Project, Me.tb_EndDate, Me.tb_ReportDateTitle, Me.tb_CurrentTime, Me.textBox1, Me.textBox2, Me.textBox3, Me.textBox4, Me.textBox5, Me.tb_Background2}) |
Me.detail.Name = "detail" |
' |
'tb_BudgetTitle |
' |
Me.tb_BudgetTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.1000001430511475, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.9000004529953003, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudgetTitle.Name = "tb_BudgetTitle" |
Me.tb_BudgetTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.7999999523162842, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudgetTitle.Style.Font.Bold = True |
Me.tb_BudgetTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Center |
Me.tb_BudgetTitle.Value = "Budget" |
' |
'tb_ActualTitle |
' |
Me.tb_ActualTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.5000004768371582, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(1.9000005722045898, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActualTitle.Name = "tb_ActualTitle" |
Me.tb_ActualTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.7999999523162842, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActualTitle.Style.Font.Bold = True |
Me.tb_ActualTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Center |
Me.tb_ActualTitle.Value = "Actual" |
' |
'tb_BudgetDollarsTitle |
' |
Me.tb_BudgetDollarsTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.9000787734985352, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.1000003814697266, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudgetDollarsTitle.Name = "tb_BudgetDollarsTitle" |
Me.tb_BudgetDollarsTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.999921441078186, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudgetDollarsTitle.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_BudgetDollarsTitle.Style.Font.Bold = True |
Me.tb_BudgetDollarsTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudgetDollarsTitle.Value = "Dollars" |
' |
'tb_BudgetUnitsTitle |
' |
Me.tb_BudgetUnitsTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.1000001430511475, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.1000006198883057, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudgetUnitsTitle.Name = "tb_BudgetUnitsTitle" |
Me.tb_BudgetUnitsTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7999998927116394, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudgetUnitsTitle.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_BudgetUnitsTitle.Style.Font.Bold = True |
Me.tb_BudgetUnitsTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudgetUnitsTitle.Value = "Units" |
' |
'tb_ActualUnitsTitle |
' |
Me.tb_ActualUnitsTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.5000004768371582, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.1000006198883057, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActualUnitsTitle.Name = "tb_ActualUnitsTitle" |
Me.tb_ActualUnitsTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7999998927116394, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActualUnitsTitle.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_ActualUnitsTitle.Style.Font.Bold = True |
Me.tb_ActualUnitsTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActualUnitsTitle.Value = "Units" |
' |
'tb_AcutalDollarsTitle |
' |
Me.tb_AcutalDollarsTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(6.3000788688659668, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.1000006198883057, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_AcutalDollarsTitle.Name = "tb_AcutalDollarsTitle" |
Me.tb_AcutalDollarsTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999212026596069, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_AcutalDollarsTitle.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_AcutalDollarsTitle.Style.Font.Bold = True |
Me.tb_AcutalDollarsTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_AcutalDollarsTitle.Value = "Dollars" |
' |
'tb_RevenueTitle |
' |
Me.tb_RevenueTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.699999988079071, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.3000004291534424, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_RevenueTitle.Name = "tb_RevenueTitle" |
Me.tb_RevenueTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.4000002145767212, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_RevenueTitle.Style.Font.Bold = True |
Me.tb_RevenueTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left |
Me.tb_RevenueTitle.Value = "Revenue" |
' |
'tb_BudRevenueUnits |
' |
Me.tb_BudRevenueUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.1000001430511475, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.3000011444091797, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudRevenueUnits.Name = "tb_BudRevenueUnits" |
Me.tb_BudRevenueUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7999998927116394, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudRevenueUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_BudRevenueUnits.Style.Font.Bold = False |
Me.tb_BudRevenueUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudRevenueUnits.Value = "N/A" |
' |
'tb_BudRevenueDollars |
' |
Me.tb_BudRevenueDollars.Format = "{0:C0}" |
Me.tb_BudRevenueDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.9000787734985352, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.3000011444091797, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudRevenueDollars.Name = "tb_BudRevenueDollars" |
Me.tb_BudRevenueDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.0000007152557373, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudRevenueDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_BudRevenueDollars.Style.Font.Bold = False |
Me.tb_BudRevenueDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudRevenueDollars.Value = "=Fields.BudRevenueDollars" |
' |
'tb_ActRevenueDollars |
' |
Me.tb_ActRevenueDollars.Format = "{0:C0}" |
Me.tb_ActRevenueDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(6.3000788688659668, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.3000800609588623, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActRevenueDollars.Name = "tb_ActRevenueDollars" |
Me.tb_ActRevenueDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999212026596069, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActRevenueDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_ActRevenueDollars.Style.Font.Bold = False |
Me.tb_ActRevenueDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActRevenueDollars.Value = "=Parameters.ActRevenueDollars" |
' |
'tb_ActRevenueUnits |
' |
Me.tb_ActRevenueUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4999208450317383, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.3000800609588623, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActRevenueUnits.Name = "tb_ActRevenueUnits" |
Me.tb_ActRevenueUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.800079345703125, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActRevenueUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_ActRevenueUnits.Style.Font.Bold = False |
Me.tb_ActRevenueUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActRevenueUnits.Value = "N/A" |
' |
'tb_Background |
' |
Me.tb_Background.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.699999988079071, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.5000801086425781, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Background.Name = "tb_Background" |
Me.tb_Background.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(7.59999942779541, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Background.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
' |
'tb_ActLaborDollars |
' |
Me.tb_ActLaborDollars.Format = "{0:C0}" |
Me.tb_ActLaborDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(6.3000788688659668, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.7000007629394531, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActLaborDollars.Name = "tb_ActLaborDollars" |
Me.tb_ActLaborDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999212026596069, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActLaborDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_ActLaborDollars.Style.Font.Bold = False |
Me.tb_ActLaborDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActLaborDollars.Value = "=Fields.ActLaborDollars" |
' |
'tb_BudLaborDollars |
' |
Me.tb_BudLaborDollars.Format = "{0:C0}" |
Me.tb_BudLaborDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8999998569488525, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.700000524520874, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudLaborDollars.Name = "tb_BudLaborDollars" |
Me.tb_BudLaborDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.999921441078186, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudLaborDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_BudLaborDollars.Style.Font.Bold = False |
Me.tb_BudLaborDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudLaborDollars.Value = "=Fields.BudLaborDollars" |
' |
'tb_LaborTitle |
' |
Me.tb_LaborTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.70000004768371582, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.7000007629394531, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_LaborTitle.Name = "tb_LaborTitle" |
Me.tb_LaborTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.4000002145767212, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_LaborTitle.Style.Font.Bold = True |
Me.tb_LaborTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left |
Me.tb_LaborTitle.Value = "Labor" |
' |
'tb_BudLaborUnits |
' |
Me.tb_BudLaborUnits.Format = "{0:N0}" |
Me.tb_BudLaborUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.1000001430511475, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.7000007629394531, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudLaborUnits.Name = "tb_BudLaborUnits" |
Me.tb_BudLaborUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7999998927116394, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudLaborUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_BudLaborUnits.Style.Font.Bold = False |
Me.tb_BudLaborUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudLaborUnits.Value = "=Fields.BudLaborUnits" |
' |
'tb_ActLaborUnits |
' |
Me.tb_ActLaborUnits.Format = "{0:N0}" |
Me.tb_ActLaborUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.9000000953674316, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.7000007629394531, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActLaborUnits.Name = "tb_ActLaborUnits" |
Me.tb_ActLaborUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.3999214172363281, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActLaborUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_ActLaborUnits.Style.Font.Bold = False |
Me.tb_ActLaborUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActLaborUnits.Value = "=Fields.ActLaborUnits" |
' |
'tb_ActMaterialsUnits |
' |
Me.tb_ActMaterialsUnits.Format = "{0:N0}" |
Me.tb_ActMaterialsUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.9000000953674316, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.90000057220459, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActMaterialsUnits.Name = "tb_ActMaterialsUnits" |
Me.tb_ActMaterialsUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.4000797271728516, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActMaterialsUnits.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_ActMaterialsUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_ActMaterialsUnits.Style.Font.Bold = False |
Me.tb_ActMaterialsUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActMaterialsUnits.Value = "=Fields.ActMaterialsUnits" |
' |
'tb_BudMaterialsUnits |
' |
Me.tb_BudMaterialsUnits.Format = "{0:N0}" |
Me.tb_BudMaterialsUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.1000792980194092, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.90000057220459, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudMaterialsUnits.Name = "tb_BudMaterialsUnits" |
Me.tb_BudMaterialsUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.79992073774337769, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudMaterialsUnits.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_BudMaterialsUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_BudMaterialsUnits.Style.Font.Bold = False |
Me.tb_BudMaterialsUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudMaterialsUnits.Value = "=Fields.BudMaterialsUnits" |
' |
'tb_MaterialsTitle |
' |
Me.tb_MaterialsTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.70000004768371582, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.90000057220459, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_MaterialsTitle.Name = "tb_MaterialsTitle" |
Me.tb_MaterialsTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.4000002145767212, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_MaterialsTitle.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_MaterialsTitle.Style.BorderColor.Right = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_MaterialsTitle.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_MaterialsTitle.Style.Font.Bold = True |
Me.tb_MaterialsTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left |
Me.tb_MaterialsTitle.Value = "Materials" |
' |
'tb_BudMaterialsDollars |
' |
Me.tb_BudMaterialsDollars.Format = "{0:C0}" |
Me.tb_BudMaterialsDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8999998569488525, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.90000057220459, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudMaterialsDollars.Name = "tb_BudMaterialsDollars" |
Me.tb_BudMaterialsDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999212026596069, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudMaterialsDollars.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_BudMaterialsDollars.Style.BorderColor.Left = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_BudMaterialsDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_BudMaterialsDollars.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_BudMaterialsDollars.Style.Font.Bold = False |
Me.tb_BudMaterialsDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudMaterialsDollars.Value = "=Fields.BudMaterialsDollars" |
' |
'tb_ActMaterialsDollars |
' |
Me.tb_ActMaterialsDollars.Format = "{0:C0}" |
Me.tb_ActMaterialsDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(6.3000006675720215, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(2.90000057220459, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActMaterialsDollars.Name = "tb_ActMaterialsDollars" |
Me.tb_ActMaterialsDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999204874038696, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActMaterialsDollars.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_ActMaterialsDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_ActMaterialsDollars.Style.Font.Bold = False |
Me.tb_ActMaterialsDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActMaterialsDollars.Value = "=Fields.ActMaterialsDollars" |
' |
'tb_ActCapitalDollars |
' |
Me.tb_ActCapitalDollars.Format = "{0:C0}" |
Me.tb_ActCapitalDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(6.3042464256286621, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.3000009059906006, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActCapitalDollars.Name = "tb_ActCapitalDollars" |
Me.tb_ActCapitalDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9977582693099976, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActCapitalDollars.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_ActCapitalDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_ActCapitalDollars.Style.Font.Bold = False |
Me.tb_ActCapitalDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActCapitalDollars.Value = "=Fields.ActCapitalDollars" |
' |
'tb_BudCapitalDollars |
' |
Me.tb_BudCapitalDollars.Format = "{0:C0}" |
Me.tb_BudCapitalDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8957538604736328, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.3000001907348633, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudCapitalDollars.Name = "tb_BudCapitalDollars" |
Me.tb_BudCapitalDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999212026596069, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudCapitalDollars.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_BudCapitalDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_BudCapitalDollars.Style.Font.Bold = False |
Me.tb_BudCapitalDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudCapitalDollars.Value = "=Fields.BudCapitalDollars" |
' |
'tb_CapitalTitle |
' |
Me.tb_CapitalTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.69575399160385132, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.3000001907348633, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_CapitalTitle.Name = "tb_CapitalTitle" |
Me.tb_CapitalTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.4063295125961304, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_CapitalTitle.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_CapitalTitle.Style.Font.Bold = True |
Me.tb_CapitalTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left |
Me.tb_CapitalTitle.Value = "Capital" |
' |
'tb_BudCapUnits |
' |
Me.tb_BudCapUnits.Format = "{0:N0}" |
Me.tb_BudCapUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.1021623611450195, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.3000001907348633, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudCapUnits.Name = "tb_BudCapUnits" |
Me.tb_BudCapUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.79359149932861328, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudCapUnits.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_BudCapUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_BudCapUnits.Style.Font.Bold = False |
Me.tb_BudCapUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudCapUnits.Value = "=Fields.BudCapitalUnits" |
' |
'tb_ActCapitalUnits |
' |
Me.tb_ActCapitalUnits.Format = "{0:N0}" |
Me.tb_ActCapitalUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.8957538604736328, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.3000001907348633, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActCapitalUnits.Name = "tb_ActCapitalUnits" |
Me.tb_ActCapitalUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.4041677713394165, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActCapitalUnits.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
Me.tb_ActCapitalUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_ActCapitalUnits.Style.Font.Bold = False |
Me.tb_ActCapitalUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActCapitalUnits.Value = "=Fields.ActCapitalUnits" |
' |
'tb_ActSubcontractUnits |
' |
Me.tb_ActSubcontractUnits.Format = "{0:N0}" |
Me.tb_ActSubcontractUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.9000000953674316, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.1000006198883057, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActSubcontractUnits.Name = "tb_ActSubcontractUnits" |
Me.tb_ActSubcontractUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.3999214172363281, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActSubcontractUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_ActSubcontractUnits.Style.Font.Bold = False |
Me.tb_ActSubcontractUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActSubcontractUnits.Value = "=Fields.ActSubcontractUnits" |
' |
'tb_BudSubcontractUnits |
' |
Me.tb_BudSubcontractUnits.Format = "{0:N0}" |
Me.tb_BudSubcontractUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.1000001430511475, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.1000006198883057, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudSubcontractUnits.Name = "tb_BudSubcontractUnits" |
Me.tb_BudSubcontractUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7999998927116394, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudSubcontractUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_BudSubcontractUnits.Style.Font.Bold = False |
Me.tb_BudSubcontractUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudSubcontractUnits.Value = "=Fields.BudSubcontractUnits" |
' |
'tb_SubcontractTitle |
' |
Me.tb_SubcontractTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.699999988079071, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.1000006198883057, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_SubcontractTitle.Name = "tb_SubcontractTitle" |
Me.tb_SubcontractTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.4000002145767212, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_SubcontractTitle.Style.Font.Bold = True |
Me.tb_SubcontractTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left |
Me.tb_SubcontractTitle.Value = "Subcontract" |
' |
'tb_BudSubcontractDollars |
' |
Me.tb_BudSubcontractDollars.Format = "{0:C0}" |
Me.tb_BudSubcontractDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.9001579284667969, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.1000006198883057, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudSubcontractDollars.Name = "tb_BudSubcontractDollars" |
Me.tb_BudSubcontractDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.999921441078186, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudSubcontractDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_BudSubcontractDollars.Style.Font.Bold = False |
Me.tb_BudSubcontractDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudSubcontractDollars.Value = "=Fields.BudSubcontractDollars" |
' |
'tb_ActSubcontractDollars |
' |
Me.tb_ActSubcontractDollars.Format = "{0:C0}" |
Me.tb_ActSubcontractDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(6.3000001907348633, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.1000006198883057, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActSubcontractDollars.Name = "tb_ActSubcontractDollars" |
Me.tb_ActSubcontractDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999212026596069, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActSubcontractDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None |
Me.tb_ActSubcontractDollars.Style.Font.Bold = False |
Me.tb_ActSubcontractDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActSubcontractDollars.Value = "=Fields.ActSubcontractDollars" |
' |
'tb_ActNetUnits |
' |
Me.tb_ActNetUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.5, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.9000790119171143, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActNetUnits.Name = "tb_ActNetUnits" |
Me.tb_ActNetUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.800079345703125, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActNetUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Dashed |
Me.tb_ActNetUnits.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_ActNetUnits.Style.Font.Bold = False |
Me.tb_ActNetUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActNetUnits.Value = "N/A" |
' |
'tb_ActNetDollars |
' |
formattingRule1.Filters.AddRange(New Telerik.Reporting.Data.Filter() {New Telerik.Reporting.Data.Filter("=Fields.ActNetDollars", CType(Telerik.Reporting.Data.FilterOperator.LessThan, Telerik.Reporting.Data.FilterOperator), "0")}) |
formattingRule1.Style.Color = System.Drawing.Color.Red |
formattingRule1.Style.Font.Bold = True |
Me.tb_ActNetDollars.ConditionalFormatting.AddRange(New Telerik.Reporting.Drawing.FormattingRule() {formattingRule1}) |
Me.tb_ActNetDollars.Format = "{0:C0}" |
Me.tb_ActNetDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(6.3042464256286621, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.9000790119171143, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActNetDollars.Name = "tb_ActNetDollars" |
Me.tb_ActNetDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.995674729347229, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_ActNetDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Dashed |
Me.tb_ActNetDollars.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_ActNetDollars.Style.Font.Bold = False |
Me.tb_ActNetDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_ActNetDollars.Value = "=Fields.ActNetDollars" |
' |
'tb_BudNetDollars |
' |
Me.tb_BudNetDollars.Format = "{0:C0}" |
Me.tb_BudNetDollars.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.9042453765869141, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.9000790119171143, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudNetDollars.Name = "tb_BudNetDollars" |
Me.tb_BudNetDollars.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9957548379898071, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudNetDollars.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Dashed |
Me.tb_BudNetDollars.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_BudNetDollars.Style.Font.Bold = False |
Me.tb_BudNetDollars.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudNetDollars.Value = "=Fields.BudNetDollars" |
' |
'tb_BudNetUnits |
' |
Me.tb_BudNetUnits.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.0958328247070313, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.9023201465606689, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudNetUnits.Name = "tb_BudNetUnits" |
Me.tb_BudNetUnits.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.80416679382324219, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.1977589875459671, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_BudNetUnits.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Dashed |
Me.tb_BudNetUnits.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid |
Me.tb_BudNetUnits.Style.Font.Bold = False |
Me.tb_BudNetUnits.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.tb_BudNetUnits.Value = "N/A" |
' |
'tb_NetTitle |
' |
Me.tb_NetTitle.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.69791668653488159, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.9000790119171143, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_NetTitle.Name = "tb_NetTitle" |
Me.tb_NetTitle.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.3978372812271118, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_NetTitle.Style.Font.Bold = True |
Me.tb_NetTitle.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left |
Me.tb_NetTitle.Value = "Net" |
' |
'textBox1 |
' |
Me.textBox1.Format = "{0:C0}" |
Me.textBox1.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(6.3042464256286621, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.5, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox1.Name = "textBox1" |
Me.textBox1.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.995674729347229, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox1.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.textBox1.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid |
Me.textBox1.Style.Font.Bold = False |
Me.textBox1.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.textBox1.Value = "=Fields.ActSubtotalDollars" |
' |
'textBox2 |
' |
Me.textBox2.Format = "{0:C0}" |
Me.textBox2.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8957538604736328, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.5, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox2.Name = "textBox2" |
Me.textBox2.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.9999212026596069, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox2.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.textBox2.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid |
Me.textBox2.Style.Font.Bold = False |
Me.textBox2.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.textBox2.Value = "=Fields.BudSubtotalDollars" |
' |
'textBox3 |
' |
Me.textBox3.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.70000004768371582, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.5, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox3.Name = "textBox3" |
Me.textBox3.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.4000002145767212, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox3.Style.Font.Bold = True |
Me.textBox3.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Center |
Me.textBox3.Value = "Subtotal" |
' |
'textBox4 |
' |
Me.textBox4.Format = "{0:N0}" |
Me.textBox4.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.1021623611450195, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.5, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox4.Name = "textBox4" |
Me.textBox4.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.79351264238357544, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox4.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.textBox4.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid |
Me.textBox4.Style.Font.Bold = False |
Me.textBox4.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.textBox4.Value = "=Fields.BudSubtotalUnits" |
' |
'textBox5 |
' |
Me.textBox5.Format = "{0:N0}" |
Me.textBox5.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4999213218688965, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.5, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox5.Name = "textBox5" |
Me.textBox5.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.80424624681472778, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.textBox5.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid |
Me.textBox5.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid |
Me.textBox5.Style.Font.Bold = False |
Me.textBox5.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right |
Me.textBox5.Value = "=Fields.ActSubtotalUnits" |
' |
'tb_Background2 |
' |
Me.tb_Background2.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.69791668653488159, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(3.7000000476837158, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Background2.Name = "tb_Background2" |
Me.tb_Background2.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(7.59999942779541, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType))) |
Me.tb_Background2.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer)) |
' |
'ProjectBudget |
' |
Me.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.detail}) |
Me.PageSettings.Landscape = True |
Me.PageSettings.Margins.Bottom = New Telerik.Reporting.Drawing.Unit(1, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.Margins.Left = New Telerik.Reporting.Drawing.Unit(1, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.Margins.Right = New Telerik.Reporting.Drawing.Unit(1, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.Margins.Top = New Telerik.Reporting.Drawing.Unit(1, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)) |
Me.PageSettings.PaperKind = System.Drawing.Printing.PaperKind.Letter |
reportParameter1.Name = "pi_ProjectID" |
reportParameter1.Type = Telerik.Reporting.ReportParameterType.[Integer] |
reportParameter2.Name = "ps_Project" |
reportParameter3.Name = "pd_BeginDate" |
reportParameter3.Type = Telerik.Reporting.ReportParameterType.DateTime |
reportParameter3.UI.AllowBlank = False |
reportParameter3.UI.AllowNull = True |
reportParameter3.UI.Text = " Start Date" |
reportParameter3.UI.Visible = True |
reportParameter4.Name = "pd_EndDate" |
reportParameter4.Type = Telerik.Reporting.ReportParameterType.DateTime |
reportParameter4.UI.AllowBlank = False |
reportParameter4.UI.AllowNull = True |
reportParameter4.UI.Text = "End Date" |
reportParameter4.UI.Visible = True |
reportParameter5.Name = "pi_ActMaterialsUnits" |
reportParameter5.Type = Telerik.Reporting.ReportParameterType.[Integer] |
reportParameter5.UI.AllowBlank = False |
reportParameter5.UI.AllowNull = True |
reportParameter5.UI.Text = " Actual Materials (units)" |
reportParameter5.UI.Visible = True |
reportParameter6.Name = "pc_ActMaterialsDollars" |
reportParameter6.Type = Telerik.Reporting.ReportParameterType.Float |
reportParameter6.UI.AllowBlank = False |
reportParameter6.UI.AllowNull = True |
reportParameter6.UI.Text = "Actual Materials (dollars)" |
reportParameter6.UI.Visible = True |
reportParameter7.Name = "pi_ActSubcontractUnits" |
reportParameter7.Type = Telerik.Reporting.ReportParameterType.[Integer] |
reportParameter7.UI.AllowBlank = False |
reportParameter7.UI.AllowNull = True |
reportParameter7.UI.Text = " Actual Subcontract (units)" |
reportParameter7.UI.Visible = True |
reportParameter8.Name = "pc_ActSubcontractDollars" |
reportParameter8.Type = Telerik.Reporting.ReportParameterType.Float |
reportParameter8.UI.AllowBlank = False |
reportParameter8.UI.AllowNull = True |
reportParameter8.UI.Text = "Actual Subcontract (dollars)" |
reportParameter8.UI.Visible = True |
reportParameter9.Name = "pi_ActCapitalUnits" |
reportParameter9.Type = Telerik.Reporting.ReportParameterType.[Integer] |
reportParameter9.UI.AllowBlank = False |
reportParameter9.UI.AllowNull = True |
reportParameter9.UI.Text = " Actual Capital (units)" |
reportParameter9.UI.Visible = True |
reportParameter10.Name = "pc_ActCapitalDollars" |
reportParameter10.Type = Telerik.Reporting.ReportParameterType.Float |
reportParameter10.UI.AllowBlank = False |
reportParameter10.UI.Text = "Actual Capital (dollars)" |
reportParameter10.UI.Visible = True |
reportParameter11.Name = "pc_ActRevenueDollars" |
reportParameter11.Type = Telerik.Reporting.ReportParameterType.Float |
reportParameter11.UI.AllowBlank = False |
reportParameter11.UI.Text = "Actual Revenue (dollars)" |
reportParameter11.UI.Visible = True |
Me.ReportParameters.Add(reportParameter1) |
Me.ReportParameters.Add(reportParameter2) |
Me.ReportParameters.Add(reportParameter3) |
Me.ReportParameters.Add(reportParameter4) |
Me.ReportParameters.Add(reportParameter5) |
Me.ReportParameters.Add(reportParameter6) |
Me.ReportParameters.Add(reportParameter7) |
Me.ReportParameters.Add(reportParameter8) |
Me.ReportParameters.Add(reportParameter9) |
Me.ReportParameters.Add(reportParameter10) |
Me.ReportParameters.Add(reportParameter11) |
Me.Style.BackgroundColor = System.Drawing.Color.White |
styleRule1.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Title")}) |
styleRule1.Style.Color = System.Drawing.Color.Black |
styleRule1.Style.Font.Bold = True |
styleRule1.Style.Font.Italic = False |
styleRule1.Style.Font.Name = "Tahoma" |
styleRule1.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(20, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
styleRule1.Style.Font.Strikeout = False |
styleRule1.Style.Font.Underline = False |
styleRule2.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Caption")}) |
styleRule2.Style.Color = System.Drawing.Color.Black |
styleRule2.Style.Font.Name = "Tahoma" |
styleRule2.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
styleRule2.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle |
styleRule3.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Data")}) |
styleRule3.Style.Font.Name = "Tahoma" |
styleRule3.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
styleRule3.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle |
styleRule4.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("PageInfo")}) |
styleRule4.Style.Font.Name = "Tahoma" |
styleRule4.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, CType(Telerik.Reporting.Drawing.UnitType.Point, Telerik.Reporting.Drawing.UnitType)) |
styleRule4.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle |
Me.StyleSheet.AddRange(New Telerik.Reporting.Drawing.StyleRule() {styleRule1, styleRule2, styleRule3, styleRule4}) |
Me.Width = New Telerik.Reporting.Drawing.Unit(8.9352188110351562, CType(Telerik.Reporting.Drawing.UnitType.Inch, Telerik.Reporting.Drawing.UnitType)) |
CType(Me, System.ComponentModel.ISupportInitialize).EndInit() |
End Sub |
Function GetReportData(ByVal pd_BeginDate As Date, ByVal pd_EndDate As Date, ByVal pi_ProjectID As Integer, ByVal pc_ActRevenueDollars As Decimal, ByVal pi_ActMaterialsUnits As Integer, ByVal pc_ActMaterialsDollars As Decimal, ByVal pi_ActSubcontractUnits As Integer, ByVal pc_ActSubcontractDollars As Decimal, ByVal pi_ActCapitalUnits As Integer, ByVal pc_ActCapitalDollars As Decimal) As SqlDataAdapter |
Dim lo_Connection As SqlConnection = New SqlConnection(OutPar.Database.AppConnectionString) |
Dim lo_Command As SqlCommand = New SqlCommand("otgi_ProjectBudgetRpt", lo_Connection) |
lo_Command.CommandType = CommandType.StoredProcedure |
lo_Connection.FireInfoMessageEventOnUserErrors = False |
'Add parameters |
Dim prm_BeginDate As SqlParameter = New SqlParameter("@pd_BeginDate", SqlDbType.DateTime, 8) |
prm_BeginDate.Value = pd_BeginDate |
lo_Command.Parameters.Add(prm_BeginDate) |
Dim prm_EndDate As SqlParameter = New SqlParameter("@pd_EndDate", SqlDbType.DateTime, 8) |
prm_EndDate.Value = pd_EndDate |
lo_Command.Parameters.Add(prm_EndDate) |
Dim prm_ProjectID As SqlParameter = New SqlParameter("@pi_ProjectID", SqlDbType.Int, 4) |
prm_ProjectID.Value = pi_ProjectID |
lo_Command.Parameters.Add(prm_ProjectID) |
Dim prm_ActRevenueDollars As SqlParameter = New SqlParameter("@pc_ActRevenueDollars", SqlDbType.Money) |
prm_ActRevenueDollars.Value = pc_ActRevenueDollars |
lo_Command.Parameters.Add(prm_ActRevenueDollars) |
Dim prm_ActMaterialsUnits As SqlParameter = New SqlParameter("@pi_ActMaterialsUnits", SqlDbType.Int, 4) |
prm_ActMaterialsUnits.Value = pi_ActMaterialsUnits |
lo_Command.Parameters.Add(prm_ActMaterialsUnits) |
Dim prm_ActMaterialsDollars As SqlParameter = New SqlParameter("@pc_ActMaterialsDollars", SqlDbType.Money) |
prm_ActMaterialsDollars.Value = pc_ActMaterialsDollars |
lo_Command.Parameters.Add(prm_ActMaterialsDollars) |
Dim prm_ActSubcontractUnits As SqlParameter = New SqlParameter("@pi_ActSubcontractUnits", SqlDbType.Int, 4) |
prm_ActSubcontractUnits.Value = pi_ActSubcontractUnits |
lo_Command.Parameters.Add(prm_ActSubcontractUnits) |
Dim prm_ActSubcontractDollars As SqlParameter = New SqlParameter("@pc_ActSubcontractDollars", SqlDbType.Money) |
prm_ActSubcontractDollars.Value = pc_ActSubcontractDollars |
lo_Command.Parameters.Add(prm_ActSubcontractDollars) |
Dim prm_ActCapitalUnits As SqlParameter = New SqlParameter("@pi_ActCapitalUnits", SqlDbType.Int, 4) |
prm_ActCapitalUnits.Value = pi_ActCapitalUnits |
lo_Command.Parameters.Add(prm_ActCapitalUnits) |
Dim prm_ActCapitalDollars As SqlParameter = New SqlParameter("@pc_ActCapitalDollars", SqlDbType.Money) |
prm_ActCapitalDollars.Value = pc_ActCapitalDollars |
lo_Command.Parameters.Add(prm_ActCapitalDollars) |
Try |
'Open the connection and execute the command |
Me.da_ReportData.SelectCommand = lo_Command |
Catch ex As Exception |
'An error has occurred |
Finally |
'Close connection |
If lo_Connection.State = ConnectionState.Open Then |
lo_Connection.Close() |
End If |
End Try |
'Return data to report |
GetReportData = Me.da_ReportData |
End Function |
Private Sub ProjectBudget_NeedDataSource(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.NeedDataSource |
'Declare objects/variables |
Dim lo_Report As Telerik.Reporting.Processing.Report = CType(sender, Telerik.Reporting.Processing.Report) |
Dim ld_BeginDate As DateTime |
Dim ld_EndDate As DateTime |
'Initialize variables |
ld_BeginDate = IIf(Me.ReportParameters("pd_BeginDate").Value Is Nothing, "1/1/1753", Me.ReportParameters("pd_BeginDate").Value) |
ld_EndDate = IIf(Me.ReportParameters("pd_EndDate").Value Is Nothing, "12/31/9999", Me.ReportParameters("pd_EndDate").Value) |
'Set the report data source passing report parameters |
lo_Report.DataSource = GetReportData(ld_BeginDate, ld_EndDate, Me.ReportParameters("pi_ProjectID").Value, Me.ReportParameters("pc_ActRevenueDollars").Value, Me.ReportParameters("pi_ActMaterialsUnits").Value, Me.ReportParameters("pc_ActMaterialsDollars").Value, Me.ReportParameters("pi_ActSubcontractUnits").Value, Me.ReportParameters("pc_ActSubcontractDollars").Value, Me.ReportParameters("pi_ActCapitalUnits").Value, Me.ReportParameters("pc_ActCapitalDollars").Value) |
'Save report parameters |
SaveParameters() |
End Sub |
Sub SaveParameters() |
'Declare objects/variables |
Dim lo_Database As New OutPar.Payroll |
'If project chosen |
If Not String.IsNullOrEmpty(Me.ReportParameters("ps_Project").Value) Then |
'Save parameter defaults. Default Name format: [Company Code] [Project Name] [Report Name] [Parameter Name] |
lo_Database.SaveSystemDefault(HttpContext.Current.Session("gs_CoCode") & " " & Me.ReportParameters("ps_Project").Value & " ProjectBudget BeginDate", Me.ReportParameters("pd_BeginDate").Value) |
lo_Database.SaveSystemDefault(HttpContext.Current.Session("gs_CoCode") & " " & Me.ReportParameters("ps_Project").Value & " ProjectBudget EndDate", Me.ReportParameters("pd_EndDate").Value) |
lo_Database.SaveSystemDefault(HttpContext.Current.Session("gs_CoCode") & " " & Me.ReportParameters("ps_Project").Value & " ProjectBudget ActRevenueDollars", Me.ReportParameters("pc_ActRevenueDollars").Value) |
lo_Database.SaveSystemDefault(HttpContext.Current.Session("gs_CoCode") & " " & Me.ReportParameters("ps_Project").Value & " ProjectBudget ActMaterialsUnits", Me.ReportParameters("pi_ActMaterialsUnits").Value) |
lo_Database.SaveSystemDefault(HttpContext.Current.Session("gs_CoCode") & " " & Me.ReportParameters("ps_Project").Value & " ProjectBudget ActMaterialsDollars", Me.ReportParameters("pc_ActMaterialsDollars").Value) |
lo_Database.SaveSystemDefault(HttpContext.Current.Session("gs_CoCode") & " " & Me.ReportParameters("ps_Project").Value & " ProjectBudget ActSubcontractUnits", Me.ReportParameters("pi_ActSubcontractUnits").Value) |
lo_Database.SaveSystemDefault(HttpContext.Current.Session("gs_CoCode") & " " & Me.ReportParameters("ps_Project").Value & " ProjectBudget ActSubcontractDollars", Me.ReportParameters("pc_ActSubcontractDollars").Value) |
lo_Database.SaveSystemDefault(HttpContext.Current.Session("gs_CoCode") & " " & Me.ReportParameters("ps_Project").Value & " ProjectBudget ActCapitalUnits", Me.ReportParameters("pi_ActCapitalUnits").Value) |
lo_Database.SaveSystemDefault(HttpContext.Current.Session("gs_CoCode") & " " & Me.ReportParameters("ps_Project").Value & " ProjectBudget ActCapitalDollars", Me.ReportParameters("pc_ActCapitalDollars").Value) |
End If |
'Clean up |
lo_Database = Nothing |
End Sub |
End Class |
ProjectBudget.aspx.vb
Imports System |
Imports System.Web.UI |
Imports Telerik.Reporting |
Imports System.Data |
Imports System.Data.SqlClient |
Partial Class Secure_Reports_ProjectBudget |
Inherits System.Web.UI.Page |
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load |
'Declare objects/variables |
Dim lo_DataEntry As New OutPar.DataEntry |
Dim lo_Payroll As New OutPar.Payroll |
Dim lo_Report As New ProjectBudget |
Dim ds_ProjectList As DataSet |
Dim li_ProjectID As Integer |
Dim ls_Project As String = "" |
'Adjust header height based on menu levels |
rp_Header.Height = 62 |
'Display page height according to client screen resolution |
rs_Main.Height = CInt(Session("gi_PageHeight")) |
rv_ProjectBudget.Height = CInt(Session("gi_PageHeight")) - 310 |
'Initialization |
If lb_ProjectList.SelectedIndex > -1 Then |
li_ProjectID = lb_ProjectList.SelectedValue |
ls_Project = lb_ProjectList.SelectedItem.Text |
End If |
If Page.IsPostBack = False Then |
'Populate project list |
ds_ProjectList = lo_DataEntry.GetProjectList() |
lb_ProjectList.Items.Clear() |
lb_ProjectList.SelectedValue = Nothing |
lb_ProjectList.DataSource = ds_ProjectList |
lb_ProjectList.DataBind() |
lb_ProjectList.Items.Insert(0, New ListItem("-Make a Selection-", "-1")) |
lb_ProjectList.SelectedValue = -1 |
'Make report invisible |
rp_Main.Visible = False |
'Update user feedback |
lbl_UserFeedback.Text = "Choose project." |
lbl_UserFeedback.CssClass = "UserFeedback" |
Else |
'If project chosen |
If lb_ProjectList.SelectedIndex > -1 Then |
'Get parameter defaults. Default Name format: [Company Code] [Project Name] [Report Name] [Parameter Name] |
lo_Report.ReportParameters("pi_ProjectID").Value() = li_ProjectID |
lo_Report.ReportParameters("ps_Project").Value() = ls_Project |
lo_Report.ReportParameters("pd_BeginDate").Value() = lo_Payroll.GetSystemDefault(Session("gs_CoCode") & " " & ls_Project & " ProjectBudget BeginDate") |
lo_Report.ReportParameters("pd_EndDate").Value() = lo_Payroll.GetSystemDefault(Session("gs_CoCode") & " " & ls_Project & " ProjectBudget EndDate") |
lo_Report.ReportParameters("pc_ActRevenueDollars").Value() = lo_Payroll.GetSystemDefault(Session("gs_CoCode") & " " & ls_Project & " ProjectBudget ActRevenueDollars") |
lo_Report.ReportParameters("pi_ActMaterialsUnits").Value() = lo_Payroll.GetSystemDefault(Session("gs_CoCode") & " " & ls_Project & " ProjectBudget ActMaterialsUnits") |
lo_Report.ReportParameters("pc_ActMaterialsDollars").Value() = lo_Payroll.GetSystemDefault(Session("gs_CoCode") & " " & ls_Project & " ProjectBudget ActMaterialsDollars") |
lo_Report.ReportParameters("pi_ActSubcontractUnits").Value() = lo_Payroll.GetSystemDefault(Session("gs_CoCode") & " " & ls_Project & " ProjectBudget ActSubcontractUnits") |
lo_Report.ReportParameters("pc_ActSubcontractDollars").Value() = lo_Payroll.GetSystemDefault(Session("gs_CoCode") & " " & ls_Project & " ProjectBudget ActSubcontractDollars") |
lo_Report.ReportParameters("pi_ActCapitalUnits").Value() = lo_Payroll.GetSystemDefault(Session("gs_CoCode") & " " & ls_Project & " ProjectBudget ActCapitalUnits") |
lo_Report.ReportParameters("pc_ActCapitalDollars").Value() = lo_Payroll.GetSystemDefault(Session("gs_CoCode") & " " & ls_Project & " ProjectBudget ActCapitalDollars") |
End If |
'Assign report class to report viewer |
rv_ProjectBudget.Report = lo_Report |
'Make report visible |
rp_Main.Visible = True |
'Update user feedback |
lbl_UserFeedback.Text = "Enter report values & then click ""Preview""." |
lbl_UserFeedback.CssClass = "UserFeedback" |
End If |
'Clean up |
lo_DataEntry = Nothing |
lo_Payroll = Nothing |
lo_Report = Nothing |
End Sub |
Protected Sub Page_PreInit(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.PreInit |
'Declare objects/variables |
Dim ls_Skin As String |
'Set skin of splitter control |
ls_Skin = ConfigurationManager.AppSettings("SplitterSkin_" & Session("gs_CoCode")) 'Must add reference to System.Configuration.dll |
rs_Main.Skin = ls_Skin |
'Set skin of calendar controls |
ls_Skin = ConfigurationManager.AppSettings("CalendarSkin_" & Session("gs_CoCode")) 'Must add reference to System.Configuration.dll |
End Sub |
Protected Sub Page_PreRender(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.PreRender |
'Declare objects/variables |
Dim lo_Security As New OutPar.Security |
Dim lo_Report As New ProjectBudget |
Dim li_ProjectID As Integer |
Dim ls_Project As String |
'Set page stylesheet |
ss_PageStylesheet.Attributes.Add("href", lo_Security.GetStylesheet()) |
'Clean up |
lo_Security = Nothing |
End Sub |
End Class |
0
Hello Jim,
This was a known issue which we've fixed in the Q2 release. We noticed that your download history shows records for Q1 SP1, so please download the latest official version and let us know if still having problems.
Greetings,
Steve
the Telerik team
Instantly find answers to your questions on the new Telerik Support Portal.
Watch a video on how to optimize your support resource searches and check out more tips on the blogs.
This was a known issue which we've fixed in the Q2 release. We noticed that your download history shows records for Q1 SP1, so please download the latest official version and let us know if still having problems.
Greetings,
Steve
the Telerik team
Instantly find answers to your questions on the new Telerik Support Portal.
Watch a video on how to optimize your support resource searches and check out more tips on the blogs.
0
Jim
Top achievements
Rank 1
answered on 14 Oct 2009, 03:49 AM
Dear Telerik Support,
Upgrading to Telerik Reporting Q2 2009 did the trick. Thank you for your excellent support.
Woody
Upgrading to Telerik Reporting Q2 2009 did the trick. Thank you for your excellent support.
Woody