All text formating I that I make in VB Studio to charts on my report don't carry over when compiled into a binary. Al changes come out in the preview tab but when I compile the report into a dll binary that is used to export the data and charts into a PDF file none of the text formatting is there. This is especially annoying when the values on the charts are large currency numbers. I have tried formating the text in both VB and in VB properties table and neither do any different.
I am able to angle the axises and the label values on the charts but color, font, and numerical format do not differ.
I am able to angle the axises and the label values on the charts but color, font, and numerical format do not differ.
2 Answers, 1 is accepted
0
Hi Bradley,
Unfortunately the provided information is insufficient for us to determine what might be the problem and we would appreciate if you send us a sample application that shows the problem you've encountered. Additionally we're still waiting for a reply in the previous thread you have opened and would appreciate if you address the questions there.
Regards,
Steve
the Telerik team
Unfortunately the provided information is insufficient for us to determine what might be the problem and we would appreciate if you send us a sample application that shows the problem you've encountered. Additionally we're still waiting for a reply in the previous thread you have opened and would appreciate if you address the questions there.
Regards,
Steve
the Telerik team
Do you want to have your say when we set our development plans?
Do you want to know when a feature you care about is added or when a bug fixed?
Explore the
Telerik Public Issue Tracking
system and vote to affect the priority of the items
0
Bradley
Top achievements
Rank 1
answered on 15 Oct 2010, 03:56 PM
The issue is with the fiveYearPlan Bar chart. The values in the plot area for each bar returns in plain decimal format (it's compiled as a project that exports the entire report as a pdf file), yet the preview in of the report in VB studio returns the values in a currency format.
This is the Designer VB:
And this is the custom code:
This is the Designer VB:
Imports System.ComponentModelImports System.DrawingImports System.Windows.FormsImports Telerik.ReportingImports Telerik.Reporting.DrawingPartial Class TableOfContents '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 FormattingRule2 As Telerik.Reporting.Drawing.FormattingRule = New Telerik.Reporting.Drawing.FormattingRule Dim FormattingRule3 As Telerik.Reporting.Drawing.FormattingRule = New Telerik.Reporting.Drawing.FormattingRule Dim FormattingRule4 As Telerik.Reporting.Drawing.FormattingRule = New Telerik.Reporting.Drawing.FormattingRule Dim FormattingRule5 As Telerik.Reporting.Drawing.FormattingRule = New Telerik.Reporting.Drawing.FormattingRule Dim FormattingRule6 As Telerik.Reporting.Drawing.FormattingRule = New Telerik.Reporting.Drawing.FormattingRule Dim Corners1 As Telerik.Reporting.Charting.Styles.Corners = New Telerik.Reporting.Charting.Styles.Corners Dim ChartMargins1 As Telerik.Reporting.Charting.Styles.ChartMargins = New Telerik.Reporting.Charting.Styles.ChartMargins Dim ChartPaddings1 As Telerik.Reporting.Charting.Styles.ChartPaddings = New Telerik.Reporting.Charting.Styles.ChartPaddings Dim ChartMargins2 As Telerik.Reporting.Charting.Styles.ChartMargins = New Telerik.Reporting.Charting.Styles.ChartMargins Dim ChartPaddings2 As Telerik.Reporting.Charting.Styles.ChartPaddings = New Telerik.Reporting.Charting.Styles.ChartPaddings Dim ChartMargins3 As Telerik.Reporting.Charting.Styles.ChartMargins = New Telerik.Reporting.Charting.Styles.ChartMargins Dim ChartPaddings3 As Telerik.Reporting.Charting.Styles.ChartPaddings = New Telerik.Reporting.Charting.Styles.ChartPaddings Dim ChartMargins4 As Telerik.Reporting.Charting.Styles.ChartMargins = New Telerik.Reporting.Charting.Styles.ChartMargins Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(TableOfContents)) Dim Corners2 As Telerik.Reporting.Charting.Styles.Corners = New Telerik.Reporting.Charting.Styles.Corners Dim ChartMargins5 As Telerik.Reporting.Charting.Styles.ChartMargins = New Telerik.Reporting.Charting.Styles.ChartMargins Dim ChartPaddings4 As Telerik.Reporting.Charting.Styles.ChartPaddings = New Telerik.Reporting.Charting.Styles.ChartPaddings Dim ChartMargins6 As Telerik.Reporting.Charting.Styles.ChartMargins = New Telerik.Reporting.Charting.Styles.ChartMargins Dim ChartPaddingsLegend1 As Telerik.Reporting.Charting.Styles.ChartPaddingsLegend = New Telerik.Reporting.Charting.Styles.ChartPaddingsLegend Dim ChartMargins7 As Telerik.Reporting.Charting.Styles.ChartMargins = New Telerik.Reporting.Charting.Styles.ChartMargins Dim ChartPaddings5 As Telerik.Reporting.Charting.Styles.ChartPaddings = New Telerik.Reporting.Charting.Styles.ChartPaddings Dim ChartMargins8 As Telerik.Reporting.Charting.Styles.ChartMargins = New Telerik.Reporting.Charting.Styles.ChartMargins Dim ChartPaddings6 As Telerik.Reporting.Charting.Styles.ChartPaddings = New Telerik.Reporting.Charting.Styles.ChartPaddings Dim ChartAxisItem1 As Telerik.Reporting.Charting.ChartAxisItem = New Telerik.Reporting.Charting.ChartAxisItem Dim ChartAxisItem2 As Telerik.Reporting.Charting.ChartAxisItem = New Telerik.Reporting.Charting.ChartAxisItem Dim ChartAxisItem3 As Telerik.Reporting.Charting.ChartAxisItem = New Telerik.Reporting.Charting.ChartAxisItem Dim ChartAxisItem4 As Telerik.Reporting.Charting.ChartAxisItem = New Telerik.Reporting.Charting.ChartAxisItem Dim ChartAxisItem5 As Telerik.Reporting.Charting.ChartAxisItem = New Telerik.Reporting.Charting.ChartAxisItem Dim ChartAxisItem6 As Telerik.Reporting.Charting.ChartAxisItem = New Telerik.Reporting.Charting.ChartAxisItem Dim ChartAxisItem7 As Telerik.Reporting.Charting.ChartAxisItem = New Telerik.Reporting.Charting.ChartAxisItem Dim ChartSeries1 As Telerik.Reporting.Charting.ChartSeries = New Telerik.Reporting.Charting.ChartSeries Dim ReportParameter1 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter Me.TextBox1 = New Telerik.Reporting.TextBox Me.TextBox4 = New Telerik.Reporting.TextBox Me.TextBox5 = New Telerik.Reporting.TextBox Me.TextBox6 = New Telerik.Reporting.TextBox Me.TextBox7 = New Telerik.Reporting.TextBox Me.DetailSection1 = New Telerik.Reporting.DetailSection Me.TextBox26 = New Telerik.Reporting.TextBox Me.TextBox2 = New Telerik.Reporting.TextBox Me.TextBox24 = New Telerik.Reporting.TextBox Me.TextBox25 = New Telerik.Reporting.TextBox Me.Shape3 = New Telerik.Reporting.Shape Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection Me.DATableOfContents = New System.Data.SqlClient.SqlDataAdapter Me.ReportHeaderSection1 = New Telerik.Reporting.ReportHeaderSection Me.SqlSelectCommand2 = New System.Data.SqlClient.SqlCommand Me.DAPieChart = New System.Data.SqlClient.SqlDataAdapter Me.ReportFooterSection1 = New Telerik.Reporting.ReportFooterSection Me.PieChart = New Telerik.Reporting.Chart Me.TextBox23 = New Telerik.Reporting.TextBox Me.Shape1 = New Telerik.Reporting.Shape Me.TextBox21 = New Telerik.Reporting.TextBox Me.TextBox20 = New Telerik.Reporting.TextBox Me.TextBox19 = New Telerik.Reporting.TextBox Me.TextBox18 = New Telerik.Reporting.TextBox Me.TextBox17 = New Telerik.Reporting.TextBox Me.TextBox16 = New Telerik.Reporting.TextBox Me.TextBox8 = New Telerik.Reporting.TextBox Me.TextBox14 = New Telerik.Reporting.TextBox Me.TextBox13 = New Telerik.Reporting.TextBox Me.TextBox12 = New Telerik.Reporting.TextBox Me.TextBox11 = New Telerik.Reporting.TextBox Me.TextBox10 = New Telerik.Reporting.TextBox Me.TextBox9 = New Telerik.Reporting.TextBox Me.TextBox15 = New Telerik.Reporting.TextBox Me.TextBox22 = New Telerik.Reporting.TextBox Me.TextBox3 = New Telerik.Reporting.TextBox Me.TextBox27 = New Telerik.Reporting.TextBox Me.TextBox28 = New Telerik.Reporting.TextBox Me.fiveYearPlan = New Telerik.Reporting.Chart Me.DABarChart = New System.Data.SqlClient.SqlDataAdapter Me.SqlCommand1 = New System.Data.SqlClient.SqlCommand CType(Me, System.ComponentModel.ISupportInitialize).BeginInit() ' 'TextBox1 ' Me.TextBox1.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.60000002384185791, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.18000000715255737, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.23000000417232513, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox1.Style.Font.Bold = False Me.TextBox1.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox1.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox1.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(-0.029999999329447746, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox1.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox1.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox1.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox1.Value = "Table of Contents:" ' 'TextBox4 ' FormattingRule1.Filters.AddRange(New Telerik.Reporting.Data.Filter() {New Telerik.Reporting.Data.Filter("=Fields.TotalSavings_Assemblies", Telerik.Reporting.Data.FilterOperator.Equal, "0")}) FormattingRule1.Style.Visible = False Me.TextBox4.ConditionalFormatting.AddRange(New Telerik.Reporting.Drawing.FormattingRule() {FormattingRule1}) Me.TextBox4.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.80035686492919922, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.48966217041015625, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox4.Name = "TextBox4" Me.TextBox4.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.9000401496887207, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox4.Style.BackgroundColor = System.Drawing.Color.White Me.TextBox4.Style.BorderColor.Top = System.Drawing.Color.White Me.TextBox4.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid Me.TextBox4.Style.BorderWidth.Top = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel) Me.TextBox4.Style.Color = System.Drawing.Color.DimGray Me.TextBox4.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(9, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox4.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox4.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox4.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.029999999329447746, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox4.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox4.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox4.Value = "• Component/Assembly Overview" ' 'TextBox5 ' FormattingRule2.Filters.AddRange(New Telerik.Reporting.Data.Filter() {New Telerik.Reporting.Data.Filter("=Fields.[TotalSavings_ProductProcess]", Telerik.Reporting.Data.FilterOperator.Equal, "0")}) FormattingRule2.Style.Visible = False Me.TextBox5.ConditionalFormatting.AddRange(New Telerik.Reporting.Drawing.FormattingRule() {FormattingRule2}) Me.TextBox5.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.800356924533844, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.88981980085372925, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox5.Name = "TextBox5" Me.TextBox5.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.9000401496887207, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox5.Style.BackgroundColor = System.Drawing.Color.White Me.TextBox5.Style.BorderColor.Top = System.Drawing.Color.White Me.TextBox5.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid Me.TextBox5.Style.BorderWidth.Top = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel) Me.TextBox5.Style.Color = System.Drawing.Color.DimGray Me.TextBox5.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(9, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox5.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox5.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox5.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.029999999329447746, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox5.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox5.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox5.Value = "• Process Improvements" ' 'TextBox6 ' FormattingRule3.Filters.AddRange(New Telerik.Reporting.Data.Filter() {New Telerik.Reporting.Data.Filter("=Fields.[TotalSavings_Additional]", Telerik.Reporting.Data.FilterOperator.Equal, "0")}) FormattingRule3.Style.Visible = False Me.TextBox6.ConditionalFormatting.AddRange(New Telerik.Reporting.Drawing.FormattingRule() {FormattingRule3}) Me.TextBox6.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.800356924533844, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.0898985862731934, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox6.Name = "TextBox6" Me.TextBox6.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.9000401496887207, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox6.Style.BackgroundColor = System.Drawing.Color.White Me.TextBox6.Style.BorderColor.Top = System.Drawing.Color.White Me.TextBox6.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid Me.TextBox6.Style.BorderWidth.Top = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel) Me.TextBox6.Style.Color = System.Drawing.Color.DimGray Me.TextBox6.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(9, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox6.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox6.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox6.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.029999999329447746, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox6.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox6.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox6.Value = "• Additional Savings" ' 'TextBox7 ' FormattingRule4.Filters.AddRange(New Telerik.Reporting.Data.Filter() {New Telerik.Reporting.Data.Filter("=Fields.[TotalSavings_ExtrasForDiscussion]", Telerik.Reporting.Data.FilterOperator.Equal, "0")}) FormattingRule4.Style.Visible = False Me.TextBox7.ConditionalFormatting.AddRange(New Telerik.Reporting.Drawing.FormattingRule() {FormattingRule4}) Me.TextBox7.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.800356924533844, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.2899775505065918, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox7.Name = "TextBox7" Me.TextBox7.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.9000401496887207, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox7.Style.BackgroundColor = System.Drawing.Color.White Me.TextBox7.Style.BorderColor.Top = System.Drawing.Color.White Me.TextBox7.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid Me.TextBox7.Style.BorderWidth.Top = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel) Me.TextBox7.Style.Color = System.Drawing.Color.DimGray Me.TextBox7.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(9, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox7.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox7.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox7.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.029999999329447746, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox7.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox7.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox7.Value = "• Extra Services" ' 'DetailSection1 ' Me.DetailSection1.Height = New Telerik.Reporting.Drawing.Unit(1.7000001668930054, Telerik.Reporting.Drawing.UnitType.Inch) Me.DetailSection1.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.TextBox26, Me.TextBox4, Me.TextBox5, Me.TextBox6, Me.TextBox7, Me.TextBox2, Me.TextBox24, Me.TextBox25, Me.Shape3}) Me.DetailSection1.Name = "DetailSection1" ' 'TextBox26 ' Me.TextBox26.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.80035686492919922, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox26.Name = "TextBox26" Me.TextBox26.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.9000411033630371, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.25999999046325684, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox26.Style.BackgroundColor = System.Drawing.Color.White Me.TextBox26.Style.Color = System.Drawing.Color.Black Me.TextBox26.Style.Font.Bold = True Me.TextBox26.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox26.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox26.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox26.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox26.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox26.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Top Me.TextBox26.Value = "=Fields.SolutionName" ' 'TextBox2 ' Me.TextBox2.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.80035686492919922, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox2.Name = "TextBox2" Me.TextBox2.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.2000001072883606, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.25999999046325684, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox2.Style.BackgroundColor = System.Drawing.Color.White Me.TextBox2.Style.Color = System.Drawing.Color.Black Me.TextBox2.Style.Font.Bold = True Me.TextBox2.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox2.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox2.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(-0.019999999552965164, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox2.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox2.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox2.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Top Me.TextBox2.Value = "=Fields.RowNumber + "".""" ' 'TextBox24 ' FormattingRule5.Filters.AddRange(New Telerik.Reporting.Data.Filter() {New Telerik.Reporting.Data.Filter("=Fields.TotalSavings_Assemblies + Fields.TotalSavings_AssembliesLabor", Telerik.Reporting.Data.FilterOperator.Equal, "0")}) FormattingRule5.Style.Visible = False Me.TextBox24.ConditionalFormatting.AddRange(New Telerik.Reporting.Drawing.FormattingRule() {FormattingRule5}) Me.TextBox24.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.800396740436554, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.68974095582962036, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox24.Name = "TextBox24" Me.TextBox24.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.900001049041748, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox24.Style.BackgroundColor = System.Drawing.Color.White Me.TextBox24.Style.BorderColor.Top = System.Drawing.Color.White Me.TextBox24.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid Me.TextBox24.Style.BorderWidth.Top = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel) Me.TextBox24.Style.Color = System.Drawing.Color.DimGray Me.TextBox24.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(9, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox24.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox24.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox24.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.029999999329447746, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox24.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox24.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox24.Value = "• Component/Assembly Details" ' 'TextBox25 ' FormattingRule6.Filters.AddRange(New Telerik.Reporting.Data.Filter() {New Telerik.Reporting.Data.Filter("=Fields.[TotalSavings_LCO]", Telerik.Reporting.Data.FilterOperator.Equal, "0")}) FormattingRule6.Style.Visible = False Me.TextBox25.ConditionalFormatting.AddRange(New Telerik.Reporting.Drawing.FormattingRule() {FormattingRule6}) Me.TextBox25.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.800356924533844, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.28958335518836975, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox25.Name = "TextBox25" Me.TextBox25.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.9000401496887207, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox25.Style.BackgroundColor = System.Drawing.Color.White Me.TextBox25.Style.BorderColor.Top = System.Drawing.Color.White Me.TextBox25.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid Me.TextBox25.Style.BorderWidth.Top = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel) Me.TextBox25.Style.Color = System.Drawing.Color.DimGray Me.TextBox25.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(9, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox25.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox25.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox25.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.029999999329447746, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox25.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox25.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox25.Value = "• Lowest Cost of Ownership (LCO)" ' 'Shape3 ' Me.Shape3.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.80023783445358276, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.26007881760597229, Telerik.Reporting.Drawing.UnitType.Inch)) Me.Shape3.Name = "Shape3" Me.Shape3.ShapeType = New Telerik.Reporting.Drawing.Shapes.LineShape(Telerik.Reporting.Drawing.Shapes.LineDirection.EW) Me.Shape3.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.9000391960144043, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)) Me.Shape3.Style.Color = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(145, Byte), Integer), CType(CType(164, Byte), Integer)) Me.Shape3.Style.LineStyle = Telerik.Reporting.Drawing.LineStyle.Solid Me.Shape3.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel) ' 'SqlSelectCommand1 ' Me.SqlSelectCommand1.CommandText = "dbo.Reporting_TableOfContentsSummary_SELECT" Me.SqlSelectCommand1.CommandType = System.Data.CommandType.StoredProcedure Me.SqlSelectCommand1.Connection = Me.SqlConnection1 Me.SqlSelectCommand1.Parameters.AddRange(New System.Data.SqlClient.SqlParameter() {New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, 0), New System.Data.SqlClient.SqlParameter("@SolutionIDList", System.Data.SqlDbType.VarChar, 100, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, "233,240")}) ' 'SqlConnection1 ' Me.SqlConnection1.ConnectionString = "Data Source=127.0.0.1\SQL;Initial Catalog=HartfielCPR;Persist Security Inf" & _ "o=True;User ID=Admin;Password=password" Me.SqlConnection1.FireInfoMessageEventOnUserErrors = False ' 'DATableOfContents ' Me.DATableOfContents.SelectCommand = Me.SqlSelectCommand1 Me.DATableOfContents.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "Reporting_TableOfContentsSummary_SELECT", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("RowNumber", "RowNumber"), New System.Data.Common.DataColumnMapping("SolutionID", "SolutionID"), New System.Data.Common.DataColumnMapping("ProposedAssemblyID", "ProposedAssemblyID"), New System.Data.Common.DataColumnMapping("ExistingAssemblyID", "ExistingAssemblyID"), New System.Data.Common.DataColumnMapping("ID", "ID"), New System.Data.Common.DataColumnMapping("CompanyID", "CompanyID"), New System.Data.Common.DataColumnMapping("ClientID", "ClientID"), New System.Data.Common.DataColumnMapping("ProjectID", "ProjectID"), New System.Data.Common.DataColumnMapping("MachineID", "MachineID"), New System.Data.Common.DataColumnMapping("Name", "Name"), New System.Data.Common.DataColumnMapping("Grade", "Grade"), New System.Data.Common.DataColumnMapping("Presented", "Presented"), New System.Data.Common.DataColumnMapping("Accepted", "Accepted"), New System.Data.Common.DataColumnMapping("InProgress", "InProgress"), New System.Data.Common.DataColumnMapping("Completed", "Completed"), New System.Data.Common.DataColumnMapping("Rejected", "Rejected"), New System.Data.Common.DataColumnMapping("DatePresented", "DatePresented"), New System.Data.Common.DataColumnMapping("DateAccepted", "DateAccepted"), New System.Data.Common.DataColumnMapping("DateInProgress", "DateInProgress"), New System.Data.Common.DataColumnMapping("DateCompleted", "DateCompleted"), New System.Data.Common.DataColumnMapping("DateRejected", "DateRejected"), New System.Data.Common.DataColumnMapping("DateGradeChanged", "DateGradeChanged"), New System.Data.Common.DataColumnMapping("Status", "Status"), New System.Data.Common.DataColumnMapping("DateCreated", "DateCreated"), New System.Data.Common.DataColumnMapping("DateModified", "DateModified"), New System.Data.Common.DataColumnMapping("ID1", "ID1"), New System.Data.Common.DataColumnMapping("CompanyID1", "CompanyID1"), New System.Data.Common.DataColumnMapping("ClientID1", "ClientID1"), New System.Data.Common.DataColumnMapping("ProjectID1", "ProjectID1"), New System.Data.Common.DataColumnMapping("Name1", "Name1"), New System.Data.Common.DataColumnMapping("BurdenRate", "BurdenRate"), New System.Data.Common.DataColumnMapping("Status1", "Status1"), New System.Data.Common.DataColumnMapping("DateCreated1", "DateCreated1"), New System.Data.Common.DataColumnMapping("DateModified1", "DateModified1"), New System.Data.Common.DataColumnMapping("ID2", "ID2"), New System.Data.Common.DataColumnMapping("CompanyID2", "CompanyID2"), New System.Data.Common.DataColumnMapping("ClientID2", "ClientID2"), New System.Data.Common.DataColumnMapping("Name2", "Name2"), New System.Data.Common.DataColumnMapping("Status2", "Status2"), New System.Data.Common.DataColumnMapping("DateCreated2", "DateCreated2"), New System.Data.Common.DataColumnMapping("DateModified2", "DateModified2"), New System.Data.Common.DataColumnMapping("ID3", "ID3"), New System.Data.Common.DataColumnMapping("CompanyID3", "CompanyID3"), New System.Data.Common.DataColumnMapping("UserID", "UserID"), New System.Data.Common.DataColumnMapping("Name3", "Name3"), New System.Data.Common.DataColumnMapping("Division", "Division"), New System.Data.Common.DataColumnMapping("City", "City"), New System.Data.Common.DataColumnMapping("State", "State"), New System.Data.Common.DataColumnMapping("Country", "Country"), New System.Data.Common.DataColumnMapping("OEM", "OEM"), New System.Data.Common.DataColumnMapping("IndustryID", "IndustryID"), New System.Data.Common.DataColumnMapping("SubIndustryID", "SubIndustryID"), New System.Data.Common.DataColumnMapping("NAICSCode", "NAICSCode"), New System.Data.Common.DataColumnMapping("Notes", "Notes"), New System.Data.Common.DataColumnMapping("Status3", "Status3"), New System.Data.Common.DataColumnMapping("DateCreated3", "DateCreated3"), New System.Data.Common.DataColumnMapping("DateModified3", "DateModified3")})}) ' 'ReportHeaderSection1 ' Me.ReportHeaderSection1.Height = New Telerik.Reporting.Drawing.Unit(0.550000011920929, Telerik.Reporting.Drawing.UnitType.Inch) Me.ReportHeaderSection1.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.TextBox1}) Me.ReportHeaderSection1.Name = "ReportHeaderSection1" Me.ReportHeaderSection1.PageBreak = Telerik.Reporting.PageBreak.Before ' 'SqlSelectCommand2 ' Me.SqlSelectCommand2.CommandText = "dbo.Reporting_TableOfContentsSummary_SELECT_Chart" Me.SqlSelectCommand2.CommandType = System.Data.CommandType.StoredProcedure Me.SqlSelectCommand2.Connection = Me.SqlConnection1 Me.SqlSelectCommand2.Parameters.AddRange(New System.Data.SqlClient.SqlParameter() {New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing), New System.Data.SqlClient.SqlParameter("@SolutionIDList", System.Data.SqlDbType.VarChar, 100, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, "752")}) ' 'DAPieChart ' Me.DAPieChart.SelectCommand = Me.SqlSelectCommand2 Me.DAPieChart.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "Reporting_TableOfContentsSummary_SELECT_Chart", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("ChartText", "ChartText"), New System.Data.Common.DataColumnMapping("ChartValue", "ChartValue")})}) ' 'ReportFooterSection1 ' Me.ReportFooterSection1.Height = New Telerik.Reporting.Drawing.Unit(6.2500014305114746, Telerik.Reporting.Drawing.UnitType.Inch) Me.ReportFooterSection1.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.PieChart, Me.TextBox23, Me.Shape1, Me.TextBox21, Me.TextBox20, Me.TextBox19, Me.TextBox18, Me.TextBox17, Me.TextBox16, Me.TextBox8, Me.TextBox14, Me.TextBox13, Me.TextBox12, Me.TextBox11, Me.TextBox10, Me.TextBox9, Me.TextBox15, Me.TextBox22, Me.TextBox3, Me.TextBox27, Me.TextBox28, Me.fiveYearPlan}) Me.ReportFooterSection1.Name = "ReportFooterSection1" Me.ReportFooterSection1.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom ' 'PieChart ' Me.PieChart.Appearance.Border.Color = System.Drawing.Color.Transparent Me.PieChart.Appearance.Border.Visible = False Me.PieChart.Appearance.Border.Width = 0.0! Corners1.RoundSize = 0 Me.PieChart.Appearance.Corners = Corners1 ChartMargins1.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins1.Left = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins1.Right = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins1.Top = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.PieChart.Appearance.Dimensions.Margins = ChartMargins1 ChartPaddings1.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings1.Left = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings1.Right = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings1.Top = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.PieChart.Appearance.Dimensions.Paddings = ChartPaddings1 Me.PieChart.Appearance.FillStyle.MainColor = System.Drawing.Color.Transparent Me.PieChart.Appearance.FillStyle.SecondColor = System.Drawing.Color.Transparent Me.PieChart.Appearance.ImageQuality = Telerik.Reporting.Charting.Styles.ImageQuality.AntiAlias Me.PieChart.AutoLayout = True Me.PieChart.BitmapResolution = 96.0! Me.PieChart.ChartTitle.Appearance.FillStyle.MainColor = System.Drawing.Color.Empty Me.PieChart.ChartTitle.Appearance.Visible = False Me.PieChart.ChartTitle.TextBlock.Appearance.TextProperties.Color = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(79, Byte), Integer)) Me.PieChart.ChartTitle.Visible = False Me.PieChart.DefaultType = Telerik.Reporting.Charting.ChartSeriesType.Pie Me.PieChart.ImageFormat = System.Drawing.Imaging.ImageFormat.Emf Me.PieChart.IntelligentLabelsEnabled = True Me.PieChart.Legend.Appearance.Border.Color = System.Drawing.Color.Transparent Me.PieChart.Legend.Appearance.Border.Visible = False Me.PieChart.Legend.Appearance.Border.Width = 0.0! Me.PieChart.Legend.Appearance.Dimensions.AutoSize = False Me.PieChart.Legend.Appearance.Dimensions.Height = New Telerik.Reporting.Charting.Styles.Unit(120, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins2.Right = New Telerik.Reporting.Charting.Styles.Unit(3, Telerik.Reporting.Charting.Styles.UnitType.Percentage) ChartMargins2.Top = New Telerik.Reporting.Charting.Styles.Unit(17.600000381469727, Telerik.Reporting.Charting.Styles.UnitType.Percentage) Me.PieChart.Legend.Appearance.Dimensions.Margins = ChartMargins2 ChartPaddings2.Bottom = New Telerik.Reporting.Charting.Styles.Unit(2, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings2.Left = New Telerik.Reporting.Charting.Styles.Unit(3, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings2.Right = New Telerik.Reporting.Charting.Styles.Unit(8, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings2.Top = New Telerik.Reporting.Charting.Styles.Unit(2, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.PieChart.Legend.Appearance.Dimensions.Paddings = ChartPaddings2 Me.PieChart.Legend.Appearance.Dimensions.Width = New Telerik.Reporting.Charting.Styles.Unit(240, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.PieChart.Legend.Appearance.FillStyle.SecondColor = System.Drawing.Color.White Me.PieChart.Legend.Appearance.ItemTextAppearance.AutoTextWrap = Telerik.Reporting.Charting.Styles.AutoTextWrap.[True] ChartMargins3.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins3.Top = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.PieChart.Legend.Appearance.ItemTextAppearance.Dimensions.Margins = ChartMargins3 ChartPaddings3.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings3.Top = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.PieChart.Legend.Appearance.ItemTextAppearance.Dimensions.Paddings = ChartPaddings3 Me.PieChart.Legend.Appearance.ItemTextAppearance.TextProperties.Font = New System.Drawing.Font("Verdana", 8.0!) Me.PieChart.Legend.Appearance.Position.Auto = False Me.PieChart.Legend.Appearance.Position.X = 195.0! Me.PieChart.Legend.Appearance.Position.Y = 36.0! Me.PieChart.Legend.Appearance.Shadow.Color = System.Drawing.Color.White Me.PieChart.Legend.Marker.Appearance.Border.Visible = False Me.PieChart.Legend.TextBlock.Appearance.Border.Visible = False Me.PieChart.Legend.TextBlock.Appearance.TextProperties.Font = New System.Drawing.Font("Verdana", 7.25!) Me.PieChart.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.4000000953674316, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.52083325386047363, Telerik.Reporting.Drawing.UnitType.Inch)) Me.PieChart.Name = "PieChart" Me.PieChart.PlotArea.Appearance.Border.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.PieChart.PlotArea.Appearance.Border.Visible = False Me.PieChart.PlotArea.Appearance.Dimensions.AutoSize = False Me.PieChart.PlotArea.Appearance.Dimensions.Height = New Telerik.Reporting.Charting.Styles.Unit(190, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins4.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins4.Left = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins4.Right = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins4.Top = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.PieChart.PlotArea.Appearance.Dimensions.Margins = ChartMargins4 Me.PieChart.PlotArea.Appearance.Dimensions.Width = New Telerik.Reporting.Charting.Styles.Unit(190, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.PieChart.PlotArea.Appearance.FillStyle.FillType = Telerik.Reporting.Charting.Styles.FillType.Solid Me.PieChart.PlotArea.Appearance.FillStyle.MainColor = System.Drawing.Color.White Me.PieChart.PlotArea.Appearance.FillStyle.SecondColor = System.Drawing.Color.White Me.PieChart.PlotArea.Appearance.Position.AlignedPosition = Telerik.Reporting.Charting.Styles.AlignedPositions.Left Me.PieChart.PlotArea.Appearance.SeriesPalette = "Mac" Me.PieChart.PlotArea.EmptySeriesMessage.Appearance.Visible = True Me.PieChart.PlotArea.EmptySeriesMessage.Visible = True Me.PieChart.PlotArea.XAxis.Appearance.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.PieChart.PlotArea.XAxis.Appearance.MajorGridLines.Color = System.Drawing.Color.FromArgb(CType(CType(209, Byte), Integer), CType(CType(221, Byte), Integer), CType(CType(238, Byte), Integer)) Me.PieChart.PlotArea.XAxis.Appearance.MajorGridLines.Width = 0.0! Me.PieChart.PlotArea.XAxis.Appearance.MajorTick.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.PieChart.PlotArea.XAxis.MinValue = 1 Me.PieChart.PlotArea.YAxis.Appearance.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.PieChart.PlotArea.YAxis.Appearance.MajorGridLines.Color = System.Drawing.Color.FromArgb(CType(CType(209, Byte), Integer), CType(CType(221, Byte), Integer), CType(CType(238, Byte), Integer)) Me.PieChart.PlotArea.YAxis.Appearance.MajorTick.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.PieChart.PlotArea.YAxis.Appearance.MinorGridLines.Color = System.Drawing.Color.FromArgb(CType(CType(209, Byte), Integer), CType(CType(221, Byte), Integer), CType(CType(238, Byte), Integer)) Me.PieChart.PlotArea.YAxis.Appearance.MinorTick.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.PieChart.SeriesPalette = "Mac" Me.PieChart.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.699880838394165, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.8024781942367554, Telerik.Reporting.Drawing.UnitType.Inch)) Me.PieChart.Style.BackgroundColor = System.Drawing.Color.Transparent Me.PieChart.Style.BorderWidth.Default = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.PieChart.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Point) ' 'TextBox23 ' Me.TextBox23.CanGrow = False Me.TextBox23.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.5, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.62083339691162109, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox23.Name = "TextBox23" Me.TextBox23.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.2199999988079071, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox23.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(145, Byte), Integer), CType(CType(164, Byte), Integer)) Me.TextBox23.Style.Color = System.Drawing.Color.White Me.TextBox23.Style.Font.Bold = True Me.TextBox23.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox23.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox23.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox23.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox23.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox23.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right Me.TextBox23.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox23.Value = "Totals" ' 'Shape1 ' Me.Shape1.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.5997622013092041, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.8500000238418579, Telerik.Reporting.Drawing.UnitType.Inch)) Me.Shape1.Name = "Shape1" Me.Shape1.ShapeType = New Telerik.Reporting.Drawing.Shapes.LineShape(Telerik.Reporting.Drawing.Shapes.LineDirection.EW) Me.Shape1.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(4.0002374649047852, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.10015805810689926, Telerik.Reporting.Drawing.UnitType.Inch)) Me.Shape1.Style.Color = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(145, Byte), Integer), CType(CType(164, Byte), Integer)) ' 'TextBox21 ' Me.TextBox21.Format = "{0:c2}" Me.TextBox21.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8602578639984131, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.1500003337860107, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox21.Name = "TextBox21" Me.TextBox21.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.7396234273910522, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox21.Style.BackgroundColor = System.Drawing.Color.Transparent Me.TextBox21.Style.Color = System.Drawing.Color.Black Me.TextBox21.Style.Font.Bold = True Me.TextBox21.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox21.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox21.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right Me.TextBox21.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox21.Value = resources.GetString("TextBox21.Value") ' 'TextBox20 ' Me.TextBox20.Format = "{0:c2}" Me.TextBox20.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8602578639984131, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.3500792980194092, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox20.Name = "TextBox20" Me.TextBox20.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.7396234273910522, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox20.Style.Color = System.Drawing.Color.Black Me.TextBox20.Style.Font.Bold = True Me.TextBox20.Style.Font.Italic = False Me.TextBox20.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox20.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox20.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox20.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right Me.TextBox20.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox20.Value = "=SUM(Fields.[TotalSavings_ExtrasForDiscussion])" ' 'TextBox19 ' Me.TextBox19.Format = "{0:c2}" Me.TextBox19.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8641870021820068, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.6542457342147827, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox19.Name = "TextBox19" Me.TextBox19.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.7397422790527344, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox19.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox19.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox19.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right Me.TextBox19.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox19.Value = "=SUM(Fields.[TotalSavings_Additional])" ' 'TextBox18 ' Me.TextBox18.Format = "{0:c2}" Me.TextBox18.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8645439147949219, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.87083339691162109, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox18.Name = "TextBox18" Me.TextBox18.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.7396234273910522, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox18.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox18.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox18.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right Me.TextBox18.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox18.Value = "=SUM(Fields.[TotalSavings_LCO])" ' 'TextBox17 ' Me.TextBox17.Format = "{0:c2}" Me.TextBox17.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8602578639984131, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.2687498331069946, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox17.Name = "TextBox17" Me.TextBox17.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.7397419214248657, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox17.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox17.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox17.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right Me.TextBox17.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox17.Value = "=SUM(Fields.[TotalSavings_AssembliesLabor]+Fields.[TotalSavings_SingleOccurrenceL" & _ "aborSavings])" ' 'TextBox16 ' Me.TextBox16.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.59999996423721313, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.2687498331069946, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox16.Name = "TextBox16" Me.TextBox16.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.260178804397583, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox16.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox16.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox16.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left Me.TextBox16.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox16.Value = "Assemblies/Components Labor" ' 'TextBox8 ' Me.TextBox8.Format = "{0:c2}" Me.TextBox8.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8602578639984131, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.0708332061767578, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox8.Name = "TextBox8" Me.TextBox8.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.7397422790527344, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox8.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox8.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox8.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right Me.TextBox8.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox8.Value = "=SUM(Fields.[TotalSavings_Assemblies] + Fields.[TotalSavings_SingleOccurrenceCost" & _ "sSavings])" ' 'TextBox14 ' Me.TextBox14.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.595714271068573, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.1500003337860107, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox14.Name = "TextBox14" Me.TextBox14.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.2644646167755127, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox14.Style.BackgroundColor = System.Drawing.Color.Transparent Me.TextBox14.Style.Color = System.Drawing.Color.Black Me.TextBox14.Style.Font.Bold = True Me.TextBox14.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox14.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox14.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left Me.TextBox14.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox14.Value = "Total Profit Improvement" ' 'TextBox13 ' Me.TextBox13.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.5997622013092041, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.6542457342147827, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox13.Name = "TextBox13" Me.TextBox13.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.2644646167755127, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox13.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox13.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox13.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left Me.TextBox13.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox13.Value = "Additional Savings/Income" ' 'TextBox12 ' Me.TextBox12.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.60000020265579224, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.87083339691162109, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox12.Name = "TextBox12" Me.TextBox12.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.2644646167755127, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox12.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox12.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox12.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left Me.TextBox12.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox12.Value = "Lowest Cost of Ownership (LCO)" ' 'TextBox11 ' Me.TextBox11.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.59999996423721313, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.4541667699813843, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox11.Name = "TextBox11" Me.TextBox11.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.2644646167755127, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox11.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox11.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox11.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left Me.TextBox11.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox11.Value = "Process Improvement" ' 'TextBox10 ' Me.TextBox10.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.59999996423721313, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.0708332061767578, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox10.Name = "TextBox10" Me.TextBox10.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.260178804397583, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox10.Style.Font.Name = "Arial" Me.TextBox10.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox10.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox10.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left Me.TextBox10.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox10.Value = "Assemblies/Components" ' 'TextBox9 ' Me.TextBox9.Format = "{0:c2}" Me.TextBox9.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8645436763763428, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.458491325378418, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox9.Name = "TextBox9" Me.TextBox9.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.7397422790527344, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox9.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox9.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox9.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right Me.TextBox9.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox9.Value = "=SUM(Fields.[TotalSavings_ProductProcess])" ' 'TextBox15 ' Me.TextBox15.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.595714271068573, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.3500792980194092, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox15.Name = "TextBox15" Me.TextBox15.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.2644646167755127, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox15.Style.Color = System.Drawing.Color.Black Me.TextBox15.Style.Font.Bold = True Me.TextBox15.Style.Font.Italic = False Me.TextBox15.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox15.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox15.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left Me.TextBox15.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox15.Value = "Extra Services Provided" ' 'TextBox22 ' Me.TextBox22.CanGrow = False Me.TextBox22.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.59999996423721313, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.62083339691162109, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox22.Name = "TextBox22" Me.TextBox22.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.0327975749969482, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.2199999988079071, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox22.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(137, Byte), Integer), CType(CType(145, Byte), Integer), CType(CType(164, Byte), Integer)) Me.TextBox22.Style.Color = System.Drawing.Color.White Me.TextBox22.Style.Font.Bold = True Me.TextBox22.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox22.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox22.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox22.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox22.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox22.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox22.Value = "Type of Savings" ' 'TextBox3 ' Me.TextBox3.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.60000002384185791, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.2008332759141922, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox3.Name = "TextBox3" Me.TextBox3.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.23000000417232513, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox3.Style.Font.Bold = False Me.TextBox3.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point) Me.TextBox3.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox3.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(-0.029999999329447746, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox3.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox3.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox3.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox3.Value = "Solution Sum Totals:" ' 'TextBox27 ' Me.TextBox27.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.595714271068573, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.9500001668930054, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox27.Name = "TextBox27" Me.TextBox27.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.2644646167755127, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox27.Style.Font.Bold = True Me.TextBox27.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox27.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox27.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left Me.TextBox27.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox27.Value = "ROI (years)" ' 'TextBox28 ' Me.TextBox28.Format = "{0:N2}" Me.TextBox28.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(2.8645439147949219, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.9500001668930054, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox28.Name = "TextBox28" Me.TextBox28.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.7397422790527344, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch)) Me.TextBox28.Style.Font.Bold = True Me.TextBox28.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox28.Style.Padding.Right = New Telerik.Reporting.Drawing.Unit(0.05000000074505806, Telerik.Reporting.Drawing.UnitType.Inch) Me.TextBox28.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right Me.TextBox28.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle Me.TextBox28.Value = resources.GetString("TextBox28.Value") ' 'fiveYearPlan ' Me.fiveYearPlan.Appearance.BarWidthPercent = New Decimal(New Integer() {50, 0, 0, 0}) Me.fiveYearPlan.Appearance.Border.Color = System.Drawing.Color.Transparent Me.fiveYearPlan.Appearance.Border.Visible = False Me.fiveYearPlan.Appearance.Border.Width = 0.0! Corners2.RoundSize = 0 Me.fiveYearPlan.Appearance.Corners = Corners2 ChartMargins5.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins5.Left = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins5.Right = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins5.Top = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.fiveYearPlan.Appearance.Dimensions.Margins = ChartMargins5 ChartPaddings4.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings4.Left = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings4.Right = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings4.Top = New Telerik.Reporting.Charting.Styles.Unit(10, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.fiveYearPlan.Appearance.Dimensions.Paddings = ChartPaddings4 Me.fiveYearPlan.Appearance.FillStyle.MainColor = System.Drawing.Color.Transparent Me.fiveYearPlan.Appearance.FillStyle.SecondColor = System.Drawing.Color.Transparent Me.fiveYearPlan.Appearance.ImageQuality = Telerik.Reporting.Charting.Styles.ImageQuality.AntiAlias Me.fiveYearPlan.AutoLayout = True Me.fiveYearPlan.BitmapResolution = 96.0! Me.fiveYearPlan.ChartTitle.Appearance.FillStyle.MainColor = System.Drawing.Color.Empty Me.fiveYearPlan.ChartTitle.TextBlock.Appearance.TextProperties.Color = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(79, Byte), Integer)) Me.fiveYearPlan.ChartTitle.TextBlock.Text = "Yearly Profit Impact" Me.fiveYearPlan.ImageFormat = System.Drawing.Imaging.ImageFormat.Emf Me.fiveYearPlan.IntelligentLabelsEnabled = True Me.fiveYearPlan.Legend.Appearance.Border.Color = System.Drawing.Color.Transparent Me.fiveYearPlan.Legend.Appearance.Border.Visible = False Me.fiveYearPlan.Legend.Appearance.Border.Width = 0.0! Me.fiveYearPlan.Legend.Appearance.Dimensions.AutoSize = False Me.fiveYearPlan.Legend.Appearance.Dimensions.Height = New Telerik.Reporting.Charting.Styles.Unit(120, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins6.Right = New Telerik.Reporting.Charting.Styles.Unit(3, Telerik.Reporting.Charting.Styles.UnitType.Percentage) ChartMargins6.Top = New Telerik.Reporting.Charting.Styles.Unit(17.600000381469727, Telerik.Reporting.Charting.Styles.UnitType.Percentage) Me.fiveYearPlan.Legend.Appearance.Dimensions.Margins = ChartMargins6 ChartPaddingsLegend1.Right = New Telerik.Reporting.Charting.Styles.Unit(8, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.fiveYearPlan.Legend.Appearance.Dimensions.Paddings = ChartPaddingsLegend1 Me.fiveYearPlan.Legend.Appearance.Dimensions.Width = New Telerik.Reporting.Charting.Styles.Unit(240, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.fiveYearPlan.Legend.Appearance.FillStyle.SecondColor = System.Drawing.Color.White Me.fiveYearPlan.Legend.Appearance.ItemTextAppearance.AutoTextWrap = Telerik.Reporting.Charting.Styles.AutoTextWrap.[True] ChartMargins7.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins7.Top = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.fiveYearPlan.Legend.Appearance.ItemTextAppearance.Dimensions.Margins = ChartMargins7 ChartPaddings5.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings5.Top = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.fiveYearPlan.Legend.Appearance.ItemTextAppearance.Dimensions.Paddings = ChartPaddings5 Me.fiveYearPlan.Legend.Appearance.ItemTextAppearance.TextProperties.Font = New System.Drawing.Font("Verdana", 8.0!) Me.fiveYearPlan.Legend.Appearance.Position.Auto = False Me.fiveYearPlan.Legend.Appearance.Position.X = 195.0! Me.fiveYearPlan.Legend.Appearance.Position.Y = 36.0! Me.fiveYearPlan.Legend.Appearance.Shadow.Color = System.Drawing.Color.White Me.fiveYearPlan.Legend.Appearance.Visible = False Me.fiveYearPlan.Legend.Marker.Appearance.Border.Visible = False Me.fiveYearPlan.Legend.TextBlock.Appearance.Border.Visible = False Me.fiveYearPlan.Legend.TextBlock.Appearance.TextProperties.Font = New System.Drawing.Font("Verdana", 7.25!) Me.fiveYearPlan.Legend.Visible = False Me.fiveYearPlan.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.59999996423721313, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.6500003337860107, Telerik.Reporting.Drawing.UnitType.Inch)) Me.fiveYearPlan.Name = "fiveYearPlan" Me.fiveYearPlan.PlotArea.Appearance.Border.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.fiveYearPlan.PlotArea.Appearance.Border.Visible = False ChartMargins8.Bottom = New Telerik.Reporting.Charting.Styles.Unit(4, Telerik.Reporting.Charting.Styles.UnitType.Percentage) ChartMargins8.Left = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins8.Right = New Telerik.Reporting.Charting.Styles.Unit(10, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartMargins8.Top = New Telerik.Reporting.Charting.Styles.Unit(10, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.fiveYearPlan.PlotArea.Appearance.Dimensions.Margins = ChartMargins8 ChartPaddings6.Bottom = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings6.Left = New Telerik.Reporting.Charting.Styles.Unit(20, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings6.Right = New Telerik.Reporting.Charting.Styles.Unit(0, Telerik.Reporting.Charting.Styles.UnitType.Pixel) ChartPaddings6.Top = New Telerik.Reporting.Charting.Styles.Unit(20, Telerik.Reporting.Charting.Styles.UnitType.Pixel) Me.fiveYearPlan.PlotArea.Appearance.Dimensions.Paddings = ChartPaddings6 Me.fiveYearPlan.PlotArea.Appearance.FillStyle.FillType = Telerik.Reporting.Charting.Styles.FillType.Solid Me.fiveYearPlan.PlotArea.Appearance.FillStyle.MainColor = System.Drawing.Color.White Me.fiveYearPlan.PlotArea.Appearance.FillStyle.SecondColor = System.Drawing.Color.White Me.fiveYearPlan.PlotArea.Appearance.Position.AlignedPosition = Telerik.Reporting.Charting.Styles.AlignedPositions.Center Me.fiveYearPlan.PlotArea.Appearance.SeriesPalette = "Mac" Me.fiveYearPlan.PlotArea.XAxis.Appearance.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.fiveYearPlan.PlotArea.XAxis.Appearance.LabelAppearance.RotationAngle = 30.0! Me.fiveYearPlan.PlotArea.XAxis.Appearance.MajorGridLines.Color = System.Drawing.Color.FromArgb(CType(CType(209, Byte), Integer), CType(CType(221, Byte), Integer), CType(CType(238, Byte), Integer)) Me.fiveYearPlan.PlotArea.XAxis.Appearance.MajorGridLines.Width = 0.0! Me.fiveYearPlan.PlotArea.XAxis.Appearance.MajorTick.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.fiveYearPlan.PlotArea.XAxis.Appearance.TextAppearance.TextProperties.Color = System.Drawing.Color.Black Me.fiveYearPlan.PlotArea.XAxis.Appearance.TextAppearance.TextProperties.Font = New System.Drawing.Font("Arial", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.fiveYearPlan.PlotArea.XAxis.AutoScale = False Me.fiveYearPlan.PlotArea.XAxis.AxisLabel.Appearance.RotationAngle = 45.0! Me.fiveYearPlan.PlotArea.XAxis.AxisLabel.Appearance.Visible = True Me.fiveYearPlan.PlotArea.XAxis.AxisLabel.TextBlock.Text = "" Me.fiveYearPlan.PlotArea.XAxis.AxisLabel.TextBlock.Visible = False Me.fiveYearPlan.PlotArea.XAxis.AxisLabel.Visible = True Me.fiveYearPlan.PlotArea.XAxis.DataLabelsColumn = "YearName" ChartAxisItem1.TextBlock.Appearance.TextProperties.Font = New System.Drawing.Font("Arial", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ChartAxisItem1.Value = New Decimal(New Integer() {1, 0, 0, 0}) ChartAxisItem2.TextBlock.Appearance.TextProperties.Font = New System.Drawing.Font("Arial", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ChartAxisItem2.Value = New Decimal(New Integer() {2, 0, 0, 0}) ChartAxisItem3.TextBlock.Appearance.TextProperties.Font = New System.Drawing.Font("Arial", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ChartAxisItem3.Value = New Decimal(New Integer() {3, 0, 0, 0}) ChartAxisItem4.TextBlock.Appearance.TextProperties.Font = New System.Drawing.Font("Arial", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ChartAxisItem4.Value = New Decimal(New Integer() {4, 0, 0, 0}) ChartAxisItem5.TextBlock.Appearance.TextProperties.Font = New System.Drawing.Font("Arial", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ChartAxisItem5.Value = New Decimal(New Integer() {5, 0, 0, 0}) ChartAxisItem6.TextBlock.Appearance.TextProperties.Font = New System.Drawing.Font("Arial", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ChartAxisItem6.Value = New Decimal(New Integer() {6, 0, 0, 0}) ChartAxisItem7.TextBlock.Appearance.TextProperties.Font = New System.Drawing.Font("Arial", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ChartAxisItem7.Value = New Decimal(New Integer() {7, 0, 0, 0}) Me.fiveYearPlan.PlotArea.XAxis.Items.AddRange(New Telerik.Reporting.Charting.ChartAxisItem() {ChartAxisItem1, ChartAxisItem2, ChartAxisItem3, ChartAxisItem4, ChartAxisItem5, ChartAxisItem6, ChartAxisItem7}) Me.fiveYearPlan.PlotArea.XAxis.MaxItemsCount = 0 Me.fiveYearPlan.PlotArea.XAxis.MinValue = 1 Me.fiveYearPlan.PlotArea.YAxis.Appearance.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.fiveYearPlan.PlotArea.YAxis.Appearance.LabelAppearance.Visible = False Me.fiveYearPlan.PlotArea.YAxis.Appearance.MajorGridLines.Color = System.Drawing.Color.FromArgb(CType(CType(209, Byte), Integer), CType(CType(221, Byte), Integer), CType(CType(238, Byte), Integer)) Me.fiveYearPlan.PlotArea.YAxis.Appearance.MajorTick.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.fiveYearPlan.PlotArea.YAxis.Appearance.MinorGridLines.Color = System.Drawing.Color.FromArgb(CType(CType(209, Byte), Integer), CType(CType(221, Byte), Integer), CType(CType(238, Byte), Integer)) Me.fiveYearPlan.PlotArea.YAxis.Appearance.MinorTick.Color = System.Drawing.Color.FromArgb(CType(CType(149, Byte), Integer), CType(CType(184, Byte), Integer), CType(CType(206, Byte), Integer)) Me.fiveYearPlan.PlotArea.YAxis.Appearance.TextAppearance.TextProperties.Color = System.Drawing.Color.Black Me.fiveYearPlan.PlotArea.YAxis.Appearance.ValueFormat = Telerik.Reporting.Charting.Styles.ChartValueFormat.Currency Me.fiveYearPlan.PlotArea.YAxis.Appearance.Visible = Telerik.Reporting.Charting.Styles.ChartAxisVisibility.[True] Me.fiveYearPlan.PlotArea.YAxis.AxisLabel.Appearance.Visible = True Me.fiveYearPlan.PlotArea.YAxis.AxisLabel.TextBlock.Text = "Savings (USD)" Me.fiveYearPlan.PlotArea.YAxis.AxisLabel.Visible = True Me.fiveYearPlan.PlotArea.YAxis.AxisMode = Telerik.Reporting.Charting.ChartYAxisMode.Extended Me.fiveYearPlan.PlotArea.YAxis.IsZeroBased = False Me.fiveYearPlan.PlotArea.YAxis.LogarithmBase = 2 Me.fiveYearPlan.PlotArea.YAxis.MaxValue = 110 Me.fiveYearPlan.PlotArea.YAxis.Step = 10 Me.fiveYearPlan.PlotArea.YAxis.Visible = Telerik.Reporting.Charting.Styles.ChartAxisVisibility.[True] Me.fiveYearPlan.PlotArea.YAxis2.Appearance.Visible = Telerik.Reporting.Charting.Styles.ChartAxisVisibility.[False] Me.fiveYearPlan.PlotArea.YAxis2.Visible = Telerik.Reporting.Charting.Styles.ChartAxisVisibility.[False] ChartSeries1.Name = "Series 1" Me.fiveYearPlan.Series.AddRange(New Telerik.Reporting.Charting.ChartSeries() {ChartSeries1}) Me.fiveYearPlan.SeriesPalette = "Mac" Me.fiveYearPlan.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(4.7000007629394531, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(3.6000010967254639, Telerik.Reporting.Drawing.UnitType.Inch)) Me.fiveYearPlan.Style.BackgroundColor = System.Drawing.Color.Transparent Me.fiveYearPlan.Style.BorderWidth.Default = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.fiveYearPlan.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Point) ' 'DABarChart ' Me.DABarChart.SelectCommand = Me.SqlCommand1 Me.DABarChart.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "Reporting_TableOfContentsSummary_SELECT_Chart", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("ChartText", "ChartText"), New System.Data.Common.DataColumnMapping("ChartValue", "ChartValue")})}) ' 'SqlCommand1 ' Me.SqlCommand1.CommandText = "dbo.Reporting_TableOfContentsFiveYear_SELECT_Chart" Me.SqlCommand1.CommandType = System.Data.CommandType.StoredProcedure Me.SqlCommand1.Connection = Me.SqlConnection1 Me.SqlCommand1.Parameters.AddRange(New System.Data.SqlClient.SqlParameter() {New System.Data.SqlClient.SqlParameter("@RETURN_VALUE", System.Data.SqlDbType.Int, 4, System.Data.ParameterDirection.ReturnValue, False, CType(0, Byte), CType(0, Byte), "", System.Data.DataRowVersion.Current, Nothing), New System.Data.SqlClient.SqlParameter("@SolutionIDList", System.Data.SqlDbType.VarChar, 100)}) ' 'TableOfContents ' Me.DataSource = Me.DATableOfContents Me.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.DetailSection1, Me.ReportHeaderSection1, Me.ReportFooterSection1}) Me.PageSettings.Landscape = False Me.PageSettings.Margins.Bottom = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.PageSettings.Margins.Left = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.PageSettings.Margins.Right = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.PageSettings.Margins.Top = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.PageSettings.PaperKind = System.Drawing.Printing.PaperKind.Letter ReportParameter1.Name = "SolutionIDList" ReportParameter1.UI.Visible = True Me.ReportParameters.Add(ReportParameter1) Me.Style.BackgroundColor = System.Drawing.Color.White Me.Style.BackgroundImage.Repeat = Telerik.Reporting.Drawing.BackgroundRepeat.Repeat Me.Style.BorderWidth.Default = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch) Me.Width = New Telerik.Reporting.Drawing.Unit(8.5, Telerik.Reporting.Drawing.UnitType.Inch) CType(Me, System.ComponentModel.ISupportInitialize).EndInit() End Sub Friend WithEvents DetailSection1 As Telerik.Reporting.DetailSection Friend WithEvents TextBox1 As Telerik.Reporting.TextBox Friend WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand Friend WithEvents DATableOfContents As System.Data.SqlClient.SqlDataAdapter Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection Friend WithEvents TextBox4 As Telerik.Reporting.TextBox Friend WithEvents TextBox5 As Telerik.Reporting.TextBox Friend WithEvents TextBox6 As Telerik.Reporting.TextBox Friend WithEvents TextBox7 As Telerik.Reporting.TextBox Friend WithEvents ReportHeaderSection1 As Telerik.Reporting.ReportHeaderSection Friend WithEvents SqlSelectCommand2 As System.Data.SqlClient.SqlCommand Friend WithEvents DAPieChart As System.Data.SqlClient.SqlDataAdapter Friend WithEvents TextBox2 As Telerik.Reporting.TextBox Friend WithEvents ReportFooterSection1 As Telerik.Reporting.ReportFooterSection Friend WithEvents TextBox22 As Telerik.Reporting.TextBox Friend WithEvents Shape1 As Telerik.Reporting.Shape Friend WithEvents TextBox21 As Telerik.Reporting.TextBox Friend WithEvents TextBox20 As Telerik.Reporting.TextBox Friend WithEvents TextBox19 As Telerik.Reporting.TextBox Friend WithEvents TextBox18 As Telerik.Reporting.TextBox Friend WithEvents TextBox17 As Telerik.Reporting.TextBox Friend WithEvents TextBox16 As Telerik.Reporting.TextBox Friend WithEvents TextBox8 As Telerik.Reporting.TextBox Friend WithEvents TextBox14 As Telerik.Reporting.TextBox Friend WithEvents TextBox13 As Telerik.Reporting.TextBox Friend WithEvents TextBox12 As Telerik.Reporting.TextBox Friend WithEvents TextBox11 As Telerik.Reporting.TextBox Friend WithEvents TextBox10 As Telerik.Reporting.TextBox Friend WithEvents TextBox9 As Telerik.Reporting.TextBox Friend WithEvents TextBox15 As Telerik.Reporting.TextBox Friend WithEvents PieChart As Telerik.Reporting.Chart Friend WithEvents TextBox23 As Telerik.Reporting.TextBox Friend WithEvents TextBox24 As Telerik.Reporting.TextBox Friend WithEvents TextBox25 As Telerik.Reporting.TextBox Friend WithEvents TextBox3 As Telerik.Reporting.TextBox Friend WithEvents TextBox26 As Telerik.Reporting.TextBox Friend WithEvents Shape3 As Telerik.Reporting.Shape Friend WithEvents TextBox27 As Telerik.Reporting.TextBox Friend WithEvents TextBox28 As Telerik.Reporting.TextBox Friend WithEvents fiveYearPlan As Telerik.Reporting.Chart Friend WithEvents DABarChart As System.Data.SqlClient.SqlDataAdapter Friend WithEvents SqlCommand1 As System.Data.SqlClient.SqlCommandEnd ClassAnd this is the custom code:
Imports System.ComponentModelImports System.DrawingImports System.Windows.FormsImports Telerik.ReportingImports Telerik.Reporting.DrawingPartial Public Class TableOfContents Inherits Telerik.Reporting.Report Public Sub New() InitializeComponent() Me.DataSource = Nothing End Sub Private Sub PieChart_NeedDataSource(ByVal sender As Object, ByVal e As System.EventArgs) Handles PieChart.NeedDataSource Dim pie As Telerik.Reporting.Processing.Chart = DirectCast(sender, Telerik.Reporting.Processing.Chart) Dim dt As New DataTable() DAPieChart.Fill(dt) pie.DataSource = dt PieChart.Series.Add(New Charting.ChartSeries("Series0", Charting.ChartSeriesType.Pie)) PieChart.Series(0).DataLabelsColumn = "ChartText" 'PieChart.Series(0).DataXColumn = "XCol" PieChart.Series(0).DataYColumn = "ChartValue" PieChart.Series(0).Appearance.LegendDisplayMode = Charting.ChartSeriesLegendDisplayMode.ItemLabels 'PieChart.Legend.Appearance.Location = Charting.Styles.LabelLocation.OutsidePlotArea PieChart.Series(0).Appearance.LabelAppearance.Visible = False 'PieChart.Series(0).Appearance. 'PieChart.Series(0).DefaultLabelValue = "DefaultLabelValue" End Sub Private Sub fiveYearPlan_NeedDataSource(ByVal sender As Object, ByVal e As System.EventArgs) Handles fiveYearPlan.NeedDataSource Dim chart As Telerik.Reporting.Processing.Chart = DirectCast(sender, Telerik.Reporting.Processing.Chart) Dim da As New DataTable() DABarChart.Fill(da) chart.DataSource = da fiveYearPlan.Series.Add(New Charting.ChartSeries("Series1", Charting.ChartSeriesType.Bar)) 'fiveYearPlan.Series(0).DataYColumn = "yearReturn" fiveYearPlan.Series(0).DefaultLabelValue = "#Y{C2}" fiveYearPlan.Series(0).Appearance.LabelAppearance.Dimensions.Margins = "15px,1px,5px,1px" fiveYearPlan.Series(0).Appearance.TextAppearance.TextProperties.Color = Color.Black 'fiveYearPlan.Series(0).Appearance.LabelAppearance.RotationAngle = "20" 'fiveYearPlan.Series(0).Appearance.LabelAppearance.Position.AlignedPosition = Charting.Styles.AlignedPositions.TopRight End Sub Private Sub TableOfContents_NeedDataSource(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.NeedDataSource Dim CurrentSubReport As Telerik.Reporting.Processing.Report = DirectCast(sender, Telerik.Reporting.Processing.Report) DATableOfContents.SelectCommand.Parameters("@SolutionIDList").Value = CurrentSubReport.Parameters("SolutionIDList") 'DATableOfContents.SelectCommand.Parameters("@ProposedAssemblyIDList").Value = CurrentSubReport.Parameters("ProposedAssemblyIDList") 'DATableOfContents.SelectCommand.Parameters("@ExistingAssemblyIDList").Value = CurrentSubReport.Parameters("ExistingAssemblyIDList") DAPieChart.SelectCommand.Parameters("@SolutionIDList").Value = CurrentSubReport.Parameters("SolutionIDList") DABarChart.SelectCommand.Parameters("@SolutionIDList").Value = CurrentSubReport.Parameters("SolutionIDList") 'DAPieChart.SelectCommand.Parameters("@ProposedAssemblyIDList").Value = CurrentSubReport.Parameters("ProposedAssemblyIDList") 'DAPieChart.SelectCommand.Parameters("@ExistingAssemblyIDList").Value = CurrentSubReport.Parameters("ExistingAssemblyIDList") CurrentSubReport.DataSource = DATableOfContents End SubEnd Class