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.ComponentModel
Imports
System.Drawing
Imports
System.Windows.Forms
Imports
Telerik.Reporting
Imports
Telerik.Reporting.Drawing
Partial
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.SqlCommand
End
Class
And this is the custom code:
Imports
System.ComponentModel
Imports
System.Drawing
Imports
System.Windows.Forms
Imports
Telerik.Reporting
Imports
Telerik.Reporting.Drawing
Partial
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
Sub
End
Class