_ Partial Public Class rptVerpflichtungserklaerungNeu Inherits GrapeCity.ActiveReports.SectionReport 'Form overrides dispose to clean up the component list. Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean) If disposing Then End If MyBase.Dispose(disposing) End Sub 'NOTE: The following procedure is required by the ActiveReports Designer 'It can be modified using the ActiveReports Designer. 'Do not modify it using the code editor. Private WithEvents PageHeader As GrapeCity.ActiveReports.SectionReportModel.PageHeader Private WithEvents PageFooter As GrapeCity.ActiveReports.SectionReportModel.PageFooter Private Sub InitializeComponent() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(rptVerpflichtungserklaerungNeu)) Me.PageHeader = New GrapeCity.ActiveReports.SectionReportModel.PageHeader() Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail() Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter() Me.ReportHeader1 = New GrapeCity.ActiveReports.SectionReportModel.ReportHeader() Me.Shape1 = New GrapeCity.ActiveReports.SectionReportModel.Shape() Me.picVERAG = New GrapeCity.ActiveReports.SectionReportModel.Picture() Me.Shape3 = New GrapeCity.ActiveReports.SectionReportModel.Shape() Me.TextBox21 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.TextBox22 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.Shape5 = New GrapeCity.ActiveReports.SectionReportModel.Shape() Me.TextBox23 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.TextBox24 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.Shape17 = New GrapeCity.ActiveReports.SectionReportModel.Shape() Me.TextBox25 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.TextBox26 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.Shape18 = New GrapeCity.ActiveReports.SectionReportModel.Shape() Me.TextBox27 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.Shape19 = New GrapeCity.ActiveReports.SectionReportModel.Shape() Me.TextBox28 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.TextBox29 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.txtFirmaInfo_ATILLA = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.txtFirmaInfo_VERAG = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.txtFirmaInfo_IMEX = New GrapeCity.ActiveReports.SectionReportModel.TextBox() Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter() Me.txtFirma_UNISPED = New GrapeCity.ActiveReports.SectionReportModel.TextBox() CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextBox21, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextBox22, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextBox23, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextBox24, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextBox25, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextBox26, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextBox27, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextBox28, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TextBox29, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.txtFirmaInfo_ATILLA, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.txtFirmaInfo_VERAG, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.txtFirmaInfo_IMEX, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.txtFirma_UNISPED, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me, System.ComponentModel.ISupportInitialize).BeginInit() ' 'PageHeader ' Me.PageHeader.Height = 0! Me.PageHeader.Name = "PageHeader" ' 'Detail ' Me.Detail.Height = 0.2073381! Me.Detail.Name = "Detail" ' 'PageFooter ' Me.PageFooter.Height = 0.2604167! Me.PageFooter.Name = "PageFooter" ' 'ReportHeader1 ' Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Shape1, Me.picVERAG, Me.Shape3, Me.TextBox21, Me.TextBox22, Me.Shape5, Me.TextBox23, Me.TextBox24, Me.Shape17, Me.TextBox25, Me.TextBox26, Me.Shape18, Me.TextBox27, Me.Shape19, Me.TextBox28, Me.TextBox29, Me.txtFirmaInfo_ATILLA, Me.txtFirmaInfo_VERAG, Me.txtFirmaInfo_IMEX, Me.txtFirma_UNISPED}) Me.ReportHeader1.Height = 5.05! Me.ReportHeader1.Name = "ReportHeader1" ' 'Shape1 ' Me.Shape1.Height = 4.092126! Me.Shape1.Left = 0.4299213! Me.Shape1.LineWeight = 2.0! Me.Shape1.Name = "Shape1" Me.Shape1.RoundingRadius = New GrapeCity.ActiveReports.Controls.CornersRadius(10.0!, Nothing, Nothing, Nothing, Nothing) Me.Shape1.Top = 0.5354331! Me.Shape1.Width = 7.086611! ' 'picVERAG ' Me.picVERAG.Height = 0.5000001! Me.picVERAG.HyperLink = Nothing Me.picVERAG.ImageData = CType(resources.GetObject("picVERAG.ImageData"), System.IO.Stream) Me.picVERAG.Left = 5.095276! Me.picVERAG.Name = "picVERAG" Me.picVERAG.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom Me.picVERAG.Top = 0! Me.picVERAG.Width = 2.677166! ' 'Shape3 ' Me.Shape3.BackColor = System.Drawing.Color.FromArgb(CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer)) Me.Shape3.Height = 0.1968504! Me.Shape3.Left = 0.4299213! Me.Shape3.LineWeight = 2.0! Me.Shape3.Name = "Shape3" Me.Shape3.RoundingRadius = New GrapeCity.ActiveReports.Controls.CornersRadius(10.0!, Nothing, Nothing, Nothing, Nothing) Me.Shape3.Top = 0.5354331! Me.Shape3.Width = 7.086611! ' 'TextBox21 ' Me.TextBox21.Height = 0.1574803! Me.TextBox21.Left = 0.476378! Me.TextBox21.Name = "TextBox21" Me.TextBox21.Style = "font-weight: bold" Me.TextBox21.Text = "D (Austria)" Me.TextBox21.Top = 0.5519688! Me.TextBox21.Width = 6.99291! ' 'TextBox22 ' Me.TextBox22.Height = 0.8039368! Me.TextBox22.Left = 0.4768191! Me.TextBox22.Name = "TextBox22" Me.TextBox22.Style = "font-family: Arial; font-size: 8pt; text-justify: auto; white-space: inherit; ddo" & "-char-set: 1; ddo-wrap-mode: inherit" Me.TextBox22.Text = resources.GetString("TextBox22.Text") Me.TextBox22.Top = 0.738! Me.TextBox22.Width = 6.99291! ' 'Shape5 ' Me.Shape5.BackColor = System.Drawing.Color.FromArgb(CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer)) Me.Shape5.Height = 0.1968504! Me.Shape5.Left = 0.4299213! Me.Shape5.LineWeight = 2.0! Me.Shape5.Name = "Shape5" Me.Shape5.RoundingRadius = New GrapeCity.ActiveReports.Controls.CornersRadius(10.0!, Nothing, Nothing, Nothing, Nothing) Me.Shape5.Top = 1.546063! Me.Shape5.Width = 7.086611! ' 'TextBox23 ' Me.TextBox23.Height = 0.1574803! Me.TextBox23.Left = 0.476378! Me.TextBox23.Name = "TextBox23" Me.TextBox23.Style = "font-weight: bold" Me.TextBox23.Text = "TR (Türkiye)" Me.TextBox23.Top = 1.562598! Me.TextBox23.Width = 6.99291! ' 'TextBox24 ' Me.TextBox24.Height = 0.8039368! Me.TextBox24.Left = 0.476378! Me.TextBox24.Name = "TextBox24" Me.TextBox24.Style = "font-family: Arial; font-size: 8pt; ddo-char-set: 1" Me.TextBox24.Text = resources.GetString("TextBox24.Text") Me.TextBox24.Top = 1.769292! Me.TextBox24.Width = 6.99291! ' 'Shape17 ' Me.Shape17.BackColor = System.Drawing.Color.FromArgb(CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer)) Me.Shape17.Height = 0.1968504! Me.Shape17.Left = 0.4299213! Me.Shape17.LineWeight = 2.0! Me.Shape17.Name = "Shape17" Me.Shape17.RoundingRadius = New GrapeCity.ActiveReports.Controls.CornersRadius(10.0!, Nothing, Nothing, Nothing, Nothing) Me.Shape17.Top = 2.573229! Me.Shape17.Width = 7.086611! ' 'TextBox25 ' Me.TextBox25.Height = 0.1574803! Me.TextBox25.Left = 0.476378! Me.TextBox25.Name = "TextBox25" Me.TextBox25.Style = "font-weight: bold" Me.TextBox25.Text = "SC / HR / BHI" Me.TextBox25.Top = 2.589764! Me.TextBox25.Width = 6.99291! ' 'TextBox26 ' Me.TextBox26.Height = 0.8039368! Me.TextBox26.Left = 0.476378! Me.TextBox26.Name = "TextBox26" Me.TextBox26.Style = "font-family: Arial; font-size: 8pt; font-weight: normal; ddo-char-set: 1" Me.TextBox26.Text = resources.GetString("TextBox26.Text") Me.TextBox26.Top = 2.796457! Me.TextBox26.Width = 6.99291! ' 'Shape18 ' Me.Shape18.BackColor = System.Drawing.Color.FromArgb(CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer)) Me.Shape18.Height = 0.1968504! Me.Shape18.Left = 0.4299213! Me.Shape18.LineWeight = 2.0! Me.Shape18.Name = "Shape18" Me.Shape18.RoundingRadius = New GrapeCity.ActiveReports.Controls.CornersRadius(10.0!, Nothing, Nothing, Nothing, Nothing) Me.Shape18.Top = 3.600394! Me.Shape18.Width = 7.086611! ' 'TextBox27 ' Me.TextBox27.Height = 0.1574803! Me.TextBox27.Left = 0.4763782! Me.TextBox27.Name = "TextBox27" Me.TextBox27.Style = "font-weight: bold" Me.TextBox27.Text = "EN" Me.TextBox27.Top = 3.61693! Me.TextBox27.Width = 6.99291! ' 'Shape19 ' Me.Shape19.BackColor = System.Drawing.Color.FromArgb(CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer), CType(CType(220, Byte), Integer)) Me.Shape19.Height = 0.2362205! Me.Shape19.Left = 0.4299213! Me.Shape19.LineWeight = 3.0! Me.Shape19.Name = "Shape19" Me.Shape19.RoundingRadius = New GrapeCity.ActiveReports.Controls.CornersRadius(10.0!, Nothing, Nothing, Nothing, Nothing) Me.Shape19.Top = 4.81378! Me.Shape19.Width = 7.086611! ' 'TextBox28 ' Me.TextBox28.Height = 0.2196842! Me.TextBox28.Left = 0.4763782! Me.TextBox28.Name = "TextBox28" Me.TextBox28.Style = "font-weight: bold; text-align: center; vertical-align: middle" Me.TextBox28.Text = "Verpflichtungserklärung zu folgenden T1/T2 MRN:" Me.TextBox28.Top = 4.830315! Me.TextBox28.Width = 6.99291! ' 'TextBox29 ' Me.TextBox29.Height = 0.772! Me.TextBox29.Left = 0.4768191! Me.TextBox29.Name = "TextBox29" Me.TextBox29.Style = "font-size: 8pt; font-weight: normal; text-align: left; vertical-align: middle; dd" & "o-char-set: 1" Me.TextBox29.Text = resources.GetString("TextBox29.Text") Me.TextBox29.Top = 3.827! Me.TextBox29.Width = 6.99291! ' 'txtFirmaInfo_ATILLA ' Me.txtFirmaInfo_ATILLA.Height = 0.5000001! Me.txtFirmaInfo_ATILLA.Left = 0.4299213! Me.txtFirmaInfo_ATILLA.Name = "txtFirmaInfo_ATILLA" Me.txtFirmaInfo_ATILLA.Style = "font-size: 8.25pt; vertical-align: middle; ddo-char-set: 204" Me.txtFirmaInfo_ATILLA.Text = "A-4975 Suben" & Global.Microsoft.VisualBasic.ChrW(9) & "Tel. +43 77 11 / 2845" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & "www.verag.ag" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Suben 15" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & "Fax +43 77 11 / 284" & "6" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & "atilla@verag.ag" Me.txtFirmaInfo_ATILLA.Top = 0! Me.txtFirmaInfo_ATILLA.Visible = False Me.txtFirmaInfo_ATILLA.Width = 6.67165! ' 'txtFirmaInfo_VERAG ' Me.txtFirmaInfo_VERAG.Height = 0.5000001! Me.txtFirmaInfo_VERAG.Left = 0.4299226! Me.txtFirmaInfo_VERAG.Name = "txtFirmaInfo_VERAG" Me.txtFirmaInfo_VERAG.Style = "font-size: 8.25pt; vertical-align: middle; ddo-char-set: 204" Me.txtFirmaInfo_VERAG.Text = "A-4975 Suben" & Global.Microsoft.VisualBasic.ChrW(9) & "Tel. +43 77 11 / 27 77-20 " & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & " www.verag.ag" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Suben 14-15" & Global.Microsoft.VisualBasic.ChrW(9) & "Fax +4" & "3 77 11 / 27 88" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & " eu@verag.ag" Me.txtFirmaInfo_VERAG.Top = 0! Me.txtFirmaInfo_VERAG.Width = 6.67165! ' 'txtFirmaInfo_IMEX ' Me.txtFirmaInfo_IMEX.Height = 0.5000001! Me.txtFirmaInfo_IMEX.Left = 0.4299213! Me.txtFirmaInfo_IMEX.Name = "txtFirmaInfo_IMEX" Me.txtFirmaInfo_IMEX.Style = "font-size: 8.25pt; vertical-align: middle; ddo-char-set: 204" Me.txtFirmaInfo_IMEX.Text = "A-4975 Suben" & Global.Microsoft.VisualBasic.ChrW(9) & "Tel. +43 77 11 / 31630 " & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & "www.imex-group.at" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Suben 15" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & "Fax +43 77 1" & "1 / 31630-1" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & " info@imex-group.at" Me.txtFirmaInfo_IMEX.Top = 0! Me.txtFirmaInfo_IMEX.Visible = False Me.txtFirmaInfo_IMEX.Width = 6.67165! ' 'ReportFooter1 ' Me.ReportFooter1.Height = 0! Me.ReportFooter1.Name = "ReportFooter1" ' 'txtFirma_UNISPED ' Me.txtFirma_UNISPED.Height = 0.5000001! Me.txtFirma_UNISPED.Left = 0.4299213! Me.txtFirma_UNISPED.Name = "txtFirma_UNISPED" Me.txtFirma_UNISPED.Style = "font-size: 8.25pt; vertical-align: middle; ddo-char-set: 204" Me.txtFirma_UNISPED.Text = "A-4975 Suben" & Global.Microsoft.VisualBasic.ChrW(9) & "Tel. +43 77 11 / 2677-0" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & " www.unisped.at" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Suben 15" & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & Global.Microsoft.VisualBasic.ChrW(9) & "office@uni" & "sped.at" Me.txtFirma_UNISPED.Top = 0! Me.txtFirma_UNISPED.Visible = False Me.txtFirma_UNISPED.Width = 6.67165! ' 'rptVerpflichtungserklaerungNeu ' Me.MasterReport = False Me.PageSettings.Margins.Bottom = 0.1968504! Me.PageSettings.Margins.Left = 0.1968504! Me.PageSettings.Margins.Right = 0.1968504! Me.PageSettings.Margins.Top = 0.3937008! Me.PageSettings.PaperHeight = 11.0! Me.PageSettings.PaperWidth = 8.5! Me.PrintWidth = 7.874016! Me.Sections.Add(Me.ReportHeader1) Me.Sections.Add(Me.PageHeader) Me.Sections.Add(Me.Detail) Me.Sections.Add(Me.PageFooter) Me.Sections.Add(Me.ReportFooter1) Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" & "l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal")) Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal")) Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" & "lic", "Heading2", "Normal")) Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal")) CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextBox21, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextBox22, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextBox23, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextBox24, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextBox25, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextBox26, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextBox27, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextBox28, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TextBox29, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.txtFirmaInfo_ATILLA, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.txtFirmaInfo_VERAG, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.txtFirmaInfo_IMEX, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.txtFirma_UNISPED, System.ComponentModel.ISupportInitialize).EndInit() CType(Me, System.ComponentModel.ISupportInitialize).EndInit() End Sub Private WithEvents ReportHeader1 As GrapeCity.ActiveReports.SectionReportModel.ReportHeader Private WithEvents ReportFooter1 As GrapeCity.ActiveReports.SectionReportModel.ReportFooter Private WithEvents Shape1 As GrapeCity.ActiveReports.SectionReportModel.Shape Private WithEvents Shape3 As GrapeCity.ActiveReports.SectionReportModel.Shape Private WithEvents TextBox21 As GrapeCity.ActiveReports.SectionReportModel.TextBox Private WithEvents TextBox22 As GrapeCity.ActiveReports.SectionReportModel.TextBox Private WithEvents Shape5 As GrapeCity.ActiveReports.SectionReportModel.Shape Private WithEvents TextBox23 As GrapeCity.ActiveReports.SectionReportModel.TextBox Private WithEvents TextBox24 As GrapeCity.ActiveReports.SectionReportModel.TextBox Private WithEvents Shape17 As GrapeCity.ActiveReports.SectionReportModel.Shape Private WithEvents TextBox25 As GrapeCity.ActiveReports.SectionReportModel.TextBox Private WithEvents TextBox26 As GrapeCity.ActiveReports.SectionReportModel.TextBox Private WithEvents Shape18 As GrapeCity.ActiveReports.SectionReportModel.Shape Private WithEvents TextBox27 As GrapeCity.ActiveReports.SectionReportModel.TextBox Private WithEvents Shape19 As GrapeCity.ActiveReports.SectionReportModel.Shape Private WithEvents TextBox28 As GrapeCity.ActiveReports.SectionReportModel.TextBox Private WithEvents TextBox29 As GrapeCity.ActiveReports.SectionReportModel.TextBox Public WithEvents picVERAG As GrapeCity.ActiveReports.SectionReportModel.Picture Public WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail Public WithEvents txtFirmaInfo_ATILLA As GrapeCity.ActiveReports.SectionReportModel.TextBox Public WithEvents txtFirmaInfo_VERAG As GrapeCity.ActiveReports.SectionReportModel.TextBox Public WithEvents txtFirmaInfo_IMEX As GrapeCity.ActiveReports.SectionReportModel.TextBox Private WithEvents txtFirma_UNISPED As GrapeCity.ActiveReports.SectionReportModel.TextBox End Class