JJ_Tagesabschluss

This commit is contained in:
Jonathan Jenne
2017-09-04 13:53:21 +02:00
parent 7ca6e832d5
commit 6d6126c401
19 changed files with 303 additions and 62 deletions

View File

@@ -22,10 +22,11 @@ Partial Public Class reportUebergabe
Me.components = New System.ComponentModel.Container()
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 XrSummary1 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 XrSummary1 As DevExpress.XtraReports.UI.XRSummary = New DevExpress.XtraReports.UI.XRSummary()
Me.Detail = New DevExpress.XtraReports.UI.DetailBand()
Me.XrLabel49 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel47 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel46 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel45 = New DevExpress.XtraReports.UI.XRLabel()
@@ -73,6 +74,7 @@ Partial Public Class reportUebergabe
Me.PageInfo = New DevExpress.XtraReports.UI.XRControlStyle()
Me.DataField = New DevExpress.XtraReports.UI.XRControlStyle()
Me.ReportFooter = New DevExpress.XtraReports.UI.ReportFooterBand()
Me.XrLabel50 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrPageBreak1 = New DevExpress.XtraReports.UI.XRPageBreak()
Me.XrLabel31 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLine1 = New DevExpress.XtraReports.UI.XRLine()
@@ -99,8 +101,6 @@ Partial Public Class reportUebergabe
Me.XrLabel16 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLine7 = New DevExpress.XtraReports.UI.XRLine()
Me.XrLabel9 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel49 = New DevExpress.XtraReports.UI.XRLabel()
Me.XrLabel50 = New DevExpress.XtraReports.UI.XRLabel()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
@@ -113,6 +113,18 @@ Partial Public Class reportUebergabe
Me.Detail.StyleName = "DataField"
Me.Detail.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'XrLabel49
'
Me.XrLabel49.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.NVE")})
Me.XrLabel49.Dpi = 100.0!
Me.XrLabel49.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel49.LocationFloat = New DevExpress.Utils.PointFloat(241.0878!, 22.04164!)
Me.XrLabel49.Name = "XrLabel49"
Me.XrLabel49.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel49.SizeF = New System.Drawing.SizeF(156.8752!, 11.54169!)
Me.XrLabel49.StylePriority.UseFont = False
Me.XrLabel49.Text = "XrLabel49"
'
'XrLabel47
'
Me.XrLabel47.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.BEMERKUNG")})
@@ -667,6 +679,21 @@ Partial Public Class reportUebergabe
Me.ReportFooter.Name = "ReportFooter"
Me.ReportFooter.PrintAtBottom = True
'
'XrLabel50
'
Me.XrLabel50.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP")})
Me.XrLabel50.Dpi = 100.0!
Me.XrLabel50.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel50.LocationFloat = New DevExpress.Utils.PointFloat(200.0!, 12.5!)
Me.XrLabel50.Name = "XrLabel50"
Me.XrLabel50.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel50.SizeF = New System.Drawing.SizeF(112.4995!, 25.0!)
Me.XrLabel50.StylePriority.UseFont = False
XrSummary1.FormatString = "Summe Kolli: {0}"
XrSummary1.Func = DevExpress.XtraReports.UI.SummaryFunc.Count
XrSummary1.Running = DevExpress.XtraReports.UI.SummaryRunning.Report
Me.XrLabel50.Summary = XrSummary1
'
'XrPageBreak1
'
Me.XrPageBreak1.Dpi = 100.0!
@@ -955,33 +982,6 @@ Partial Public Class reportUebergabe
Me.XrLabel9.Text = "Unterschrift Fahrer:"
Me.XrLabel9.TextAlignment = DevExpress.XtraPrinting.TextAlignment.TopLeft
'
'XrLabel49
'
Me.XrLabel49.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.NVE")})
Me.XrLabel49.Dpi = 100.0!
Me.XrLabel49.Font = New System.Drawing.Font("Arial", 8.25!)
Me.XrLabel49.LocationFloat = New DevExpress.Utils.PointFloat(241.0878!, 22.04164!)
Me.XrLabel49.Name = "XrLabel49"
Me.XrLabel49.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 96.0!)
Me.XrLabel49.SizeF = New System.Drawing.SizeF(156.8752!, 11.54169!)
Me.XrLabel49.StylePriority.UseFont = False
Me.XrLabel49.Text = "XrLabel49"
'
'XrLabel50
'
Me.XrLabel50.DataBindings.AddRange(New DevExpress.XtraReports.UI.XRBinding() {New DevExpress.XtraReports.UI.XRBinding("Text", Nothing, "Query.EMP")})
Me.XrLabel50.Dpi = 100.0!
Me.XrLabel50.Font = New System.Drawing.Font("Arial", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.XrLabel50.LocationFloat = New DevExpress.Utils.PointFloat(200.0!, 12.5!)
Me.XrLabel50.Name = "XrLabel50"
Me.XrLabel50.Padding = New DevExpress.XtraPrinting.PaddingInfo(2, 2, 0, 0, 100.0!)
Me.XrLabel50.SizeF = New System.Drawing.SizeF(112.4995!, 25.0!)
Me.XrLabel50.StylePriority.UseFont = False
XrSummary1.FormatString = "Summe Kolli: {0}"
XrSummary1.Func = DevExpress.XtraReports.UI.SummaryFunc.Count
XrSummary1.Running = DevExpress.XtraReports.UI.SummaryRunning.Report
Me.XrLabel50.Summary = XrSummary1
'
'reportUebergabe
'
Me.Bands.AddRange(New DevExpress.XtraReports.UI.Band() {Me.Detail, Me.TopMargin, Me.BottomMargin, Me.PageHeaderBand1, Me.PageFooterBand1, Me.ReportHeaderBand1, Me.ReportFooter})