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

jj: fix similar addresses not being printed, fix consecutive collis not being printed

Browse Source
This commit is contained in:
Jonathan Jenne
2018-09-28 12:08:13 +02:00
parent 5de6817422
commit 9a9c48db16
3 changed files with 74 additions and 49 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -96,11 +96,11 @@ Partial Public Class reportUebergabe
Me.GroupHeader3 = New DevExpress.XtraReports.UI.GroupHeaderBand()
Me.labelSendungNr = New DevExpress.XtraReports.UI.XRLabel()
Me.labelPalettenanzahl = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel42 = 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.XrLabel44 = 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()
@@ -910,18 +910,18 @@ Partial Public Class reportUebergabe
Me.labelPalettenanzahl.Summary = XrSummary4
Me.labelPalettenanzahl.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopRight
'
'XrLabel42
'labelColliCode
'
Me.XrLabel42.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.CODE")})
Me.XrLabel42.Dpi = 100.0!
Me.XrLabel42.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel42.LocationFloat = New DevExpress.Utils.PointFloat(241.0872!, 0!)
Me.XrLabel42.Name = "XrLabel42"
Me.XrLabel42.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel42.SizeF = New System.Drawing.SizeF(37.30055!, 14.66667!)
Me.XrLabel42.StylePriority.UseFont = False
Me.XrLabel42.StylePriority.UseTextAlignment = False
Me.XrLabel42.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
Me.labelColliCode.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.CODE")})
Me.labelColliCode.Dpi = 100.0!
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
'
@@ -962,57 +962,57 @@ Partial Public Class reportUebergabe
Me.labelGewicht.SizeF = New System.Drawing.SizeF(58.89133!, 14.66667!)
Me.labelGewicht.StylePriority.UseFont = False
'
'XrLabel44
'labelEmpfaenger
'
Me.XrLabel44.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP")})
Me.XrLabel44.Dpi = 100.0!
Me.XrLabel44.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel44.LocationFloat = New DevExpress.Utils.PointFloat(0!, 0!)
Me.XrLabel44.Name = "XrLabel44"
Me.XrLabel44.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel44.ProcessDuplicatesMode = DevExpress.XtraReports.UI.ProcessDuplicatesMode.SuppressAndShrink
Me.XrLabel44.SizeF = New System.Drawing.SizeF(156.9534!, 12.5!)
Me.XrLabel44.StylePriority.UseFont = False
Me.XrLabel44.Text = "XrLabel29"
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.KUNDEN_ID")})
Me.labelEmpfaenger.Dpi = 100.0!
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")})
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.KUNDEN_ID")})
Me.XrLabel54.Dpi = 100.0!
Me.XrLabel54.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel54.LocationFloat = New DevExpress.Utils.PointFloat(0!, 23.0!)
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(156.9534!, 10.58332!)
Me.XrLabel54.StylePriority.UseFont = False
Me.XrLabel54.Text = "XrLabel34"
'
'XrLabel45
'
Me.XrLabel45.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_PLZ_STR")})
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.KUNDEN_ID")})
Me.XrLabel45.Dpi = 100.0!
Me.XrLabel45.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel45.LocationFloat = New DevExpress.Utils.PointFloat(0!, 33.58332!)
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(156.9534!, 11.54167!)
Me.XrLabel45.StylePriority.UseFont = False
Me.XrLabel45.Text = "XrLabel33"
'
'XrLabel55
'
Me.XrLabel55.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP_ZUSATZ")})
Me.XrLabel55.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.KUNDEN_ID")})
Me.XrLabel55.Dpi = 100.0!
Me.XrLabel55.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel55.LocationFloat = New DevExpress.Utils.PointFloat(0!, 12.50001!)
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(154.9481!, 10.49999!)
Me.XrLabel55.StylePriority.UseFont = False
Me.XrLabel55.Text = "XrLabel35"
'
'GroupHeader1
'
@@ -1032,7 +1032,7 @@ Partial Public Class reportUebergabe
'
'GroupHeader4
'
Me.GroupHeader4.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel55, Me.labelPalettenanzahl, Me.XrLabel42, Me.XrLabel35, Me.XrLabel34, Me.labelGewicht, Me.XrLabel44, Me.XrLabel54, Me.XrLabel45, Me.labelSendungNr})
Me.GroupHeader4.Controls.AddRange(New DevExpress.XtraReports.UI.XRControl() {Me.XrLabel55, Me.labelPalettenanzahl, Me.labelColliCode, Me.XrLabel35, Me.XrLabel34, Me.labelGewicht, Me.labelEmpfaenger, Me.XrLabel54, Me.XrLabel45, Me.labelSendungNr})
Me.GroupHeader4.Dpi = 100.0!
Me.GroupHeader4.GroupFields.AddRange(New DevExpress.XtraReports.UI.GroupField() {New DevExpress.XtraReports.UI.GroupField("NVE", DevExpress.XtraReports.UI.XRColumnSortOrder.Ascending)})
Me.GroupHeader4.HeightF = 45.12499!
@@ -1111,12 +1111,12 @@ Partial Public Class reportUebergabe
Friend WithEvents GroupFooter2 As DevExpress.XtraReports.UI.GroupFooterBand
Friend WithEvents XrLine5 As DevExpress.XtraReports.UI.XRLine
Friend WithEvents GroupHeader3 As DevExpress.XtraReports.UI.GroupHeaderBand
Friend WithEvents XrLabel44 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents labelEmpfaenger As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel45 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel54 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents labelSendungNr As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents labelPalettenanzahl As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel42 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents labelColliCode As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel35 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents XrLabel34 As DevExpress.XtraReports.UI.XRLabel
Friend WithEvents labelGewicht As DevExpress.XtraReports.UI.XRLabel