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 |