This is a migrated thread and some comments may be shown as answers.

Inconsistent Borders

1 Answer 215 Views
General Discussions
This is a migrated thread and some comments may be shown as answers.
Jim
Top achievements
Rank 1
Jim asked on 06 Nov 2009, 06:43 PM

Dear Telerik Support,

 

I am generating invoices by saving a Telerik Report as a PDF file.  I am running into inconsistent behavior with the borders.  I have attached an image of the PDF which contains comments that explain the issues I am experiencing.  I have also attached the report code.

 

Please Advise,

 

Jim

Imports System.ComponentModel  
Imports System.Drawing  
Imports System.Windows.Forms  
Imports Telerik.Reporting  
Imports Telerik.Reporting.Drawing  
Imports System  
Imports System.Data  
Imports System.Data.SqlClient  
 
Public Class Invoice  
    Inherits Telerik.Reporting.Report  
 
    Private WithEvents detail As Telerik.Reporting.DetailSection  
    Private WithEvents da_ReportData As System.Data.SqlClient.SqlDataAdapter  
    Private WithEvents reportHeader As Telerik.Reporting.ReportHeaderSection  
    Private WithEvents tb_PageNumber As Telerik.Reporting.TextBox  
    Private WithEvents tb_CurrentTime As Telerik.Reporting.TextBox  
    Private WithEvents pageFooter As Telerik.Reporting.PageFooterSection  
    Private WithEvents pageHeader As Telerik.Reporting.PageHeaderSection  
    Private WithEvents labelsGroup As Telerik.Reporting.Group  
    Private WithEvents labelsGroupFooter As Telerik.Reporting.GroupFooterSection  
    Private WithEvents pb_Logo As Telerik.Reporting.PictureBox  
    Private WithEvents tb_FromAddress As Telerik.Reporting.TextBox  
    Private WithEvents tb_FromCityStateZip As Telerik.Reporting.TextBox  
    Private WithEvents tb_FromPhone As Telerik.Reporting.TextBox  
    Private WithEvents tb_FromWebAddress As Telerik.Reporting.TextBox  
    Private WithEvents tb_PageHeader As Telerik.Reporting.TextBox  
    Private WithEvents textBox1 As Telerik.Reporting.TextBox  
    Private WithEvents textBox2 As Telerik.Reporting.TextBox  
    Private WithEvents textBox3 As Telerik.Reporting.TextBox  
    Private WithEvents textBox4 As Telerik.Reporting.TextBox  
    Private WithEvents textBox5 As Telerik.Reporting.TextBox  
    Private WithEvents textBox8 As Telerik.Reporting.TextBox  
    Private WithEvents textBox9 As Telerik.Reporting.TextBox  
    Private WithEvents textBox6 As Telerik.Reporting.TextBox  
    Private WithEvents textBox7 As Telerik.Reporting.TextBox  
    Private WithEvents textBox10 As Telerik.Reporting.TextBox  
    Private WithEvents textBox11 As Telerik.Reporting.TextBox  
    Private WithEvents textBox12 As Telerik.Reporting.TextBox  
    Private WithEvents textBox13 As Telerik.Reporting.TextBox  
    Private WithEvents textBox14 As Telerik.Reporting.TextBox  
    Private WithEvents textBox15 As Telerik.Reporting.TextBox  
    Private WithEvents textBox16 As Telerik.Reporting.TextBox  
    Private WithEvents textBox17 As Telerik.Reporting.TextBox  
    Private WithEvents textBox18 As Telerik.Reporting.TextBox  
    Private WithEvents textBox19 As Telerik.Reporting.TextBox  
    Private WithEvents textBox20 As Telerik.Reporting.TextBox  
    Private WithEvents textBox21 As Telerik.Reporting.TextBox  
    Private WithEvents textBox22 As Telerik.Reporting.TextBox  
    Private WithEvents textBox23 As Telerik.Reporting.TextBox  
    Private WithEvents textBox24 As Telerik.Reporting.TextBox  
    Private WithEvents textBox25 As Telerik.Reporting.TextBox  
    Private WithEvents textBox26 As Telerik.Reporting.TextBox  
    Private WithEvents textBox27 As Telerik.Reporting.TextBox  
    Private WithEvents textBox28 As Telerik.Reporting.TextBox  
    Private WithEvents textBox29 As Telerik.Reporting.TextBox  
    Private WithEvents textBox30 As Telerik.Reporting.TextBox  
    Private WithEvents textBox31 As Telerik.Reporting.TextBox  
    Private WithEvents textBox32 As Telerik.Reporting.TextBox  
    Private WithEvents textBox33 As Telerik.Reporting.TextBox  
    Private WithEvents labelsGroupHeader As Telerik.Reporting.GroupHeaderSection  
 
    Public Sub New()  
 
        InitializeComponent()  
        Me.DataSource = Nothing 
 
    End Sub  
 
    'NOTE: The following procedure is required by the telerik Reporting Designer  
    'It can be modified using the telerik Reporting Designer.    
    'Do not modify it using the code editor.  
    Private Sub InitializeComponent()  
        Dim formattingRule1 As Telerik.Reporting.Drawing.FormattingRule = New Telerik.Reporting.Drawing.FormattingRule  
        Dim reportParameter1 As Telerik.Reporting.ReportParameter = New Telerik.Reporting.ReportParameter  
        Dim styleRule1 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule  
        Dim styleRule2 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule  
        Dim styleRule3 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule  
        Dim styleRule4 As Telerik.Reporting.Drawing.StyleRule = New Telerik.Reporting.Drawing.StyleRule  
        Me.labelsGroupHeader = New Telerik.Reporting.GroupHeaderSection  
        Me.labelsGroupFooter = New Telerik.Reporting.GroupFooterSection  
        Me.labelsGroup = New Telerik.Reporting.Group  
        Me.pageHeader = New Telerik.Reporting.PageHeaderSection  
        Me.tb_PageHeader = New Telerik.Reporting.TextBox  
        Me.pb_Logo = New Telerik.Reporting.PictureBox  
        Me.pageFooter = New Telerik.Reporting.PageFooterSection  
        Me.tb_CurrentTime = New Telerik.Reporting.TextBox  
        Me.tb_PageNumber = New Telerik.Reporting.TextBox  
        Me.reportHeader = New Telerik.Reporting.ReportHeaderSection  
        Me.tb_FromPhone = New Telerik.Reporting.TextBox  
        Me.tb_FromCityStateZip = New Telerik.Reporting.TextBox  
        Me.tb_FromAddress = New Telerik.Reporting.TextBox  
        Me.tb_FromWebAddress = New Telerik.Reporting.TextBox  
        Me.detail = New Telerik.Reporting.DetailSection  
        Me.da_ReportData = New System.Data.SqlClient.SqlDataAdapter  
        Me.textBox1 = New Telerik.Reporting.TextBox  
        Me.textBox2 = New Telerik.Reporting.TextBox  
        Me.textBox3 = New Telerik.Reporting.TextBox  
        Me.textBox4 = New Telerik.Reporting.TextBox  
        Me.textBox5 = New Telerik.Reporting.TextBox  
        Me.textBox8 = New Telerik.Reporting.TextBox  
        Me.textBox9 = New Telerik.Reporting.TextBox  
        Me.textBox6 = New Telerik.Reporting.TextBox  
        Me.textBox7 = New Telerik.Reporting.TextBox  
        Me.textBox10 = New Telerik.Reporting.TextBox  
        Me.textBox11 = New Telerik.Reporting.TextBox  
        Me.textBox12 = New Telerik.Reporting.TextBox  
        Me.textBox13 = New Telerik.Reporting.TextBox  
        Me.textBox14 = New Telerik.Reporting.TextBox  
        Me.textBox15 = New Telerik.Reporting.TextBox  
        Me.textBox16 = New Telerik.Reporting.TextBox  
        Me.textBox17 = New Telerik.Reporting.TextBox  
        Me.textBox18 = New Telerik.Reporting.TextBox  
        Me.textBox19 = New Telerik.Reporting.TextBox  
        Me.textBox20 = New Telerik.Reporting.TextBox  
        Me.textBox21 = New Telerik.Reporting.TextBox  
        Me.textBox22 = New Telerik.Reporting.TextBox  
        Me.textBox23 = New Telerik.Reporting.TextBox  
        Me.textBox24 = New Telerik.Reporting.TextBox  
        Me.textBox25 = New Telerik.Reporting.TextBox  
        Me.textBox26 = New Telerik.Reporting.TextBox  
        Me.textBox27 = New Telerik.Reporting.TextBox  
        Me.textBox28 = New Telerik.Reporting.TextBox  
        Me.textBox29 = New Telerik.Reporting.TextBox  
        Me.textBox30 = New Telerik.Reporting.TextBox  
        Me.textBox31 = New Telerik.Reporting.TextBox  
        Me.textBox32 = New Telerik.Reporting.TextBox  
        Me.textBox33 = New Telerik.Reporting.TextBox  
        CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()  
        '  
        'labelsGroupHeader  
        '  
        Me.labelsGroupHeader.Height = New Telerik.Reporting.Drawing.Unit(0.20003955066204071, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.labelsGroupHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.textBox16, Me.textBox17, Me.textBox18, Me.textBox19})  
        Me.labelsGroupHeader.Name = "labelsGroupHeader" 
        Me.labelsGroupHeader.PrintOnEveryPage = True 
        Me.labelsGroupHeader.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.labelsGroupHeader.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.labelsGroupHeader.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.labelsGroupHeader.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid  
        '  
        'labelsGroupFooter  
        '  
        Me.labelsGroupFooter.Height = New Telerik.Reporting.Drawing.Unit(1.8998819589614868, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.labelsGroupFooter.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.textBox24, Me.textBox25, Me.textBox26, Me.textBox27, Me.textBox28, Me.textBox29, Me.textBox30, Me.textBox31, Me.textBox32, Me.textBox33})  
        Me.labelsGroupFooter.Name = "labelsGroupFooter" 
        Me.labelsGroupFooter.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.labelsGroupFooter.Style.Visible = True 
        '  
        'labelsGroup  
        '  
        MeMe.labelsGroup.GroupFooter = Me.labelsGroupFooter  
        MeMe.labelsGroup.GroupHeader = Me.labelsGroupHeader  
        '  
        'pageHeader  
        '  
        Me.pageHeader.Height = New Telerik.Reporting.Drawing.Unit(0.20000004768371582, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pageHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.tb_PageHeader})  
        Me.pageHeader.Name = "pageHeader" 
        Me.pageHeader.PrintOnFirstPage = False 
        '  
        'tb_PageHeader  
        '  
        Me.tb_PageHeader.Name = "tb_PageHeader" 
        Me.tb_PageHeader.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.4311714172363281, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19996063411235809, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_PageHeader.Value = "=Fields.PageHeader" 
        '  
        'pb_Logo  
        '  
        Me.pb_Logo.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02091217041015625, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.000039259593904716894, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.pb_Logo.Name = "pb_Logo" 
        Me.pb_Logo.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(6.4790878295898437, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.89996081590652466, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.pb_Logo.Style.BackgroundImage.Repeat = Telerik.Reporting.Drawing.BackgroundRepeat.NoRepeat  
        Me.pb_Logo.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.pb_Logo.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.pb_Logo.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.None  
        Me.pb_Logo.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.pb_Logo.Style.Padding.Bottom = New Telerik.Reporting.Drawing.Unit(0.10000000149011612, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pb_Logo.Style.Padding.Left = New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pb_Logo.Style.Padding.Top = New Telerik.Reporting.Drawing.Unit(0.10000000149011612, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pb_Logo.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Bottom  
        Me.pb_Logo.Value = "~/Images/Logos/logo_OPR.gif" 
        '  
        'pageFooter  
        '  
        Me.pageFooter.Height = New Telerik.Reporting.Drawing.Unit(0.28125, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.pageFooter.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.tb_CurrentTime, Me.tb_PageNumber})  
        Me.pageFooter.Name = "pageFooter" 
        '  
        'tb_CurrentTime  
        '  
        Me.tb_CurrentTime.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.099999986588954926, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_CurrentTime.Name = "tb_CurrentTime" 
        Me.tb_CurrentTime.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.1187498569488525, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_CurrentTime.Style.Font.Name = "Arial" 
        Me.tb_CurrentTime.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.tb_CurrentTime.StyleName = "PageInfo" 
        Me.tb_CurrentTime.Value = "=NOW()" 
        '  
        'tb_PageNumber  
        '  
        Me.tb_PageNumber.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.2395832538604736, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_PageNumber.Name = "tb_PageNumber" 
        Me.tb_PageNumber.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.1979167461395264, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_PageNumber.Style.Font.Name = "Arial" 
        Me.tb_PageNumber.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.tb_PageNumber.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.tb_PageNumber.StyleName = "PageInfo" 
        Me.tb_PageNumber.Value = "=PageNumber" 
        '  
        'reportHeader  
        '  
        Me.reportHeader.Height = New Telerik.Reporting.Drawing.Unit(3.7999999523162842, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.reportHeader.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.pb_Logo, Me.tb_FromPhone, Me.tb_FromCityStateZip, Me.tb_FromAddress, Me.tb_FromWebAddress, Me.textBox1, Me.textBox2, Me.textBox3, Me.textBox4, Me.textBox5, Me.textBox8, Me.textBox9, Me.textBox6, Me.textBox7, Me.textBox10, Me.textBox11, Me.textBox12, Me.textBox13, Me.textBox14, Me.textBox15})  
        Me.reportHeader.Name = "reportHeader" 
        Me.reportHeader.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.reportHeader.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.reportHeader.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.None  
        Me.reportHeader.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.reportHeader.Style.Visible = True 
        '  
        'tb_FromPhone  
        '  
        Me.tb_FromPhone.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.2999606132507324, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromPhone.Name = "tb_FromPhone" 
        Me.tb_FromPhone.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.379166841506958, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999997317790985, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromPhone.Value = "=Fields.FromPhone" 
        '  
        'tb_FromCityStateZip  
        '  
        Me.tb_FromCityStateZip.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.0999604463577271, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromCityStateZip.Name = "tb_FromCityStateZip" 
        Me.tb_FromCityStateZip.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.379166841506958, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999997317790985, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromCityStateZip.Value = "=Fields.FromCityStateZip" 
        '  
        'tb_FromAddress  
        '  
        Me.tb_FromAddress.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.90000009536743164, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromAddress.Name = "tb_FromAddress" 
        Me.tb_FromAddress.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.3791670799255371, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999997317790985, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromAddress.Value = "=Fields.FromAddress" 
        '  
        'tb_FromWebAddress  
        '  
        Me.tb_FromWebAddress.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02083333395421505, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.4999607801437378, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromWebAddress.Name = "tb_FromWebAddress" 
        Me.tb_FromWebAddress.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(2.379166841506958, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999997317790985, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.tb_FromWebAddress.Value = "=Fields.FromWebAddress" 
        '  
        'detail  
        '  
        formattingRule1.Filters.AddRange(New Telerik.Reporting.Data.Filter() {New Telerik.Reporting.Data.Filter("RowNumber()%2", Telerik.Reporting.Data.FilterOperator.Equal, "=1")})  
        formattingRule1.Style.BackgroundColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer), CType(CType(240, Byte), Integer))  
        Me.detail.ConditionalFormatting.AddRange(New Telerik.Reporting.Drawing.FormattingRule() {formattingRule1})  
        Me.detail.Height = New Telerik.Reporting.Drawing.Unit(0.20007896423339844, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.detail.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.textBox20, Me.textBox21, Me.textBox22, Me.textBox23})  
        Me.detail.Name = "detail" 
        Me.detail.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.detail.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.detail.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.detail.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        '  
        'textBox1  
        '  
        Me.textBox1.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.000039418537198798731, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.8999999761581421, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox1.Name = "textBox1" 
        Me.textBox1.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.89996069669723511, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox1.Style.Font.Bold = True 
        Me.textBox1.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox1.Value = "Invoice" 
        '  
        'textBox2  
        '  
        Me.textBox2.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.8999999761581421, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox2.Name = "textBox2" 
        Me.textBox2.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.99583292007446289, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox2.Style.Font.Bold = True 
        Me.textBox2.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox2.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox2.Value = "No." 
        '  
        'textBox3  
        '  
        Me.textBox3.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.1000003814697266, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.8999999761581421, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox3.Name = "textBox3" 
        Me.textBox3.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.2998420000076294, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox3.Style.Font.Bold = True 
        Me.textBox3.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox3.Value = "=Fields.InvoiceNo" 
        '  
        'textBox4  
        '  
        Me.textBox4.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.1000003814697266, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox4.Name = "textBox4" 
        Me.textBox4.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.2998420000076294, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox4.Style.Font.Bold = False 
        Me.textBox4.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox4.Value = "=Fields.InvoiceDate" 
        '  
        'textBox5  
        '  
        Me.textBox5.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox5.Name = "textBox5" 
        Me.textBox5.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.99583292007446289, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox5.Style.Font.Bold = True 
        Me.textBox5.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox5.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox5.Value = "Invoice Date:" 
        '  
        'textBox8  
        '  
        Me.textBox8.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.2999999523162842, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox8.Name = "textBox8" 
        Me.textBox8.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.99583292007446289, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox8.Style.Font.Bold = True 
        Me.textBox8.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox8.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox8.Value = "Terms:" 
        '  
        'textBox9  
        '  
        Me.textBox9.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.1000003814697266, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.2999999523162842, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox9.Name = "textBox9" 
        Me.textBox9.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.2998420000076294, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox9.Style.Font.Bold = False 
        Me.textBox9.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox9.Value = "=Fields.Terms" 
        '  
        'textBox6  
        '  
        Me.textBox6.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.1000003814697266, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.5, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox6.Name = "textBox6" 
        Me.textBox6.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.2998420000076294, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox6.Style.Font.Bold = False 
        Me.textBox6.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox6.Value = "=Fields.CurrentDueDate" 
        '  
        'textBox7  
        '  
        Me.textBox7.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.5, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox7.Name = "textBox7" 
        Me.textBox7.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.99583292007446289, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox7.Style.Font.Bold = True 
        Me.textBox7.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox7.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox7.Value = "Due Date:" 
        '  
        'textBox10  
        '  
        Me.textBox10.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox10.Name = "textBox10" 
        Me.textBox10.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000791072845459, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox10.Style.Font.Bold = False 
        Me.textBox10.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox10.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Left  
        Me.textBox10.Value = "=Fields.InvoiceDescription" 
        '  
        'textBox11  
        '  
        Me.textBox11.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.5, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox11.Name = "textBox11" 
        Me.textBox11.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.90000009536743164, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox11.Style.Font.Bold = True 
        Me.textBox11.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(14, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox11.Value = "Bill to:" 
        '  
        'textBox12  
        '  
        Me.textBox12.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(3.0000784397125244, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox12.Name = "textBox12" 
        Me.textBox12.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000001907348633, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox12.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox12.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox12.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox12.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox12.Value = "=Fields.ToCompanyName" 
        '  
        'textBox13  
        '  
        Me.textBox13.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(2.7999999523162842, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox13.Name = "textBox13" 
        Me.textBox13.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000001907348633, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox13.Style.BorderColor.Top = System.Drawing.Color.Black  
        Me.textBox13.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox13.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox13.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox13.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox13.Value = "=Fields.ToContactName" 
        '  
        'textBox14  
        '  
        Me.textBox14.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(3.2001571655273437, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox14.Name = "textBox14" 
        Me.textBox14.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000001907348633, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox14.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox14.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox14.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox14.Value = "=Fields.ToAddress" 
        '  
        'textBox15  
        '  
        Me.textBox15.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(3.4002361297607422, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox15.Name = "textBox15" 
        Me.textBox15.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.3000001907348633, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox15.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox15.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox15.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox15.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox15.Value = "=Fields.ToCityStateZip" 
        '  
        'textBox16  
        '  
        Me.textBox16.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02091217041015625, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox16.Name = "textBox16" 
        Me.textBox16.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.7790887355804443, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox16.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox16.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox16.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox16.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox16.Style.Font.Bold = True 
        Me.textBox16.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox16.Value = "Description" 
        '  
        'textBox17  
        '  
        Me.textBox17.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.8000795841217041, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.000039736431062920019, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox17.Name = "textBox17" 
        Me.textBox17.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.79992103576660156, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox17.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox17.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox17.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox17.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox17.Style.Font.Bold = True 
        Me.textBox17.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox17.Value = "Units " 
        '  
        'textBox18  
        '  
        Me.textBox18.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.5999999046325684, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox18.Name = "textBox18" 
        Me.textBox18.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.80000019073486328, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox18.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox18.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox18.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox18.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox18.Style.Font.Bold = True 
        Me.textBox18.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox18.Value = "Cost " 
        '  
        'textBox19  
        '  
        Me.textBox19.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4000792503356934, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox19.Name = "textBox19" 
        Me.textBox19.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0999212265014648, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19999980926513672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox19.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox19.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox19.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox19.Style.BorderStyle.Top = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox19.Style.Font.Bold = True 
        Me.textBox19.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox19.Value = "Total " 
        '  
        'textBox20  
        '  
        Me.textBox20.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.02091217041015625, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox20.Name = "textBox20" 
        Me.textBox20.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(3.7790887355804443, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox20.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox20.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox20.Value = "=Fields.ItemDescription" 
        '  
        'textBox21  
        '  
        Me.textBox21.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.8000795841217041, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox21.Name = "textBox21" 
        Me.textBox21.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7999998927116394, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox21.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox21.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox21.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox21.Value = "=Fields.Units" 
        '  
        'textBox22  
        '  
        Me.textBox22.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.6001582145690918, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.000078837074397597462, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox22.Name = "textBox22" 
        Me.textBox22.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7999998927116394, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox22.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox22.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox22.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox22.Value = "=Fields.Cost" 
        '  
        'textBox23  
        '  
        Me.textBox23.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4000792503356934, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox23.Name = "textBox23" 
        Me.textBox23.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox23.Style.BorderStyle.Left = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox23.Style.BorderStyle.Right = Telerik.Reporting.Drawing.BorderType.None  
        Me.textBox23.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox23.Value = "=Fields.ItemTotal" 
        '  
        'textBox24  
        '  
        Me.textBox24.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19988155364990234, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox24.Name = "textBox24" 
        Me.textBox24.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.599920392036438, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox24.Style.Font.Bold = True 
        Me.textBox24.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox24.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox24.Value = "Total Amount" 
        '  
        'textBox25  
        '  
        Me.textBox25.Format = "{0:C2}" 
        Me.textBox25.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4000792503356934, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.19988155364990234, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox25.Name = "textBox25" 
        Me.textBox25.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox25.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox25.Value = "=Fields.CurrentAmt" 
        '  
        'textBox26  
        '  
        Me.textBox26.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.39996084570884705, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox26.Name = "textBox26" 
        Me.textBox26.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.5999206304550171, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox26.Style.Font.Bold = True 
        Me.textBox26.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox26.Value = "Outstanding Invoice(s)" 
        '  
        'textBox27  
        '  
        Me.textBox27.Format = "{0:C2}" 
        Me.textBox27.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(4.6999998092651367, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.39996084570884705, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox27.Name = "textBox27" 
        Me.textBox27.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(0.7000001072883606, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox27.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox27.Value = "=Fields.OutstandingInvDesc" 
        '  
        'textBox28  
        '  
        Me.textBox28.Format = "{0:N2}" 
        Me.textBox28.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4001579284667969, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.39996084570884705, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox28.Name = "textBox28" 
        Me.textBox28.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox28.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox28.Value = "=Fields.OutstandingInvAmt" 
        '  
        'textBox29  
        '  
        Me.textBox29.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.6000397801399231, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox29.Name = "textBox29" 
        Me.textBox29.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.6000000238418579, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox29.Style.Font.Bold = True 
        Me.textBox29.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox29.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox29.Value = "Late Fee" 
        '  
        'textBox30  
        '  
        Me.textBox30.Format = "{0:N2}" 
        Me.textBox30.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4001579284667969, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.6000397801399231, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox30.Name = "textBox30" 
        Me.textBox30.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox30.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.Solid  
        Me.textBox30.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox30.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox30.Value = "=Fields.LateFee" 
        '  
        'textBox31  
        '  
        Me.textBox31.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(3.1000001430511475, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.80000239610672, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox31.Name = "textBox31" 
        Me.textBox31.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.6000000238418579, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000000298023224, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox31.Style.Font.Bold = True 
        Me.textBox31.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(10, Telerik.Reporting.Drawing.UnitType.Point)  
        Me.textBox31.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox31.Value = "Total Amount Due" 
        '  
        'textBox32  
        '  
        Me.textBox32.Format = "{0:C2}" 
        Me.textBox32.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(5.4000792503356934, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.80011874437332153, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox32.Name = "textBox32" 
        Me.textBox32.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(1.0998420715332031, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.20000012218952179, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox32.Style.BorderStyle.Bottom = Telerik.Reporting.Drawing.BorderType.[Double]  
        Me.textBox32.Style.BorderWidth.Bottom = New Telerik.Reporting.Drawing.Unit(5, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox32.Style.LineWidth = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Pixel)  
        Me.textBox32.Style.TextAlign = Telerik.Reporting.Drawing.HorizontalAlign.Right  
        Me.textBox32.Value = "=Fields.TotalAmountDue" 
        '  
        'textBox33  
        '  
        Me.textBox33.Location = New Telerik.Reporting.Drawing.PointU(New Telerik.Reporting.Drawing.Unit(0.099999986588954926, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(1.2998815774917603, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox33.Name = "textBox33" 
        Me.textBox33.Size = New Telerik.Reporting.Drawing.SizeU(New Telerik.Reporting.Drawing.Unit(4.5999207496643066, Telerik.Reporting.Drawing.UnitType.Inch), New Telerik.Reporting.Drawing.Unit(0.5, Telerik.Reporting.Drawing.UnitType.Inch))  
        Me.textBox33.Value = "=Fields.InvoiceNote" 
        '  
        'Invoice  
        '  
        Me.Groups.AddRange(New Telerik.Reporting.Group() {Me.labelsGroup})  
        Me.Items.AddRange(New Telerik.Reporting.ReportItemBase() {Me.labelsGroupHeader, Me.labelsGroupFooter, Me.pageHeader, Me.pageFooter, Me.reportHeader, Me.detail})  
        Me.PageSettings.Landscape = False 
        Me.PageSettings.Margins.Bottom = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.PageSettings.Margins.Left = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.PageSettings.Margins.Right = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.PageSettings.Margins.Top = New Telerik.Reporting.Drawing.Unit(1, Telerik.Reporting.Drawing.UnitType.Inch)  
        Me.PageSettings.PaperKind = System.Drawing.Printing.PaperKind.Letter  
        reportParameter1.Name = "pi_InvoiceID" 
        reportParameter1.Type = Telerik.Reporting.ReportParameterType.[Integer]  
        Me.ReportParameters.Add(reportParameter1)  
        Me.Style.BackgroundColor = System.Drawing.Color.White  
        styleRule1.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Title")})  
        styleRule1.Style.Color = System.Drawing.Color.Black  
        styleRule1.Style.Font.Bold = True 
        styleRule1.Style.Font.Italic = False 
        styleRule1.Style.Font.Name = "Tahoma" 
        styleRule1.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(20, Telerik.Reporting.Drawing.UnitType.Point)  
        styleRule1.Style.Font.Strikeout = False 
        styleRule1.Style.Font.Underline = False 
        styleRule2.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Caption")})  
        styleRule2.Style.Color = System.Drawing.Color.Black  
        styleRule2.Style.Font.Name = "Tahoma" 
        styleRule2.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, Telerik.Reporting.Drawing.UnitType.Point)  
        styleRule2.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle  
        styleRule3.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("Data")})  
        styleRule3.Style.Font.Name = "Tahoma" 
        styleRule3.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, Telerik.Reporting.Drawing.UnitType.Point)  
        styleRule3.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle  
        styleRule4.Selectors.AddRange(New Telerik.Reporting.Drawing.ISelector() {New Telerik.Reporting.Drawing.StyleSelector("PageInfo")})  
        styleRule4.Style.Font.Name = "Tahoma" 
        styleRule4.Style.Font.Size = New Telerik.Reporting.Drawing.Unit(11, Telerik.Reporting.Drawing.UnitType.Point)  
        styleRule4.Style.VerticalAlign = Telerik.Reporting.Drawing.VerticalAlign.Middle  
        Me.StyleSheet.AddRange(New Telerik.Reporting.Drawing.StyleRule() {styleRule1, styleRule2, styleRule3, styleRule4})  
        Me.Width = New Telerik.Reporting.Drawing.Unit(6.5, Telerik.Reporting.Drawing.UnitType.Inch)  
        CType(Me, System.ComponentModel.ISupportInitialize).EndInit()  
 
    End Sub  
 
    Function GetReportData(ByVal pi_InvoiceID As Integer) As SqlDataAdapter  
 
        Dim lo_Connection As SqlConnection = New SqlConnection(OutPar.Database.AppConnectionString)  
        Dim lo_Command As SqlCommand = New SqlCommand("otgi_InvoiceFetch", lo_Connection)  
        lo_Command.CommandType = CommandType.StoredProcedure  
        lo_Connection.FireInfoMessageEventOnUserErrors = False 
 
        'Add parameters  
        Dim prm_BeginPayDate As SqlParameter = New SqlParameter("@pi_InvoiceID", SqlDbType.Int, 4)  
        prm_BeginPayDate.Value = pi_InvoiceID 
        lo_Command.Parameters.Add(prm_BeginPayDate)  
 
        Try  
            'Open the connection and execute the command  
            Me.da_ReportData.SelectCommand = lo_Command 
 
        Catch ex As Exception  
            'An error has occurred  
 
        Finally  
            'Close connection  
            If lo_Connection.State = ConnectionState.Open Then  
                lo_Connection.Close()  
            End If  
        End Try  
 
        'Return data to report  
        GetReportData = Me.da_ReportData  
 
    End Function  
 
    Private Sub Invoice_NeedDataSource(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.NeedDataSource  
 
        'Declare objects/variables  
        Dim lo_Report As Telerik.Reporting.Processing.Report = CType(sender, Telerik.Reporting.Processing.Report)  
 
        'Set the report data source passing report parameters  
        lo_Report.DataSource = GetReportData(Me.ReportParameters("pi_InvoiceID").Value)  
 
    End Sub  
 
End Class  
 

1 Answer, 1 is accepted

Sort by
0
Steve
Telerik team
answered on 10 Nov 2009, 09:48 AM
Hello Jim,

We believe that you are using aligned or docked items to simulate tabular layout in your report - is that correct? Since Q1 2009, we've introduced a Table report item to take care of tabular layout out of the box that would behave consistently whenever cell content grows and borders should not be any different.
Please give it a try and let us know how it goes.

Best wishes,
Steve
the Telerik team

Instantly find answers to your questions on the new Telerik Support Portal.
Watch a video on how to optimize your support resource searches and check out more tips on the blogs.
Tags
General Discussions
Asked by
Jim
Top achievements
Rank 1
Answers by
Steve
Telerik team
Share this question
or