version 2.2.0.8

This commit is contained in:
Jonathan Jenne
2019-03-18 15:52:41 +01:00
parent e970ce1758
commit 884b779057
5 changed files with 262 additions and 227 deletions

View File

@@ -46,42 +46,39 @@ Partial Public Class reportHinweis
'
'XrLabel6
'
Me.XrLabel6.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.HINW_CODE")})
Me.XrLabel6.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.HINW_CODE"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.SENDUNGNR")})
Me.XrLabel6.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel6.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrLabel6.Name = "XrLabel6"
Me.XrLabel6.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel6.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel6.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel6.SizeF = New System.Drawing.SizeF(89.79168!, 18.0!)
Me.XrLabel6.StyleName = "DataField"
Me.XrLabel6.StylePriority.UseFont = False
Me.XrLabel6.Text = "XrLabel6"
'
'XrLabel7
'
Me.XrLabel7.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.HINW_TEXT")})
Me.XrLabel7.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.HINW_TEXT"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.SENDUNGNR")})
Me.XrLabel7.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel7.LocationFloat = New DevExpress.Utils.PointFloat(89.79168!, 0!)
Me.XrLabel7.Name = "XrLabel7"
Me.XrLabel7.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel7.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel7.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel7.SizeF = New System.Drawing.SizeF(358.5417!, 18.0!)
Me.XrLabel7.StyleName = "DataField"
Me.XrLabel7.StylePriority.UseFont = False
Me.XrLabel7.Text = "XrLabel7"
'
'XrLabel8
'
Me.XrLabel8.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.HINW_TEXT_ERG")})
Me.XrLabel8.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.HINW_TEXT_ERG"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.SENDUNGNR")})
Me.XrLabel8.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel8.LocationFloat = New DevExpress.Utils.PointFloat(526.25!, 0!)
Me.XrLabel8.LocationFloat = New DevExpress.Utils.PointFloat(464.7917!, 0!)
Me.XrLabel8.Name = "XrLabel8"
Me.XrLabel8.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel8.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel8.SizeF = New System.Drawing.SizeF(113.75!, 18.0!)
Me.XrLabel8.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel8.SizeF = New System.Drawing.SizeF(175.2083!, 18.0!)
Me.XrLabel8.StyleName = "DataField"
Me.XrLabel8.StylePriority.UseFont = False
Me.XrLabel8.Text = "XrLabel8"
'
'TopMargin
'
@@ -103,7 +100,7 @@ Partial Public Class reportHinweis
Me.SqlDataSource1.Name = "SqlDataSource1"
CustomSqlQuery1.Name = "Query"
CustomSqlQuery1.Sql = "SELECT DISTINCT GUID " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " ,[HINW_CODE]" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " ,[HINW_TEXT]" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " ,[HINW_TEXT_" &
"ERG]" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " FROM [SCHAUM_IID].[dbo].[VWHUP_REPORT1]"
"ERG]" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & Global.Microsoft.VisualBasic.ChrW(9) & ",[SENDUNGNR]" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " FROM [SCHAUM_IID].[dbo].[VWHUP_REPORT1]"
Me.SqlDataSource1.Queries.AddRange(New DevExpress.DataAccess.Sql.SqlQuery() {CustomSqlQuery1})
Me.SqlDataSource1.ResultSchemaSerializable = resources.GetString("SqlDataSource1.ResultSchemaSerializable")
'