AppCustom/SchaumKommi
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

version 2.2.0.8

Browse Source
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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
SchaumKommiCollo/KommiCollo/My Project/AssemblyInfo.vb
View File

@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("2.2.0.7")> <Assembly: AssemblyVersion("2.2.0.8")>
<Assembly: AssemblyFileVersion("1.0.0.0")> <Assembly: AssemblyFileVersion("1.0.0.0")>

21
SchaumKommiCollo/KommiCollo/reportHinweis.Designer.vb generated
View File

@ -46,42 +46,39 @@ Partial Public Class reportHinweis
' '
'XrLabel6 '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.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.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrLabel6.Name = "XrLabel6" Me.XrLabel6.Name = "XrLabel6"
Me.XrLabel6.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) 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.SizeF = New System.Drawing.SizeF(89.79168!, 18.0!)
Me.XrLabel6.StyleName = "DataField" Me.XrLabel6.StyleName = "DataField"
Me.XrLabel6.StylePriority.UseFont = False Me.XrLabel6.StylePriority.UseFont = False
Me.XrLabel6.Text = "XrLabel6"
' '
'XrLabel7 '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.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.LocationFloat = New DevExpress.Utils.PointFloat(89.79168!, 0!)
Me.XrLabel7.Name = "XrLabel7" Me.XrLabel7.Name = "XrLabel7"
Me.XrLabel7.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) 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.SizeF = New System.Drawing.SizeF(358.5417!, 18.0!)
Me.XrLabel7.StyleName = "DataField" Me.XrLabel7.StyleName = "DataField"
Me.XrLabel7.StylePriority.UseFont = False Me.XrLabel7.StylePriority.UseFont = False
Me.XrLabel7.Text = "XrLabel7"
' '
'XrLabel8 '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.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.Name = "XrLabel8"
Me.XrLabel8.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel8.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel8.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink Me.XrLabel8.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel8.SizeF = New System.Drawing.SizeF(113.75!, 18.0!) Me.XrLabel8.SizeF = New System.Drawing.SizeF(175.2083!, 18.0!)
Me.XrLabel8.StyleName = "DataField" Me.XrLabel8.StyleName = "DataField"
Me.XrLabel8.StylePriority.UseFont = False Me.XrLabel8.StylePriority.UseFont = False
Me.XrLabel8.Text = "XrLabel8"
' '
'TopMargin 'TopMargin
' '
@ -103,7 +100,7 @@ Partial Public Class reportHinweis
Me.SqlDataSource1.Name = "SqlDataSource1" Me.SqlDataSource1.Name = "SqlDataSource1"
CustomSqlQuery1.Name = "Query" 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_" & 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.Queries.AddRange(New DevExpress.DataAccess.Sql.SqlQuery() {CustomSqlQuery1})
Me.SqlDataSource1.ResultSchemaSerializable = resources.GetString("SqlDataSource1.ResultSchemaSerializable") Me.SqlDataSource1.ResultSchemaSerializable = resources.GetString("SqlDataSource1.ResultSchemaSerializable")
' '

2
SchaumKommiCollo/KommiCollo/reportHinweis.resx
View File

@ -121,6 +121,6 @@
<value>17, 17</value> <value>17, 17</value>
</metadata> </metadata>
<data name="SqlDataSource1.ResultSchemaSerializable" xml:space="preserve"> <data name="SqlDataSource1.ResultSchemaSerializable" xml:space="preserve">
<value>PERhdGFTZXQgTmFtZT0iU3FsRGF0YVNvdXJjZTEiPjxWaWV3IE5hbWU9IlF1ZXJ5Ij48RmllbGQgTmFtZT0iR1VJRCIgVHlwZT0iSW50MzIiIC8+PEZpZWxkIE5hbWU9IkhJTldfQ09ERSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJISU5XX1RFWFQiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iSElOV19URVhUX0VSRyIgVHlwZT0iU3RyaW5nIiAvPjwvVmlldz48L0RhdGFTZXQ+</value> <value>PERhdGFTZXQgTmFtZT0iU3FsRGF0YVNvdXJjZTEiPjxWaWV3IE5hbWU9IlF1ZXJ5Ij48RmllbGQgTmFtZT0iR1VJRCIgVHlwZT0iSW50MzIiIC8+PEZpZWxkIE5hbWU9IkhJTldfQ09ERSIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJISU5XX1RFWFQiIFR5cGU9IlN0cmluZyIgLz48RmllbGQgTmFtZT0iSElOV19URVhUX0VSRyIgVHlwZT0iU3RyaW5nIiAvPjxGaWVsZCBOYW1lPSJTRU5EVU5HTlIiIFR5cGU9IlN0cmluZyIgLz48L1ZpZXc+PC9EYXRhU2V0Pg==</value>
</data> </data>
</root> </root>

440
SchaumKommiCollo/KommiCollo/reportUebergabe.designer.vb generated
View File

@ -20,17 +20,29 @@ Partial Public Class reportUebergabe
<System.Diagnostics.DebuggerStepThrough()> <System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent() Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Dim XrSummary1 As DevExpress.XtraReports.UI.XRSummary = New DevExpress.XtraReports.UI.XRSummary()
Dim CustomSqlQuery1 As DevExpress.DataAccess.Sql.CustomSqlQuery = New DevExpress.DataAccess.Sql.CustomSqlQuery() Dim CustomSqlQuery1 As DevExpress.DataAccess.Sql.CustomSqlQuery = New DevExpress.DataAccess.Sql.CustomSqlQuery()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(reportUebergabe)) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(reportUebergabe))
Dim CustomSqlQuery2 As DevExpress.DataAccess.Sql.CustomSqlQuery = New DevExpress.DataAccess.Sql.CustomSqlQuery() Dim CustomSqlQuery2 As DevExpress.DataAccess.Sql.CustomSqlQuery = New DevExpress.DataAccess.Sql.CustomSqlQuery()
Dim CustomSqlQuery3 As DevExpress.DataAccess.Sql.CustomSqlQuery = New DevExpress.DataAccess.Sql.CustomSqlQuery() Dim CustomSqlQuery3 As DevExpress.DataAccess.Sql.CustomSqlQuery = New DevExpress.DataAccess.Sql.CustomSqlQuery()
Dim MasterDetailInfo1 As DevExpress.DataAccess.Sql.MasterDetailInfo = New DevExpress.DataAccess.Sql.MasterDetailInfo() Dim MasterDetailInfo1 As DevExpress.DataAccess.Sql.MasterDetailInfo = New DevExpress.DataAccess.Sql.MasterDetailInfo()
Dim RelationColumnInfo1 As DevExpress.DataAccess.Sql.RelationColumnInfo = New DevExpress.DataAccess.Sql.RelationColumnInfo() Dim RelationColumnInfo1 As DevExpress.DataAccess.Sql.RelationColumnInfo = New DevExpress.DataAccess.Sql.RelationColumnInfo()
Dim XrSummary1 As DevExpress.XtraReports.UI.XRSummary = New DevExpress.XtraReports.UI.XRSummary()
Dim XrSummary2 As DevExpress.XtraReports.UI.XRSummary = New DevExpress.XtraReports.UI.XRSummary() Dim XrSummary2 As DevExpress.XtraReports.UI.XRSummary = New DevExpress.XtraReports.UI.XRSummary()
Dim XrSummary3 As DevExpress.XtraReports.UI.XRSummary = New DevExpress.XtraReports.UI.XRSummary() Dim XrSummary3 As DevExpress.XtraReports.UI.XRSummary = New DevExpress.XtraReports.UI.XRSummary()
Dim XrSummary4 As DevExpress.XtraReports.UI.XRSummary = New DevExpress.XtraReports.UI.XRSummary() Dim XrSummary4 As DevExpress.XtraReports.UI.XRSummary = New DevExpress.XtraReports.UI.XRSummary()
Me.Detail = New DevExpress.XtraReports.UI.DetailBand() Me.Detail = New DevExpress.XtraReports.UI.DetailBand()
Me.labelGewicht = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel34 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel35 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel2 = New DevExpress.XtraReports.UI.XRLabel()
Me.labelSendungNr = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel55 = New DevExpress.XtraReports.UI.XRLabel()
Me.labelPalettenanzahl = New DevExpress.XtraReports.UI.XRLabel()
Me.labelColliCode = New DevExpress.XtraReports.UI.XRLabel()
Me.labelEmpfaenger = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel54 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel45 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel1 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel49 = New DevExpress.XtraReports.UI.XRLabel() Me.XrLabel49 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel51 = New DevExpress.XtraReports.UI.XRLabel() Me.XrLabel51 = New DevExpress.XtraReports.UI.XRLabel()
Me.TopMargin = New DevExpress.XtraReports.UI.TopMarginBand() Me.TopMargin = New DevExpress.XtraReports.UI.TopMarginBand()
@ -95,29 +107,18 @@ Partial Public Class reportUebergabe
Me.XrLabel46 = New DevExpress.XtraReports.UI.XRLabel() Me.XrLabel46 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel58 = New DevExpress.XtraReports.UI.XRLabel() Me.XrLabel58 = New DevExpress.XtraReports.UI.XRLabel()
Me.GroupHeader3 = New DevExpress.XtraReports.UI.GroupHeaderBand() Me.GroupHeader3 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.labelSendungNr = New DevExpress.XtraReports.UI.XRLabel()
Me.labelPalettenanzahl = New DevExpress.XtraReports.UI.XRLabel()
Me.labelColliCode = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel35 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel34 = New DevExpress.XtraReports.UI.XRLabel()
Me.labelGewicht = New DevExpress.XtraReports.UI.XRLabel()
Me.labelEmpfaenger = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel54 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel45 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel55 = New DevExpress.XtraReports.UI.XRLabel()
Me.GroupHeader1 = New DevExpress.XtraReports.UI.GroupHeaderBand() Me.GroupHeader1 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.GroupHeader2 = New DevExpress.XtraReports.UI.GroupHeaderBand() Me.GroupHeader2 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.GroupHeader4 = New DevExpress.XtraReports.UI.GroupHeaderBand() Me.GroupHeader4 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.XrLabel1 = New DevExpress.XtraReports.UI.XRLabel() Me.XrLabel3 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel2 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrSubreport1 = New DevExpress.XtraReports.UI.XRSubreport()
Me.FormattingRule1 = New DevExpress.XtraReports.UI.FormattingRule() Me.FormattingRule1 = New DevExpress.XtraReports.UI.FormattingRule()
Me.XrSubreport1 = New DevExpress.XtraReports.UI.XRSubreport()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
' '
'Detail 'Detail
' '
Me.Detail.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel49, Me.XrLabel51}) Me.Detail.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.labelGewicht, Me.XrLabel34, Me.XrLabel35, Me.XrLabel2, Me.labelSendungNr, Me.XrLabel55, Me.labelPalettenanzahl, Me.labelColliCode, Me.labelEmpfaenger, Me.XrLabel54, Me.XrLabel45, Me.XrLabel1, Me.XrLabel49, Me.XrLabel51})
Me.Detail.HeightF = 24.12505! Me.Detail.HeightF = 59.79162!
Me.Detail.KeepTogether = True Me.Detail.KeepTogether = True
Me.Detail.KeepTogetherWithDetailReports = True Me.Detail.KeepTogetherWithDetailReports = True
Me.Detail.MultiColumn.Mode = DevExpress.XtraReports.UI.MultiColumnMode.UseColumnCount Me.Detail.MultiColumn.Mode = DevExpress.XtraReports.UI.MultiColumnMode.UseColumnCount
@ -126,31 +127,184 @@ Partial Public Class reportUebergabe
Me.Detail.StyleName = "DataField" Me.Detail.StyleName = "DataField"
Me.Detail.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft Me.Detail.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
' '
'labelGewicht
'
Me.labelGewicht.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.SDG_GEWICHT", "{0} kg")})
Me.labelGewicht.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelGewicht.LocationFloat = New DevExpress.Utils.PointFloat(413.3712!, 0!)
Me.labelGewicht.Name = "labelGewicht"
Me.labelGewicht.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelGewicht.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Suppress
Me.labelGewicht.SizeF = New System.Drawing.SizeF(76.09616!, 14.66667!)
Me.labelGewicht.StylePriority.UseFont = False
Me.labelGewicht.StylePriority.UseTextAlignment = False
Me.labelGewicht.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
'
'XrLabel34
'
Me.XrLabel34.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel34.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel34.LocationFloat = New DevExpress.Utils.PointFloat(511.7398!, 0!)
Me.XrLabel34.Name = "XrLabel34"
Me.XrLabel34.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel34.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Suppress
Me.XrLabel34.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel34.SizeF = New System.Drawing.SizeF(58.8913!, 14.66667!)
Me.XrLabel34.StylePriority.UseFont = False
Me.XrLabel34.Text = "1.00 EUR"
'
'XrLabel35
'
Me.XrLabel35.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.SDG_FRANKATUR"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel35.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel35.LocationFloat = New DevExpress.Utils.PointFloat(591.1088!, 0!)
Me.XrLabel35.Name = "XrLabel35"
Me.XrLabel35.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel35.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Suppress
Me.XrLabel35.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel35.SizeF = New System.Drawing.SizeF(58.89142!, 23.0!)
Me.XrLabel35.StylePriority.UseFont = False
'
'XrLabel2
'
Me.XrLabel2.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_LKZ"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel2.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel2.LocationFloat = New DevExpress.Utils.PointFloat(0!, 48.24498!)
Me.XrLabel2.Name = "XrLabel2"
Me.XrLabel2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel2.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel2.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel2.ProcessNullValues = DevExpress.XtraReports.UI.ValueSuppressType.SuppressAndShrink
Me.XrLabel2.SizeF = New System.Drawing.SizeF(21.33847!, 11.54167!)
Me.XrLabel2.StylePriority.UseFont = False
'
'labelSendungNr
'
Me.labelSendungNr.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.SENDUNGNR")})
Me.labelSendungNr.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelSendungNr.LocationFloat = New DevExpress.Utils.PointFloat(156.9539!, 0.1249949!)
Me.labelSendungNr.Name = "labelSendungNr"
Me.labelSendungNr.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelSendungNr.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Suppress
Me.labelSendungNr.SizeF = New System.Drawing.SizeF(58.88268!, 14.66667!)
Me.labelSendungNr.StylePriority.UseFont = False
Me.labelSendungNr.Text = "labelSendungNr"
'
'XrLabel55
'
Me.XrLabel55.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID"), New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_ZUSATZ2")})
Me.XrLabel55.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel55.LocationFloat = New DevExpress.Utils.PointFloat(0!, 25.16661!)
Me.XrLabel55.Name = "XrLabel55"
Me.XrLabel55.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel55.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel55.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel55.ProcessNullValues = DevExpress.XtraReports.UI.ValueSuppressType.SuppressAndShrink
Me.XrLabel55.SizeF = New System.Drawing.SizeF(169.2364!, 10.49999!)
Me.XrLabel55.StylePriority.UseFont = False
'
'labelPalettenanzahl
'
Me.labelPalettenanzahl.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.PALETTENANZAHL")})
Me.labelPalettenanzahl.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelPalettenanzahl.LocationFloat = New DevExpress.Utils.PointFloat(215.8367!, 0.1249949!)
Me.labelPalettenanzahl.Name = "labelPalettenanzahl"
Me.labelPalettenanzahl.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelPalettenanzahl.SizeF = New System.Drawing.SizeF(25.25044!, 14.66667!)
Me.labelPalettenanzahl.StylePriority.UseFont = False
Me.labelPalettenanzahl.StylePriority.UseTextAlignment = False
XrSummary1.FormatString = "{0}"
XrSummary1.Func = DevExpress.XtraReports.UI.SummaryFunc.Count
Me.labelPalettenanzahl.Summary = XrSummary1
Me.labelPalettenanzahl.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
'
'labelColliCode
'
Me.labelColliCode.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.CODE")})
Me.labelColliCode.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelColliCode.LocationFloat = New DevExpress.Utils.PointFloat(241.0872!, 0.1249949!)
Me.labelColliCode.Name = "labelColliCode"
Me.labelColliCode.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelColliCode.SizeF = New System.Drawing.SizeF(37.30055!, 14.66667!)
Me.labelColliCode.StylePriority.UseFont = False
Me.labelColliCode.StylePriority.UseTextAlignment = False
Me.labelColliCode.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'labelEmpfaenger
'
Me.labelEmpfaenger.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.labelEmpfaenger.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelEmpfaenger.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0.1249949!)
Me.labelEmpfaenger.Name = "labelEmpfaenger"
Me.labelEmpfaenger.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelEmpfaenger.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.labelEmpfaenger.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.labelEmpfaenger.ProcessNullValues = DevExpress.XtraReports.UI.ValueSuppressType.SuppressAndShrink
Me.labelEmpfaenger.SizeF = New System.Drawing.SizeF(156.9534!, 12.5!)
Me.labelEmpfaenger.StylePriority.UseFont = False
'
'XrLabel54
'
Me.XrLabel54.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_STRASSE"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel54.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel54.LocationFloat = New DevExpress.Utils.PointFloat(0!, 36.66661!)
Me.XrLabel54.Name = "XrLabel54"
Me.XrLabel54.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel54.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel54.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel54.ProcessNullValues = DevExpress.XtraReports.UI.ValueSuppressType.SuppressAndShrink
Me.XrLabel54.SizeF = New System.Drawing.SizeF(169.2364!, 10.58332!)
Me.XrLabel54.StylePriority.UseFont = False
'
'XrLabel45
'
Me.XrLabel45.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_PLZ_STR"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel45.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel45.LocationFloat = New DevExpress.Utils.PointFloat(21.33848!, 48.24994!)
Me.XrLabel45.Name = "XrLabel45"
Me.XrLabel45.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel45.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel45.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel45.ProcessNullValues = DevExpress.XtraReports.UI.ValueSuppressType.SuppressAndShrink
Me.XrLabel45.SizeF = New System.Drawing.SizeF(147.8979!, 11.54168!)
Me.XrLabel45.StylePriority.UseFont = False
'
'XrLabel1
'
Me.XrLabel1.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_ZUSATZ"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel1.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 13.62502!)
Me.XrLabel1.Name = "XrLabel1"
Me.XrLabel1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel1.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel1.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel1.ProcessNullValues = DevExpress.XtraReports.UI.ValueSuppressType.SuppressAndShrink
Me.XrLabel1.SizeF = New System.Drawing.SizeF(156.9478!, 10.49999!)
Me.XrLabel1.StylePriority.UseFont = False
'
'XrLabel49 'XrLabel49
' '
Me.XrLabel49.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.NVE"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.NVE")}) Me.XrLabel49.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.NVE"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.NVE")})
Me.XrLabel49.Font = New System.Drawing.Font("Arial", 8.25!) Me.XrLabel49.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel49.LocationFloat = New DevExpress.Utils.PointFloat(278.3869!, 11.54168!) Me.XrLabel49.LocationFloat = New DevExpress.Utils.PointFloat(279.3869!, 12.54169!)
Me.XrLabel49.Name = "XrLabel49" Me.XrLabel49.Name = "XrLabel49"
Me.XrLabel49.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel49.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel49.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink Me.XrLabel49.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel49.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag Me.XrLabel49.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel49.SizeF = New System.Drawing.SizeF(148.9583!, 12.58333!) Me.XrLabel49.SizeF = New System.Drawing.SizeF(133.9843!, 12.58333!)
Me.XrLabel49.StylePriority.UseFont = False Me.XrLabel49.StylePriority.UseFont = False
Me.XrLabel49.Visible = False
' '
'XrLabel51 'XrLabel51
' '
Me.XrLabel51.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.POSINHALT"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.NVE")}) Me.XrLabel51.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.POSINHALT"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.NVE")})
Me.XrLabel51.Font = New System.Drawing.Font("Arial", 8.25!) Me.XrLabel51.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel51.LocationFloat = New DevExpress.Utils.PointFloat(278.3869!, 0!) Me.XrLabel51.LocationFloat = New DevExpress.Utils.PointFloat(279.3869!, 0!)
Me.XrLabel51.Name = "XrLabel51" Me.XrLabel51.Name = "XrLabel51"
Me.XrLabel51.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel51.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel51.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink Me.XrLabel51.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel51.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag Me.XrLabel51.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel51.SizeF = New System.Drawing.SizeF(148.9583!, 11.54167!) Me.XrLabel51.SizeF = New System.Drawing.SizeF(133.9843!, 11.54167!)
Me.XrLabel51.StylePriority.UseFont = False Me.XrLabel51.StylePriority.UseFont = False
Me.XrLabel51.Visible = False
' '
'TopMargin 'TopMargin
' '
@ -236,7 +390,7 @@ Partial Public Class reportUebergabe
'PageHeaderBand1 'PageHeaderBand1
' '
Me.PageHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPageInfo3, Me.XrLabel25, Me.XrLabel29, Me.XrLabel31, Me.XrLabel32, Me.XrLabel33, Me.XrLine4, Me.XrLabel37, Me.XrLabel38, Me.XrLabel39}) Me.PageHeaderBand1.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrPageInfo3, Me.XrLabel25, Me.XrLabel29, Me.XrLabel31, Me.XrLabel32, Me.XrLabel33, Me.XrLine4, Me.XrLabel37, Me.XrLabel38, Me.XrLabel39})
Me.PageHeaderBand1.HeightF = 81.64739! Me.PageHeaderBand1.HeightF = 66.64739!
Me.PageHeaderBand1.Name = "PageHeaderBand1" Me.PageHeaderBand1.Name = "PageHeaderBand1"
' '
'XrPageInfo3 'XrPageInfo3
@ -254,7 +408,7 @@ Partial Public Class reportUebergabe
'XrLabel25 'XrLabel25
' '
Me.XrLabel25.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.XrLabel25.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel25.LocationFloat = New DevExpress.Utils.PointFloat(487.468!, 43.64738!) Me.XrLabel25.LocationFloat = New DevExpress.Utils.PointFloat(487.468!, 28.64738!)
Me.XrLabel25.Multiline = True Me.XrLabel25.Multiline = True
Me.XrLabel25.Name = "XrLabel25" Me.XrLabel25.Name = "XrLabel25"
Me.XrLabel25.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel25.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
@ -268,7 +422,7 @@ Partial Public Class reportUebergabe
'XrLabel29 'XrLabel29
' '
Me.XrLabel29.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.XrLabel29.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel29.LocationFloat = New DevExpress.Utils.PointFloat(278.3874!, 43.64751!) Me.XrLabel29.LocationFloat = New DevExpress.Utils.PointFloat(278.3874!, 28.64751!)
Me.XrLabel29.Multiline = True Me.XrLabel29.Multiline = True
Me.XrLabel29.Name = "XrLabel29" Me.XrLabel29.Name = "XrLabel29"
Me.XrLabel29.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel29.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
@ -280,7 +434,7 @@ Partial Public Class reportUebergabe
'XrLabel31 'XrLabel31
' '
Me.XrLabel31.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.XrLabel31.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel31.LocationFloat = New DevExpress.Utils.PointFloat(568.6316!, 43.64738!) Me.XrLabel31.LocationFloat = New DevExpress.Utils.PointFloat(568.6316!, 28.64738!)
Me.XrLabel31.Multiline = True Me.XrLabel31.Multiline = True
Me.XrLabel31.Name = "XrLabel31" Me.XrLabel31.Name = "XrLabel31"
Me.XrLabel31.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel31.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
@ -294,7 +448,7 @@ Partial Public Class reportUebergabe
'XrLabel32 'XrLabel32
' '
Me.XrLabel32.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.XrLabel32.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel32.LocationFloat = New DevExpress.Utils.PointFloat(397.9634!, 43.64738!) Me.XrLabel32.LocationFloat = New DevExpress.Utils.PointFloat(397.9634!, 28.64738!)
Me.XrLabel32.Multiline = True Me.XrLabel32.Multiline = True
Me.XrLabel32.Name = "XrLabel32" Me.XrLabel32.Name = "XrLabel32"
Me.XrLabel32.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel32.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
@ -308,7 +462,7 @@ Partial Public Class reportUebergabe
'XrLabel33 'XrLabel33
' '
Me.XrLabel33.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.XrLabel33.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel33.LocationFloat = New DevExpress.Utils.PointFloat(156.9494!, 43.64738!) Me.XrLabel33.LocationFloat = New DevExpress.Utils.PointFloat(156.9494!, 28.64738!)
Me.XrLabel33.Multiline = True Me.XrLabel33.Multiline = True
Me.XrLabel33.Name = "XrLabel33" Me.XrLabel33.Name = "XrLabel33"
Me.XrLabel33.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel33.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
@ -319,14 +473,14 @@ Partial Public Class reportUebergabe
' '
'XrLine4 'XrLine4
' '
Me.XrLine4.LocationFloat = New DevExpress.Utils.PointFloat(0.0002441406!, 74.64739!) Me.XrLine4.LocationFloat = New DevExpress.Utils.PointFloat(0.0002441406!, 59.64739!)
Me.XrLine4.Name = "XrLine4" Me.XrLine4.Name = "XrLine4"
Me.XrLine4.SizeF = New System.Drawing.SizeF(650.0!, 7.0!) Me.XrLine4.SizeF = New System.Drawing.SizeF(650.0!, 7.0!)
' '
'XrLabel37 'XrLabel37
' '
Me.XrLabel37.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.XrLabel37.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel37.LocationFloat = New DevExpress.Utils.PointFloat(2.000237!, 43.64738!) Me.XrLabel37.LocationFloat = New DevExpress.Utils.PointFloat(2.000237!, 28.64738!)
Me.XrLabel37.Name = "XrLabel37" Me.XrLabel37.Name = "XrLabel37"
Me.XrLabel37.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel37.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel37.SizeF = New System.Drawing.SizeF(154.9492!, 28.00001!) Me.XrLabel37.SizeF = New System.Drawing.SizeF(154.9492!, 28.00001!)
@ -337,7 +491,7 @@ Partial Public Class reportUebergabe
'XrLabel38 'XrLabel38
' '
Me.XrLabel38.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.XrLabel38.Font = New System.Drawing.Font("Arial Narrow", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel38.LocationFloat = New DevExpress.Utils.PointFloat(215.8366!, 43.64738!) Me.XrLabel38.LocationFloat = New DevExpress.Utils.PointFloat(215.8366!, 28.64738!)
Me.XrLabel38.Multiline = True Me.XrLabel38.Multiline = True
Me.XrLabel38.Name = "XrLabel38" Me.XrLabel38.Name = "XrLabel38"
Me.XrLabel38.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel38.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
@ -507,11 +661,11 @@ Partial Public Class reportUebergabe
Me.labelAnzahlSendungen.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.labelAnzahlSendungen.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelAnzahlSendungen.SizeF = New System.Drawing.SizeF(200.0!, 25.0!) Me.labelAnzahlSendungen.SizeF = New System.Drawing.SizeF(200.0!, 25.0!)
Me.labelAnzahlSendungen.StylePriority.UseFont = False Me.labelAnzahlSendungen.StylePriority.UseFont = False
XrSummary1.FormatString = "Anzahl Sendungen: {0}" XrSummary2.FormatString = "Anzahl Sendungen: {0}"
XrSummary1.Func = DevExpress.XtraReports.UI.SummaryFunc.Custom XrSummary2.Func = DevExpress.XtraReports.UI.SummaryFunc.Custom
XrSummary1.IgnoreNullValues = True XrSummary2.IgnoreNullValues = True
XrSummary1.Running = DevExpress.XtraReports.UI.SummaryRunning.Report XrSummary2.Running = DevExpress.XtraReports.UI.SummaryRunning.Report
Me.labelAnzahlSendungen.Summary = XrSummary1 Me.labelAnzahlSendungen.Summary = XrSummary2
' '
'XrLine7 'XrLine7
' '
@ -746,11 +900,11 @@ Partial Public Class reportUebergabe
Me.labelSummeGewicht.SizeF = New System.Drawing.SizeF(249.9998!, 25.0!) Me.labelSummeGewicht.SizeF = New System.Drawing.SizeF(249.9998!, 25.0!)
Me.labelSummeGewicht.StylePriority.UseBackColor = False Me.labelSummeGewicht.StylePriority.UseBackColor = False
Me.labelSummeGewicht.StylePriority.UseFont = False Me.labelSummeGewicht.StylePriority.UseFont = False
XrSummary2.FormatString = "Summe Gewicht: {0} kg" XrSummary3.FormatString = "Summe Gewicht: {0} kg"
XrSummary2.Func = DevExpress.XtraReports.UI.SummaryFunc.Custom XrSummary3.Func = DevExpress.XtraReports.UI.SummaryFunc.Custom
XrSummary2.IgnoreNullValues = True XrSummary3.IgnoreNullValues = True
XrSummary2.Running = DevExpress.XtraReports.UI.SummaryRunning.Report XrSummary3.Running = DevExpress.XtraReports.UI.SummaryRunning.Report
Me.labelSummeGewicht.Summary = XrSummary2 Me.labelSummeGewicht.Summary = XrSummary3
' '
'labelSummeKolli 'labelSummeKolli
' '
@ -761,11 +915,11 @@ Partial Public Class reportUebergabe
Me.labelSummeKolli.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.labelSummeKolli.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelSummeKolli.SizeF = New System.Drawing.SizeF(112.4995!, 25.0!) Me.labelSummeKolli.SizeF = New System.Drawing.SizeF(112.4995!, 25.0!)
Me.labelSummeKolli.StylePriority.UseFont = False Me.labelSummeKolli.StylePriority.UseFont = False
XrSummary3.FormatString = "Summe Kolli: {0}" XrSummary4.FormatString = "Summe Kolli: {0}"
XrSummary3.Func = DevExpress.XtraReports.UI.SummaryFunc.Custom XrSummary4.Func = DevExpress.XtraReports.UI.SummaryFunc.Custom
XrSummary3.IgnoreNullValues = True XrSummary4.IgnoreNullValues = True
XrSummary3.Running = DevExpress.XtraReports.UI.SummaryRunning.Report XrSummary4.Running = DevExpress.XtraReports.UI.SummaryRunning.Report
Me.labelSummeKolli.Summary = XrSummary3 Me.labelSummeKolli.Summary = XrSummary4
' '
'XrLine5 'XrLine5
' '
@ -777,7 +931,7 @@ Partial Public Class reportUebergabe
' '
'XrLine1 'XrLine1
' '
Me.XrLine1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 47.58339!) Me.XrLine1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 53.58339!)
Me.XrLine1.Name = "XrLine1" Me.XrLine1.Name = "XrLine1"
Me.XrLine1.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!) Me.XrLine1.Padding = New DevExpress.XtraPrinting.PaddingInfo(0, 0, 0, 0, 100.0!)
Me.XrLine1.SizeF = New System.Drawing.SizeF(650.0!, 6.999996!) Me.XrLine1.SizeF = New System.Drawing.SizeF(650.0!, 6.999996!)
@ -787,20 +941,22 @@ Partial Public Class reportUebergabe
' '
Me.GroupFooter2.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrSubreport1, Me.XrLine1, Me.XrLabel46, Me.XrLabel58}) Me.GroupFooter2.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrSubreport1, Me.XrLine1, Me.XrLabel46, Me.XrLabel58})
Me.GroupFooter2.GroupUnion = DevExpress.XtraReports.UI.GroupFooterUnion.WithLastDetail Me.GroupFooter2.GroupUnion = DevExpress.XtraReports.UI.GroupFooterUnion.WithLastDetail
Me.GroupFooter2.HeightF = 55.95843! Me.GroupFooter2.HeightF = 67.41676!
Me.GroupFooter2.KeepTogether = True Me.GroupFooter2.KeepTogether = True
Me.GroupFooter2.Level = 2 Me.GroupFooter2.Level = 2
Me.GroupFooter2.Name = "GroupFooter2" Me.GroupFooter2.Name = "GroupFooter2"
' '
'XrLabel46 'XrLabel46
' '
Me.XrLabel46.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.SENDUNGNR")})
Me.XrLabel46.Font = New System.Drawing.Font("Arial", 8.25!) Me.XrLabel46.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel46.ForeColor = System.Drawing.Color.Black Me.XrLabel46.ForeColor = System.Drawing.Color.Black
Me.XrLabel46.LocationFloat = New DevExpress.Utils.PointFloat(2.000093!, 32.99999!) Me.XrLabel46.LocationFloat = New DevExpress.Utils.PointFloat(2.000093!, 38.99999!)
Me.XrLabel46.Multiline = True Me.XrLabel46.Multiline = True
Me.XrLabel46.Name = "XrLabel46" Me.XrLabel46.Name = "XrLabel46"
Me.XrLabel46.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel46.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel46.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Merge Me.XrLabel46.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Merge
Me.XrLabel46.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel46.ProcessNullValues = DevExpress.XtraReports.UI.ValueSuppressType.SuppressAndShrink Me.XrLabel46.ProcessNullValues = DevExpress.XtraReports.UI.ValueSuppressType.SuppressAndShrink
Me.XrLabel46.SizeF = New System.Drawing.SizeF(100.0!, 14.58334!) Me.XrLabel46.SizeF = New System.Drawing.SizeF(100.0!, 14.58334!)
Me.XrLabel46.StyleName = "Title" Me.XrLabel46.StyleName = "Title"
@ -810,15 +966,15 @@ Partial Public Class reportUebergabe
' '
'XrLabel58 'XrLabel58
' '
Me.XrLabel58.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.BEMERKUNG")}) Me.XrLabel58.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.BEMERKUNG"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.SENDUNGNR")})
Me.XrLabel58.Font = New System.Drawing.Font("Arial", 8.25!) Me.XrLabel58.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel58.LocationFloat = New DevExpress.Utils.PointFloat(102.0001!, 32.99999!) Me.XrLabel58.LocationFloat = New DevExpress.Utils.PointFloat(102.0001!, 38.99999!)
Me.XrLabel58.Name = "XrLabel58" Me.XrLabel58.Name = "XrLabel58"
Me.XrLabel58.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel58.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel58.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Merge Me.XrLabel58.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Merge
Me.XrLabel58.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel58.SizeF = New System.Drawing.SizeF(547.0001!, 14.58337!) Me.XrLabel58.SizeF = New System.Drawing.SizeF(547.0001!, 14.58337!)
Me.XrLabel58.StylePriority.UseFont = False Me.XrLabel58.StylePriority.UseFont = False
Me.XrLabel58.Text = "XrLabel47"
' '
'GroupHeader3 'GroupHeader3
' '
@ -829,131 +985,6 @@ Partial Public Class reportUebergabe
Me.GroupHeader3.Level = 1 Me.GroupHeader3.Level = 1
Me.GroupHeader3.Name = "GroupHeader3" Me.GroupHeader3.Name = "GroupHeader3"
' '
'labelSendungNr
'
Me.labelSendungNr.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.SENDUNGNR")})
Me.labelSendungNr.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelSendungNr.LocationFloat = New DevExpress.Utils.PointFloat(156.9539!, 0!)
Me.labelSendungNr.Name = "labelSendungNr"
Me.labelSendungNr.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelSendungNr.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Suppress
Me.labelSendungNr.SizeF = New System.Drawing.SizeF(58.88268!, 14.66667!)
Me.labelSendungNr.StylePriority.UseFont = False
Me.labelSendungNr.Text = "labelSendungNr"
'
'labelPalettenanzahl
'
Me.labelPalettenanzahl.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.PALETTENANZAHL")})
Me.labelPalettenanzahl.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelPalettenanzahl.LocationFloat = New DevExpress.Utils.PointFloat(215.8367!, 0!)
Me.labelPalettenanzahl.Name = "labelPalettenanzahl"
Me.labelPalettenanzahl.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelPalettenanzahl.SizeF = New System.Drawing.SizeF(25.25044!, 14.66667!)
Me.labelPalettenanzahl.StylePriority.UseFont = False
Me.labelPalettenanzahl.StylePriority.UseTextAlignment = False
XrSummary4.FormatString = "{0}"
XrSummary4.Func = DevExpress.XtraReports.UI.SummaryFunc.Count
Me.labelPalettenanzahl.Summary = XrSummary4
Me.labelPalettenanzahl.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
'
'labelColliCode
'
Me.labelColliCode.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.CODE")})
Me.labelColliCode.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelColliCode.LocationFloat = New DevExpress.Utils.PointFloat(241.0872!, 0!)
Me.labelColliCode.Name = "labelColliCode"
Me.labelColliCode.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelColliCode.SizeF = New System.Drawing.SizeF(37.30055!, 14.66667!)
Me.labelColliCode.StylePriority.UseFont = False
Me.labelColliCode.StylePriority.UseTextAlignment = False
Me.labelColliCode.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'XrLabel35
'
Me.XrLabel35.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.SDG_FRANKATUR"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel35.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel35.LocationFloat = New DevExpress.Utils.PointFloat(589.1094!, 0!)
Me.XrLabel35.Name = "XrLabel35"
Me.XrLabel35.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel35.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Suppress
Me.XrLabel35.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel35.SizeF = New System.Drawing.SizeF(58.89142!, 23.0!)
Me.XrLabel35.StylePriority.UseFont = False
'
'XrLabel34
'
Me.XrLabel34.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel34.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel34.LocationFloat = New DevExpress.Utils.PointFloat(509.7403!, 0!)
Me.XrLabel34.Name = "XrLabel34"
Me.XrLabel34.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel34.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Suppress
Me.XrLabel34.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel34.SizeF = New System.Drawing.SizeF(58.8913!, 14.66667!)
Me.XrLabel34.StylePriority.UseFont = False
Me.XrLabel34.Text = "1.00 EUR"
'
'labelGewicht
'
Me.labelGewicht.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.SDG_GEWICHT", "{0} kg")})
Me.labelGewicht.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelGewicht.LocationFloat = New DevExpress.Utils.PointFloat(397.9635!, 0!)
Me.labelGewicht.Name = "labelGewicht"
Me.labelGewicht.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelGewicht.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Suppress
Me.labelGewicht.SizeF = New System.Drawing.SizeF(89.50439!, 14.66667!)
Me.labelGewicht.StylePriority.UseFont = False
Me.labelGewicht.StylePriority.UseTextAlignment = False
Me.labelGewicht.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
'
'labelEmpfaenger
'
Me.labelEmpfaenger.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.labelEmpfaenger.Font = New System.Drawing.Font("Arial", 8.25!)
Me.labelEmpfaenger.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.labelEmpfaenger.Name = "labelEmpfaenger"
Me.labelEmpfaenger.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.labelEmpfaenger.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.labelEmpfaenger.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.labelEmpfaenger.SizeF = New System.Drawing.SizeF(156.9534!, 12.5!)
Me.labelEmpfaenger.StylePriority.UseFont = False
'
'XrLabel54
'
Me.XrLabel54.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_STRASSE"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel54.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel54.LocationFloat = New DevExpress.Utils.PointFloat(0!, 36.54161!)
Me.XrLabel54.Name = "XrLabel54"
Me.XrLabel54.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel54.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel54.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel54.SizeF = New System.Drawing.SizeF(169.2364!, 10.58332!)
Me.XrLabel54.StylePriority.UseFont = False
'
'XrLabel45
'
Me.XrLabel45.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_PLZ_STR"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel45.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel45.LocationFloat = New DevExpress.Utils.PointFloat(21.33848!, 48.12492!)
Me.XrLabel45.Name = "XrLabel45"
Me.XrLabel45.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel45.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel45.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel45.SizeF = New System.Drawing.SizeF(147.8979!, 11.54168!)
Me.XrLabel45.StylePriority.UseFont = False
'
'XrLabel55
'
Me.XrLabel55.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID"), New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_ZUSATZ2")})
Me.XrLabel55.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel55.LocationFloat = New DevExpress.Utils.PointFloat(0!, 25.0416!)
Me.XrLabel55.Name = "XrLabel55"
Me.XrLabel55.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel55.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel55.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel55.SizeF = New System.Drawing.SizeF(169.2364!, 10.49999!)
Me.XrLabel55.StylePriority.UseFont = False
'
'GroupHeader1 'GroupHeader1
' '
Me.GroupHeader1.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("SENDUNGNR", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)}) Me.GroupHeader1.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("SENDUNGNR", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
@ -970,48 +1001,38 @@ Partial Public Class reportUebergabe
' '
'GroupHeader4 'GroupHeader4
' '
Me.GroupHeader4.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel2, Me.XrLabel1, Me.XrLabel55, Me.labelPalettenanzahl, Me.labelColliCode, Me.XrLabel35, Me.XrLabel34, Me.labelGewicht, Me.labelEmpfaenger, Me.XrLabel54, Me.XrLabel45, Me.labelSendungNr}) Me.GroupHeader4.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel3})
Me.GroupHeader4.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("NVE", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)}) Me.GroupHeader4.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("NVE", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
Me.GroupHeader4.HeightF = 59.6666! Me.GroupHeader4.HeightF = 9.874977!
Me.GroupHeader4.Name = "GroupHeader4" Me.GroupHeader4.Name = "GroupHeader4"
' '
'XrLabel1 'XrLabel3
' '
Me.XrLabel1.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_ZUSATZ"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")}) Me.XrLabel3.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel1.Font = New System.Drawing.Font("Arial", 8.25!) Me.XrLabel3.Font = New System.Drawing.Font("Arial", 5.0!)
Me.XrLabel1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 13.50001!) Me.XrLabel3.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrLabel1.Name = "XrLabel1" Me.XrLabel3.Name = "XrLabel3"
Me.XrLabel1.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!) Me.XrLabel3.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel1.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink Me.XrLabel3.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.Suppress
Me.XrLabel1.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag Me.XrLabel3.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel1.SizeF = New System.Drawing.SizeF(156.9478!, 10.49999!) Me.XrLabel3.SizeF = New System.Drawing.SizeF(58.8913!, 9.874977!)
Me.XrLabel1.StylePriority.UseFont = False Me.XrLabel3.StylePriority.UseFont = False
' Me.XrLabel3.Text = "DUMMY"
'XrLabel2 Me.XrLabel3.Visible = False
'
Me.XrLabel2.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_LKZ"), New DevExpress.XtraReports.UI.XRBinding("Tag", Nothing, "Query.GUID")})
Me.XrLabel2.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel2.LocationFloat = New DevExpress.Utils.PointFloat(0!, 48.11999!)
Me.XrLabel2.Name = "XrLabel2"
Me.XrLabel2.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel2.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel2.ProcessDuplicatesTarget = DevExpress.XtraReports.UI.ProcessDuplicatesTarget.Tag
Me.XrLabel2.SizeF = New System.Drawing.SizeF(21.33847!, 11.54167!)
Me.XrLabel2.StylePriority.UseFont = False
'
'XrSubreport1
'
Me.XrSubreport1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrSubreport1.Name = "XrSubreport1"
Me.XrSubreport1.ParameterBindings.Add(New DevExpress.XtraReports.UI.ParameterBinding("SendungNr", Nothing, "Query.GUID"))
Me.XrSubreport1.ReportSource = New KommiCollo.reportHinweis()
Me.XrSubreport1.SizeF = New System.Drawing.SizeF(650.0!, 32.99999!)
' '
'FormattingRule1 'FormattingRule1
' '
Me.FormattingRule1.DataMember = "Query" Me.FormattingRule1.DataMember = "Query"
Me.FormattingRule1.Name = "FormattingRule1" Me.FormattingRule1.Name = "FormattingRule1"
' '
'XrSubreport1
'
Me.XrSubreport1.LocationFloat = New DevExpress.Utils.PointFloat(0!, 6.0!)
Me.XrSubreport1.Name = "XrSubreport1"
Me.XrSubreport1.ParameterBindings.Add(New DevExpress.XtraReports.UI.ParameterBinding("SendungNr", Nothing, "Query.GUID"))
Me.XrSubreport1.ReportSource = New KommiCollo.reportHinweis()
Me.XrSubreport1.SizeF = New System.Drawing.SizeF(650.0!, 32.99999!)
'
'reportUebergabe 'reportUebergabe
' '
Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.Detail, Me.TopMargin, Me.BottomMargin, Me.PageHeaderBand1, Me.ReportHeaderBand1, Me.ReportFooter, Me.GroupFooter2, Me.GroupHeader3, Me.GroupHeader1, Me.GroupHeader2, Me.GroupHeader4}) Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.Detail, Me.TopMargin, Me.BottomMargin, Me.PageHeaderBand1, Me.ReportHeaderBand1, Me.ReportFooter, Me.GroupFooter2, Me.GroupHeader3, Me.GroupHeader1, Me.GroupHeader2, Me.GroupHeader4})
@ -1108,4 +1129,5 @@ Partial Public Class reportUebergabe
Friend WithEvents XrLabel1 As DevExpress.XtraReports.UI.XRLabel Friend WithEvents XrLabel1 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel2 As DevExpress.XtraReports.UI.XRLabel Friend WithEvents XrLabel2 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents FormattingRule1 As DevExpress.XtraReports.UI.FormattingRule Friend WithEvents FormattingRule1 As DevExpress.XtraReports.UI.FormattingRule
Friend WithEvents XrLabel3 As DevExpress.XtraReports.UI.XRLabel
End Class End Class

24
SchaumKommiCollo/KommiCollo/reportUebergabe.vb
View File

@ -44,17 +44,32 @@ Public Class reportUebergabe
''' <summary> ''' <summary>
''' Pro Sendungsnummer das Gewicht aufaddieren ''' Pro Sendungsnummer das Gewicht aufaddieren
''' </summary> ''' </summary>
Private Sub labelGewicht_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles labelGewicht.BeforePrint 'Private Sub labelGewicht_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles labelGewicht.BeforePrint
' Dim sendungsNr As Integer = GetCurrentColumnValue("SENDUNGNR")
' ' Wenn sich die Sendungsnummer geändert hat
' If sendungsNr <> letzteSendung Then
' gewicht = gewicht + CDbl(GetCurrentColumnValue("SDG_GEWICHT"))
' End If
'End Sub
''' <summary>
''' Pro Sendungsnummer das Gewicht aufaddieren
''' </summary>
Private Sub XrLabel3_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles XrLabel3.BeforePrint
Dim sdgStellplaetze As Integer = GetCurrentColumnValue("SDG_STELLPLAETZE")
Dim sendungsNr As Integer = GetCurrentColumnValue("SENDUNGNR") Dim sendungsNr As Integer = GetCurrentColumnValue("SENDUNGNR")
Dim sdgGewicht As Double = CDbl(GetCurrentColumnValue("SDG_GEWICHT"))
' Wenn sich die Sendungsnummer geändert hat ' Wenn sich die Sendungsnummer geändert hat
If sendungsNr <> letzteSendung Then If sendungsNr <> letzteSendung Then
gewicht = gewicht + CDbl(GetCurrentColumnValue("SDG_GEWICHT")) gewicht = gewicht + sdgGewicht
sendungen = sendungen + 1
kolli = kolli + sdgStellplaetze
End If End If
End Sub End Sub
''' <summary> ''' <summary>
''' Summe der Colli ausgeben ''' Summe der Colli ausgeben
''' </summary> ''' </summary>
@ -120,4 +135,5 @@ Public Class reportUebergabe
letzterEmpfänger = empfänger letzterEmpfänger = empfänger
End Sub End Sub
End Class End Class