edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

SpedBuchRPT

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-05-23 15:56:08 +02:00
parent f73f77b76f
commit 7df3fa1c96
9 changed files with 198 additions and 758 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
SDL/My Project/Resources.resx
View File

@@ -368,7 +368,7 @@
<value>..\Resources\statistik.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="aeo_CS" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>F:\Grafik\VERAG\AEO\aeo_CS.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<value>..\Resources\aeo_CS.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="verag_Card" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\verag_Card.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>

BIN
SDL/Resources/AEO_CS.jpg Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 48 KiB

BIN
SDL/Resources/Verag_Customs_Service_AEO1.jpg Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 8.1 KiB

15
SDL/SDL.vbproj
View File

@@ -912,6 +912,11 @@
<Compile Include="mdm\usrcntlFremdrechnungen.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="My Project\Resources.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Resources.resx</DependentUpon>
</Compile>
<Compile Include="seriendruck\usrCntlFakturierung.Designer.vb">
<DependentUpon>usrCntlFakturierung.vb</DependentUpon>
</Compile>
@@ -966,11 +971,6 @@
<Compile Include="mdm\usrCntlMDMDatenverarbeitungAuswertungen_divers.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="My Project\Resources.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Resources.resx</DependentUpon>
</Compile>
<Compile Include="OriginalArchiv_ATR\frmATR.Designer.vb">
<DependentUpon>frmATR.vb</DependentUpon>
</Compile>
@@ -2988,9 +2988,7 @@
<Compile Include="Speditionsbuch\Nacherfassung\rptSpeditionsberichtKdSpez.Designer.vb">
<DependentUpon>rptSpeditionsberichtKdSpez.vb</DependentUpon>
</Compile>
<Compile Include="Speditionsbuch\Nacherfassung\rptSpeditionsberichtKdSpez.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="Speditionsbuch\Nacherfassung\rptSpeditionsberichtKdSpez.vb" />
<Compile Include="Speditionsbuch\rptSpeditionsberichtKunde.Designer.vb">
<DependentUpon>rptSpeditionsberichtKunde.vb</DependentUpon>
</Compile>
@@ -4972,6 +4970,7 @@
<None Include="Resources\search.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\Verag_Customs_Service_AEO1.jpg" />
<EmbeddedResource Include="My Project\license.elic.xml" />
<Content Include="My Project\licensePDFPro.elic.xml" />
<Content Include="My Project\licensePDFViewer.elic.xml" />

78
SDL/Speditionsbuch/Nacherfassung/rptSpeditionsberichtKdSpez.Designer.vb generated
View File

@@ -49,6 +49,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
Me.lblFrachtfKdNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
Me.txtKdOpt = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.Line3 = New GrapeCity.ActiveReports.SectionReportModel.Line()
Me.lblKdAuftragNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter()
Me.Label28 = New GrapeCity.ActiveReports.SectionReportModel.Label()
Me.Line2 = New GrapeCity.ActiveReports.SectionReportModel.Line()
@@ -117,7 +118,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
Me.Label4 = New GrapeCity.ActiveReports.SectionReportModel.Label()
Me.Label5 = New GrapeCity.ActiveReports.SectionReportModel.Label()
Me.GroupFooter4 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
Me.lblKdAuftragNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.Label11 = New GrapeCity.ActiveReports.SectionReportModel.Label()
CType(Me.lblLKWNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lblAbs, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lblBarzahlungsbetrag, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -147,6 +148,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
CType(Me.lblAuftrKdNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lblFrachtfKdNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtKdOpt, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lblKdAuftragNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Label28, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.ReportInfo2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lblDat, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -195,7 +197,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
CType(Me.Label8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Label4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Label5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.lblKdAuftragNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.Label11, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'PageHeader
@@ -205,8 +207,8 @@ Partial Public Class rptSpeditionsberichtKdSpez
'
'Detail
'
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblLKWNr, Me.lblAbs, Me.lblBarzahlungsbetrag, Me.lblBarTital, Me.lblBezugsNr, Me.lblPosNr, Me.lblAbfertigungsart, Me.lblAbfDatum, Me.Label2, Me.Label14, Me.Label15, Me.Label16, Me.lblEmpf, Me.lblAuftr, Me.lblFrachtf, Me.lblRohmasse, Me.txtPackst<EFBFBD>cke, Me.txtVermerk, Me.Label7, Me.Label21, Me.lblRechnungsBetrag, Me.lblRechnungsbetragInEur, Me.lblWaehrung, Me.lblAnzahl, Me.lblAbsKdNr, Me.lblEmpfKdNr, Me.lblAuftrKdNr, Me.lblFrachtfKdNr, Me.txtKdOpt, Me.Line3, Me.lblKdAuftragNr})
Me.Detail.Height = 1.013227!
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblLKWNr, Me.lblAbs, Me.lblBarzahlungsbetrag, Me.lblBarTital, Me.lblBezugsNr, Me.lblPosNr, Me.lblAbfertigungsart, Me.lblAbfDatum, Me.Label2, Me.Label14, Me.Label15, Me.Label16, Me.lblEmpf, Me.lblAuftr, Me.lblFrachtf, Me.lblRohmasse, Me.txtPackst<EFBFBD>cke, Me.txtVermerk, Me.Label7, Me.Label21, Me.lblRechnungsBetrag, Me.lblRechnungsbetragInEur, Me.lblWaehrung, Me.lblAnzahl, Me.lblAbsKdNr, Me.lblEmpfKdNr, Me.lblAuftrKdNr, Me.lblFrachtfKdNr, Me.txtKdOpt, Me.Line3, Me.lblKdAuftragNr, Me.Label11})
Me.Detail.Height = 1.02033!
Me.Detail.KeepTogether = True
Me.Detail.Name = "Detail"
'
@@ -232,7 +234,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
"ar-set: 1"
Me.lblAbs.Text = "VERAG"
Me.lblAbs.Top = 0.03149607!
Me.lblAbs.Width = 2.155906!
Me.lblAbs.Width = 2.005118!
'
'lblBarzahlungsbetrag
'
@@ -242,7 +244,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
Me.lblBarzahlungsbetrag.Name = "lblBarzahlungsbetrag"
Me.lblBarzahlungsbetrag.Style = "font-size: 8pt; font-weight: normal; text-align: right; ddo-char-set: 1"
Me.lblBarzahlungsbetrag.Text = "250.000,00"
Me.lblBarzahlungsbetrag.Top = 0.03149607!
Me.lblBarzahlungsbetrag.Top = 0.5023623!
Me.lblBarzahlungsbetrag.Width = 0.6708655!
'
'lblBarTital
@@ -253,7 +255,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
Me.lblBarTital.Name = "lblBarTital"
Me.lblBarTital.Style = "font-size: 8pt; font-weight: normal; text-align: right; ddo-char-set: 1"
Me.lblBarTital.Text = "Bar:"
Me.lblBarTital.Top = 0.03149607!
Me.lblBarTital.Top = 0.5023623!
Me.lblBarTital.Width = 0.5751972!
'
'lblBezugsNr
@@ -556,12 +558,23 @@ Partial Public Class rptSpeditionsberichtKdSpez
Me.Line3.LineColor = System.Drawing.Color.LightGray
Me.Line3.LineWeight = 1.0!
Me.Line3.Name = "Line3"
Me.Line3.Top = 0.8708662!
Me.Line3.Top = 1.013386!
Me.Line3.Width = 7.475196!
Me.Line3.X1 = 0.002755906!
Me.Line3.X2 = 7.477952!
Me.Line3.Y1 = 0.8708662!
Me.Line3.Y2 = 0.8708662!
Me.Line3.Y1 = 1.013386!
Me.Line3.Y2 = 1.013386!
'
'lblKdAuftragNr
'
Me.lblKdAuftragNr.CanGrow = False
Me.lblKdAuftragNr.Height = 0.1574803!
Me.lblKdAuftragNr.Left = 0!
Me.lblKdAuftragNr.Name = "lblKdAuftragNr"
Me.lblKdAuftragNr.Style = "font-size: 8pt; ddo-char-set: 1"
Me.lblKdAuftragNr.Text = "Auftrag:T1713072"
Me.lblKdAuftragNr.Top = 0.6598426!
Me.lblKdAuftragNr.Width = 1.474409!
'
'PageFooter
'
@@ -623,7 +636,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
'
Me.picVERAG.Height = 0.4169292!
Me.picVERAG.HyperLink = Nothing
Me.picVERAG.ImageData = CType(resources.GetObject("picVERAG.ImageData"), System.IO.Stream)
Me.picVERAG.ImageBase64String = resources.GetString("picVERAG.ImageBase64String")
Me.picVERAG.Left = 5.281889!
Me.picVERAG.Name = "picVERAG"
Me.picVERAG.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
@@ -669,23 +682,23 @@ Partial Public Class rptSpeditionsberichtKdSpez
'
Me.lblFilterTxt.Height = 0.1377953!
Me.lblFilterTxt.HyperLink = Nothing
Me.lblFilterTxt.Left = 0.01023626!
Me.lblFilterTxt.Left = 0.01023622!
Me.lblFilterTxt.Name = "lblFilterTxt"
Me.lblFilterTxt.Style = "font-size: 8pt; font-weight: normal; text-align: left; ddo-char-set: 1"
Me.lblFilterTxt.Text = "Filter:"
Me.lblFilterTxt.Top = 0.7673229!
Me.lblFilterTxt.Top = 0.6968504!
Me.lblFilterTxt.Visible = False
Me.lblFilterTxt.Width = 4.312599!
'
'txtFilter
'
Me.txtFilter.CanShrink = True
Me.txtFilter.Height = 0.1480315!
Me.txtFilter.Height = 0.218504!
Me.txtFilter.Left = 0!
Me.txtFilter.Name = "txtFilter"
Me.txtFilter.Style = "font-size: 8pt; ddo-char-set: 1"
Me.txtFilter.Style = "font-size: 10pt; font-weight: bold; ddo-char-set: 1"
Me.txtFilter.Text = "-"
Me.txtFilter.Top = 0.9051182!
Me.txtFilter.Top = 0.8346457!
Me.txtFilter.Visible = False
Me.txtFilter.Width = 7.480316!
'
@@ -941,7 +954,6 @@ Partial Public Class rptSpeditionsberichtKdSpez
Me.Label35.Style = "font-size: 8pt; font-weight: normal; text-align: right; ddo-char-set: 1"
Me.Label35.Text = "Rechnung:"
Me.Label35.Top = 0.1874016!
Me.Label35.Visible = False
Me.Label35.Width = 0.5751972!
'
'lblGesSumRechnungsbetrag
@@ -954,7 +966,6 @@ Partial Public Class rptSpeditionsberichtKdSpez
" ddo-char-set: 1"
Me.lblGesSumRechnungsbetrag.Text = "250.000,00"
Me.lblGesSumRechnungsbetrag.Top = 0.1874016!
Me.lblGesSumRechnungsbetrag.Visible = False
Me.lblGesSumRechnungsbetrag.Width = 0.734252!
'
'Label39
@@ -1256,7 +1267,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
Me.Label6.Left = 6.231496!
Me.Label6.Name = "Label6"
Me.Label6.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
Me.Label6.Text = "Zahlungsbetrag"
Me.Label6.Text = "Abfertigungsstelle"
Me.Label6.Top = 0.06732279!
Me.Label6.Width = 1.246063!
'
@@ -1300,20 +1311,19 @@ Partial Public Class rptSpeditionsberichtKdSpez
Me.GroupFooter4.Height = 0!
Me.GroupFooter4.Name = "GroupFooter4"
'
'lblKdAuftragNr
'Label11
'
Me.lblKdAuftragNr.CanGrow = False
Me.lblKdAuftragNr.Height = 0.1574803!
Me.lblKdAuftragNr.Left = 0!
Me.lblKdAuftragNr.Name = "lblKdAuftragNr"
Me.lblKdAuftragNr.Style = "font-size: 8pt; ddo-char-set: 1"
Me.lblKdAuftragNr.Text = "Auftrag:T1713072"
Me.lblKdAuftragNr.Top = 0.6598426!
Me.lblKdAuftragNr.Width = 1.474409!
Me.Label11.Height = 0.472441!
Me.Label11.HyperLink = Nothing
Me.Label11.Left = 6.078347!
Me.Label11.Name = "Label11"
Me.Label11.Style = "font-size: 8pt; font-weight: normal; text-align: right; ddo-char-set: 1"
Me.Label11.Text = "-"
Me.Label11.Top = 0.03149607!
Me.Label11.Width = 1.396851!
'
'rptSpeditionsberichtKdSpez
'
Me.MasterReport = False
Me.PageSettings.Margins.Bottom = 0.3937008!
Me.PageSettings.Margins.Left = 0.3937008!
Me.PageSettings.Margins.Right = 0.3937008!
@@ -1369,6 +1379,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
CType(Me.lblAuftrKdNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.lblFrachtfKdNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtKdOpt, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.lblKdAuftragNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Label28, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.ReportInfo2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.lblDat, System.ComponentModel.ISupportInitialize).EndInit()
@@ -1417,7 +1428,7 @@ Partial Public Class rptSpeditionsberichtKdSpez
CType(Me.Label8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Label4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Label5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.lblKdAuftragNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.Label11, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
@@ -1489,9 +1500,6 @@ Partial Public Class rptSpeditionsberichtKdSpez
Private WithEvents Line6 As GrapeCity.ActiveReports.SectionReportModel.Line
Private WithEvents Line5 As GrapeCity.ActiveReports.SectionReportModel.Line
Private WithEvents Label10 As GrapeCity.ActiveReports.SectionReportModel.Label
Private WithEvents Label13 As GrapeCity.ActiveReports.SectionReportModel.Label
Private WithEvents Label17 As GrapeCity.ActiveReports.SectionReportModel.Label
Private WithEvents Label19 As GrapeCity.ActiveReports.SectionReportModel.Label
Private WithEvents Line8 As GrapeCity.ActiveReports.SectionReportModel.Line
Private WithEvents Line9 As GrapeCity.ActiveReports.SectionReportModel.Line
Public WithEvents ReportFooter1 As GrapeCity.ActiveReports.SectionReportModel.ReportFooter
@@ -1520,4 +1528,8 @@ Partial Public Class rptSpeditionsberichtKdSpez
Public WithEvents lblGesGesSumLKWsAnzahl As GrapeCity.ActiveReports.SectionReportModel.Label
Public WithEvents picVERAG As GrapeCity.ActiveReports.SectionReportModel.Picture
Public WithEvents lblKdAuftragNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents Label11 As GrapeCity.ActiveReports.SectionReportModel.Label
Public WithEvents Label13 As GrapeCity.ActiveReports.SectionReportModel.Label
Public WithEvents Label17 As GrapeCity.ActiveReports.SectionReportModel.Label
Public WithEvents Label19 As GrapeCity.ActiveReports.SectionReportModel.Label
End Class

627
SDL/Speditionsbuch/Nacherfassung/rptSpeditionsberichtKdSpez.resx
View File

File diff suppressed because one or more lines are too long

126
SDL/Speditionsbuch/usrCntlSpeditionsBuchSuche.Designer.vb generated
View File

@@ -23,12 +23,12 @@ Partial Class usrCntlSpeditionsBuchSuche
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim DataGridViewCellStyle7 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle5 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle6 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrCntlSpeditionsBuchSuche))
Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.cntxtCntxtSpeditionsbuch = New System.Windows.Forms.ContextMenuStrip(Me.components)
@@ -202,6 +202,7 @@ Partial Class usrCntlSpeditionsBuchSuche
Me.Label45 = New System.Windows.Forms.Label()
Me.cboFilialeHandling = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.SplitContainer = New System.Windows.Forms.SplitContainer()
Me.cbxRptDetailsZahlungsdetails = New System.Windows.Forms.CheckBox()
Me.cntxtCntxtSpeditionsbuch.SuspendLayout()
Me.pnlRechts.SuspendLayout()
CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -667,35 +668,35 @@ Partial Class usrCntlSpeditionsBuchSuche
Me.DataGridView.AllowUserToDeleteRows = False
Me.DataGridView.AllowUserToOrderColumns = True
Me.DataGridView.AllowUserToResizeRows = False
DataGridViewCellStyle7.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle7.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle7.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle7.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridView.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle7
DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridView.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1
Me.DataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.DataGridView.ContextMenuStrip = Me.cntxtCntxtSpeditionsbuch
DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle8.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle8.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle8.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle8.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.DataGridView.DefaultCellStyle = DataGridViewCellStyle8
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.DataGridView.DefaultCellStyle = DataGridViewCellStyle2
Me.DataGridView.Dock = System.Windows.Forms.DockStyle.Fill
Me.DataGridView.Location = New System.Drawing.Point(450, 0)
Me.DataGridView.Name = "DataGridView"
DataGridViewCellStyle9.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle9.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle9.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle9.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle9.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridView.RowHeadersDefaultCellStyle = DataGridViewCellStyle9
DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridView.RowHeadersDefaultCellStyle = DataGridViewCellStyle3
Me.DataGridView.Size = New System.Drawing.Size(770, 200)
Me.DataGridView.TabIndex = 0
'
@@ -722,35 +723,35 @@ Partial Class usrCntlSpeditionsBuchSuche
Me.dgvLKW.AllowUserToOrderColumns = True
Me.dgvLKW.AllowUserToResizeRows = False
Me.dgvLKW.BackgroundColor = System.Drawing.Color.WhiteSmoke
DataGridViewCellStyle1.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle1.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle1.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle1.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle1.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle1.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvLKW.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle1
DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle4.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle4.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvLKW.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle4
Me.dgvLKW.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvLKW.ContextMenuStrip = Me.cntxtCntxtSpeditionsbuch
DataGridViewCellStyle2.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle2.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle2.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle2.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvLKW.DefaultCellStyle = DataGridViewCellStyle2
DataGridViewCellStyle5.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle5.BackColor = System.Drawing.SystemColors.Window
DataGridViewCellStyle5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle5.ForeColor = System.Drawing.SystemColors.ControlText
DataGridViewCellStyle5.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle5.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvLKW.DefaultCellStyle = DataGridViewCellStyle5
Me.dgvLKW.Dock = System.Windows.Forms.DockStyle.Left
Me.dgvLKW.Location = New System.Drawing.Point(0, 0)
Me.dgvLKW.Name = "dgvLKW"
DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle3.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle3.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvLKW.RowHeadersDefaultCellStyle = DataGridViewCellStyle3
DataGridViewCellStyle6.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
DataGridViewCellStyle6.BackColor = System.Drawing.SystemColors.Control
DataGridViewCellStyle6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
DataGridViewCellStyle6.ForeColor = System.Drawing.SystemColors.WindowText
DataGridViewCellStyle6.SelectionBackColor = System.Drawing.SystemColors.Highlight
DataGridViewCellStyle6.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[True]
Me.dgvLKW.RowHeadersDefaultCellStyle = DataGridViewCellStyle6
Me.dgvLKW.Size = New System.Drawing.Size(450, 200)
Me.dgvLKW.TabIndex = 35
Me.dgvLKW.Visible = False
@@ -923,7 +924,7 @@ Partial Class usrCntlSpeditionsBuchSuche
Me.MenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.KundenauswertungenToolStripMenuItem1})
Me.MenuStrip1.Location = New System.Drawing.Point(715, 158)
Me.MenuStrip1.Name = "MenuStrip1"
Me.MenuStrip1.Size = New System.Drawing.Size(283, 27)
Me.MenuStrip1.Size = New System.Drawing.Size(163, 27)
Me.MenuStrip1.TabIndex = 89
Me.MenuStrip1.Text = "Kundenauswertungen"
'
@@ -941,7 +942,7 @@ Partial Class usrCntlSpeditionsBuchSuche
'
Me.ZFFriedrichshafenAGZeitraumAuswählenToolStripMenuItem.Image = CType(resources.GetObject("ZFFriedrichshafenAGZeitraumAuswählenToolStripMenuItem.Image"), System.Drawing.Image)
Me.ZFFriedrichshafenAGZeitraumAuswählenToolStripMenuItem.Name = "ZFFriedrichshafenAGZeitraumAuswählenToolStripMenuItem"
Me.ZFFriedrichshafenAGZeitraumAuswählenToolStripMenuItem.Size = New System.Drawing.Size(316, 30)
Me.ZFFriedrichshafenAGZeitraumAuswählenToolStripMenuItem.Size = New System.Drawing.Size(308, 24)
Me.ZFFriedrichshafenAGZeitraumAuswählenToolStripMenuItem.Text = "ZF Passau (Zeitraum auswählen)"
Me.ZFFriedrichshafenAGZeitraumAuswählenToolStripMenuItem.Visible = False
'
@@ -949,14 +950,14 @@ Partial Class usrCntlSpeditionsBuchSuche
'
Me.ZFSteyrZeitraumAuswählenToolStripMenuItem.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.ZFSteyrZeitraumAuswählenToolStripMenuItem.Name = "ZFSteyrZeitraumAuswählenToolStripMenuItem"
Me.ZFSteyrZeitraumAuswählenToolStripMenuItem.Size = New System.Drawing.Size(316, 30)
Me.ZFSteyrZeitraumAuswählenToolStripMenuItem.Size = New System.Drawing.Size(308, 24)
Me.ZFSteyrZeitraumAuswählenToolStripMenuItem.Text = "ZF Steyr (Zeitraum auswählen)"
'
'ZFThyrnauZeitraumAuswählenToolStripMenuItem
'
Me.ZFThyrnauZeitraumAuswählenToolStripMenuItem.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.ZFThyrnauZeitraumAuswählenToolStripMenuItem.Name = "ZFThyrnauZeitraumAuswählenToolStripMenuItem"
Me.ZFThyrnauZeitraumAuswählenToolStripMenuItem.Size = New System.Drawing.Size(316, 30)
Me.ZFThyrnauZeitraumAuswählenToolStripMenuItem.Size = New System.Drawing.Size(308, 24)
Me.ZFThyrnauZeitraumAuswählenToolStripMenuItem.Text = "ZF Thyrnau (Zeitraum auswählen)"
Me.ZFThyrnauZeitraumAuswählenToolStripMenuItem.Visible = False
'
@@ -964,7 +965,7 @@ Partial Class usrCntlSpeditionsBuchSuche
'
Me.FlenderBocholtZeitraumAuswählenToolStripMenuItem.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.FlenderBocholtZeitraumAuswählenToolStripMenuItem.Name = "FlenderBocholtZeitraumAuswählenToolStripMenuItem"
Me.FlenderBocholtZeitraumAuswählenToolStripMenuItem.Size = New System.Drawing.Size(316, 30)
Me.FlenderBocholtZeitraumAuswählenToolStripMenuItem.Size = New System.Drawing.Size(308, 24)
Me.FlenderBocholtZeitraumAuswählenToolStripMenuItem.Text = "Flender Bocholt (Zeitraum auswählen)"
Me.FlenderBocholtZeitraumAuswählenToolStripMenuItem.Visible = False
'
@@ -1260,6 +1261,7 @@ Partial Class usrCntlSpeditionsBuchSuche
'Panel1
'
Me.Panel1.BackColor = System.Drawing.Color.WhiteSmoke
Me.Panel1.Controls.Add(Me.cbxRptDetailsZahlungsdetails)
Me.Panel1.Controls.Add(Me.cboDetailberichtKdAtrNr)
Me.Panel1.Controls.Add(Me.Label38)
Me.Panel1.Controls.Add(Me.Label44)
@@ -2821,6 +2823,17 @@ Partial Class usrCntlSpeditionsBuchSuche
Me.SplitContainer.SplitterWidth = 2
Me.SplitContainer.TabIndex = 3
'
'cbxRptDetailsZahlungsdetails
'
Me.cbxRptDetailsZahlungsdetails.AutoSize = True
Me.cbxRptDetailsZahlungsdetails.BackColor = System.Drawing.Color.WhiteSmoke
Me.cbxRptDetailsZahlungsdetails.Location = New System.Drawing.Point(5, 79)
Me.cbxRptDetailsZahlungsdetails.Name = "cbxRptDetailsZahlungsdetails"
Me.cbxRptDetailsZahlungsdetails.Size = New System.Drawing.Size(100, 17)
Me.cbxRptDetailsZahlungsdetails.TabIndex = 58
Me.cbxRptDetailsZahlungsdetails.Text = "Zahlungsdetails"
Me.cbxRptDetailsZahlungsdetails.UseVisualStyleBackColor = False
'
'usrCntlSpeditionsBuchSuche
'
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None
@@ -3037,4 +3050,5 @@ Partial Class usrCntlSpeditionsBuchSuche
Friend WithEvents MyComboBox2 As VERAG_PROG_ALLGEMEIN.MyComboBox
Friend WithEvents SendungsdetailsÖffnenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents ZFSteyrZeitraumAuswählenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents cbxRptDetailsZahlungsdetails As CheckBox
End Class

67
SDL/Speditionsbuch/usrCntlSpeditionsBuchSuche.resx
View File

@@ -174,39 +174,40 @@
XTesb3QPLh88M+QwdP6m681Lt7xuXbu94vbgcOjwnZHokdE77DtTd1PuvriXeW/h/sYH6AdFD6UeVjxS
fNTws+7PbaOWo6fHXMf6Hwc/vj/OGn/2S8Yv7ycKnpCfVEyqTDZPmU2dmnafvvF05dOJZ+nPFmYKf5X+
tfa5zvMffnP8rX82YnbiBf/Fp99LXsq/PPRq2aueuYC5R69TXy/MF72Rf3P4LeNt37vwd5MLWe+x7ys/
6H7o/ujz8cGn1E+f/gUDmPP8usTo0wAAAAlwSFlzAAALDAAACwwBP0AiyAAAB3VJREFUSEu9VntQ1NUe
/86Uo8VVROUlsrsoBGlyNeURECuwPCXSBG0GAXktr2WX5S0GCob4GEF8XdIGAcP0innTMMsxrczb4A3r
ZjpxJ3F0uk5aaioomn7u95zdhQWb+u+eme/8zp45nA/f1+f7oSVNxaRtXUWZLasopiGHslqrKf+dWkrZ
UUGR67W0Yn8jVb+3jVJ3rCBNXRpV7GsYW9BaOz1mnTZVXZNclrK93IaN5lTGk0NeECkLNKQwhpHSyN+C
MGn2uYHkVRZLWz5uJwmY1VbNQDUU16ijwr3racWBTZTX+ibF1ueOKWxfNzvz7aqF4WvT13gvX3DAv+r1
nhdKYu+r8sMwIcMPNsmzaILWj1wMIeRWGPHngGm7Kkm/p46y21Y7RmzURiRsLyyNqc9pClideNqrPPaG
R3EUJuvUsM8JlGab4YtJWn84ZQfB3RB5zTkvmGwy55Bdtr/JsvxpfLaf3I/P8pP2dMpMciuKoD2nO4kC
65Iq59Ys6Zn+xquPlcXhcDQEY2JeICbmBsBJr4aTLhhT9CFQGMLgqg+Fa34oFLp5mJwTDI+CKMxcseDc
tOLILo/i6C6PEjbrr9nci6K6phZFdHHUDORQEHyIDU5GfpQBlUXhULEpC8OhMGrAoYGSwQSgggEV+XxP
FwLbtLnwMEbht0ePYFkDDx+gf+C++dfQunOvD7tPHQIleh0ht7LIZrfSSKiElURCWRwxCCjBhBVYA5o8
HJ/uA09jNH746Qqu3rqO3mtX8PjxYwlwkc9+vHkNl67/iJt9v8qzkxe6MCrVu5kBo5pVpQzCYKoS/o4E
ZDALoAipCTAESl0oXHLVeDZ9Dp7NmAOKtsXWY3vQ0fURKHIsnkl/EbTACeraFAl49JvP+Wy2AIxkQIuH
JsDJBs4Rm4pBVQxqm+mD0ctmwYU9U+oZnAGFTcmbh0m5gdJo4WS89ck+HPzqOOhVR9PZkmng1pKAH1oD
WkKqZMBppdFcNAH4i9aHcxgGey6gGWWvYP6GbHiWzIdzbrAMqV26L57jHH518Ttc+O9F+f35zk3c6r/D
+3M4d+U/6O49jx841GIdPntCeG0KqQXQgSvUvTxGPnDywhnQUi+46Ofh9r278jG7DB84cGsI70SVKrkX
FzTo8NpmAwKqEvDB2ZM41dONgMp4LGzUI2j1UpTtq5eAR77+zOKhyKEJ0JWrlJZ64pvL38tLEzksSU3l
cq/fXQdapBwMqZteI0FF+CjOATSLsObQDrR8/g/QTDKd+RG4LeTfH/33KTNg6VAOhaej0rwRWJskL+36
7CC+vdKDu/f7MCr5BTjkBsmicWVAwTLuBZEyNye4Ag+zd5d/uYqffv0Zh7o/wfHvvkQne/Wv3nPyLeH9
8BxaVSkleuDYt6flRbGym1eC4lVQFWgGq9RBG4iphnBs+KAZmz5qw8qOzTh76QK+v9qLqv2NaDjahpqD
27H3yw/lG51ff2rJ4fA+dOeiofgpWLzVKC/efzjAVeqLcVrfYW0xVR8O55yXQZpnQGGjQdMIVQe2YOfJ
DpAbh1SczSDJVGKZQjqiaASgYBtKfE6GxLJ0rW/yP6FkD5l9zID2WQHsYQQ2dA552H3pPHt4CSutPfxn
p3yj86zwUOZwCJD3oOTnEbUxW15q+PgdZpLLnMN+jEn5qyRvC7VNzPSHu9Gcw/Ocw+4Tgzk8PJjDT3GG
W0QskcMxaeaisQC6FIZiNBfN9ds35CVarEL5301lbWxfB3rNdahK83+/SltFlXqbq9Sfq7RkZJVaqI0B
x+X4IWhNEn65cwttXzDZxtljxvI4SdCCmB2zAzCJQykAXWQfhpr6sPGP+nCjBBR9KD1UWeVQMI0oGmeD
GrZZvlAUajApJwA+lQlI2GxkxomDExeKALTjuTiMaXrNTNPHTMOtMMg0TORiibZ5okrFV4wnR32wiUuL
+DdzqQ0T8VPJM+UgVnHDC0AFk7fgUtssP/CQBb1ij78d34v3zhwDzZ8gzylegbC6NAkocm3O4RDTjJwW
w+chV6e5LUTjK/IEeYfAOV8NZx7UlKDEzhMdeJ8LhhZNkeeU6InYjTmDgE9Q2xPjiUMqAFmXjACch3E8
gL0KY3C7/y4e/PYQ/Q+GBq/YP+Szew8GzCfmebiM56FDgXr4xGdTFTGoFeDvDWDbNB858fsG7pmfZCCe
9qKFrNcjHspy4osiTPQ8QgFrhKZZbKVp1HI8CeIWoXLKH9I01hJDahoG9K5gTcOaReqYEVrGYlLTFEZ0
MYEYKHXXG5TfXsdSsUaqtvhtRlZt2U0vCdVWFnvDndnepNqCeDQFYbxUbS/JamXyNqm2jLms0ixKzWR2
rNYsv59O8aapFtW2uKmIhXC1NKFLje+uo4qOTZTbsprm1+eMMbavnZ2xs3KhZlCXLumZMUyXzmZd6m/W
peGsQ4Ue1bA+tWhTDevSIHreoksFoFDdGS0rpfLW8l63u5aS31pOEeszqWJ/A606sIWWsRIXynv53vqx
+pba6dFrM1PV1UllydvKbJK3ltKLlYvIQffynwNyXv+PBvofzgNyIxLbwtkAAAAASUVORK5CYII=
6H7o/ujz8cGn1E+f/gUDmPP8usTo0wAAAAlwSFlzAAALDAAACwwBP0AiyAAAB4JJREFUSEu9lntM1FcW
x0+yNWpdBURGEJ0ZXtVqZX0hFJAB5gVILVbQTRCQ1wwDw7wYGMSCgiI+IoivtbpBwOLqqnUXq30YlVrX
bXAFu6Ua2ShG0jVoq1ZFwQffzb3zhG22/+0vOZnf3Nz8Pjn3nPs9X1qx10yqpnWU27iOEuo0pG6qpMKP
qyljXxkpt6hozdF6qvxkN2XuW0OymiwqO1I33tBUPTNhsypTUpVuydhTOi5jTynNL08mQUEkiQwyEhql
JDLKSGiQ8vDKj6AZlkTa+WULEQOqmytJ3VRFS+q1ZDq8hdYc304FTRsosTZ/jKll89zcP1YslW/K3hi8
Oul4WMXvu98pThwQF0oxMScU49Ln0ERVKPnqY8jPpPh1YNaBctIdqqG85vWTFdtUipQ9ppKEWs3e8PWp
l2aUJj4IMsdhilYCL00ED7echZikCoN3XiQC9cp7PgVRNC53PnnkhVlDHUbueaH83V0dyuONjNnkV6Sg
Q5dOEUXUpJUvqFrRPfPD94dEZjkm66PgWRABz/xweOsk8NZGYaouBkK9FNN0sZhWGAuhNhpTNFEIMsRh
9pqkrgCzsj3IHN8eVBw//NcWgUVx7f5FivaCpg16EhiiWgWGKHgbYyA0yyEqkkNcJIfIJIfQKIOIhV7K
gUJdLISFMRBqY+CWtQBBxji8ev0a9mfw5Qs8Gxxw/Lc/T5734+DFVlDqjNPkZ1E2+JUoIWZRrITIrHAA
OYyFwRVozdA9OwTTjfG42deLu4/uo+deL4aGhjjgVl8vfnh4D7fv/4CH/T/ztbbr7RiVGdxAfpa4BnGJ
gsPExQqIRwINUgeQHakVGAORNha++RK8mT0fb+bMB8W7YdeZQzjW/gVIOR5js+eBkrwhqc7gwM+//Rpj
s+cyoLKBZ8cztAKn6KN5iE1yiI0yuOWGYPSqOfDVRkOkk3Igi6kF0ZiUH8GDlk7BR+eO4MSVs6D3J1vX
VgRAuUXFgZ+5Au1HKipWIKAkHp4F4fitKgRCoxReBRGYZXkPi7fmYXrxYvjkR/Ej9cheiLeMcbhy63tc
//ct/vvjk4d49OwJrtzqQlfvv9DRcw037/Vy4MnO8yxr65HagQJ9FAJLE/gH2q5fBq2cAV9dNB4/f8o/
5pETAoEmgmfHulRUKEVSnRYf7NAjvCIFn3a24WJ3B8LLk7G0XofI9SthOVLLgaevXrBnyGpoBU4zy0Er
p+PbOzf4Js/8CKTtLeXvuoM1oGUix5H66WQcyo6PlghAcwgbW/eh8eu/gGaTdS2UEGSOt9bwnxdtwBJn
DVmmo7KCEVGdxjcduHAC3/V24+lAP0alvwNBfiRvmmnaGK4ygQYlr8356+042dmGOz/dRd/PP6K14xzO
fv8NTl29gH/0dPFvseyH19ClSyk1CGe+u8Q3sievYS0oWQyxQeboUoEqAv56ObZ+2oDtXzRj7bEd6Lx9
HTfu9qDiaD3qPm9G1Yk9OPzNZ/wbp65+Za/h8HsYWBIPSp6K5buMfOPAy0G45S7EBNXCYdfCXyeHj2YR
SDYWJB0NCiBUHN+J/W3HQH5kXZtFXKmcRzqiaRiQqQ2lvsWPxP5omzaAkkUQG+QOoJc6HP56BbaecmbY
cfsabty9jbWuGf79lDXDTpYhr6ET6FcSB0p/G3Hb8vimui8/xs2+O3g68AxjMn7HxdsubZ65YQg02mp4
rR0nO847anjSUcOvcPmWs4ZjsmxNYwf6mmIxOisY9x8/4JtouRilf7a2tbFlM+iDac4uLfzlLm1iXRps
69IwQlDxyC61S1uJEhM0oYjcmIafnjxC899aQUu8MGv1Ei7QTJgn54VjkjqcA335PYy13sP6/3UPt3Eg
u4c8Q7FLDZnSsKbx0Uvgpl4IoUmGSZpwhJSnIGWHEbMsS+CtWcSBHjkjlKbHpjT9T3Clx0Vp+uxKw67F
iC5lv2w8TdZFWbW0SMkFfFz2PPwmfTYfxGKdzKalsVxL3dShcFeHgt7zwh/OHsYnl8+AFk/k65QshLQm
iwNZrW01dCrNyGkxfB7GOsYTu/jCAibeMfAplMBHJwGliLD//DH8teMcaNlUvk6p05G4TeMA/pe0jQSK
TFagkI8nV2A0JmQtwAxTAh4/e4oXr17i2Qvn4GXvL1+9xPMXg441Pg9XBTeQwCAZPvHNbOIr+GiyA39p
ALtlhfCJ3z/43AkaHOBXyPV5PTRknfisCVOnn6bwjczTLHfxNBI+nphws6PyLnR6GleLwT2NMQ7BZUld
AUVxVh8zwssM8zQmRbuWeZrMAx9SYUsNqZuruGtL3m0sSajN2/suc22WxAeB5niba4uEQBMJd+7a3uXd
GmiwubacBeThcGrW8FA7/7+REUz+dte2fG8RqZoqeTBfavzTZio7tp3yG9fT4lrNGGPLprk5+8uXyhy+
dEX3rGG+dC5NVIXZfKmchMyXGmQkMti9qYy88iPpbbsvZUDmunMa13LnrWpcR9qD1ZT+0WpSbMmlsqN1
tO74Tlq1r4w779WHa8frGqtnxm/KzZRUplnSd1vGpe8qoXnly0igXfTrQKZg/8/4D84DciO4yFz1AAAA
AElFTkSuQmCC
</value>
</data>
</root>

41
SDL/Speditionsbuch/usrCntlSpeditionsBuchSuche.vb
View File

@@ -1232,7 +1232,7 @@ Public Class usrCntlSpeditionsBuchSuche
sqlstr &= " SELECT FilialenNr, AbfertigungsNr,UnterNr, Speditionsbuch.Abfertigungsart as Abfertigungsart ,Abfertigungsdatum, BelegNr, Rohmasse, Vermerk, Packstücke, AbsenderKundenNr, Absender, EmpfängerKundenNr, Empfänger, VermittlerKundenNr, Vermittler, "
sqlstr &= " FrachtführerKundenNr, Frachtführer, AvisiererKundenNr, Avisierer,Währungscode,Barzahlungsbetrag,Rechnungsbetrag, [LKW Kennzeichen],"
sqlstr &= " Abfertigungsanzahl, Speditionsbuch.Abfertigungsart, Abfertigungsbezeichnung,AvisoID" & sql_KdAuftragsNr & ",Speditionsbuch.KdAuftragsNrAvisierer,Speditionsbuch.KdAuftragsNrEmpfaenger,Speditionsbuch.KdAuftragsNrFrachtfuehrer, Speditionsbuch.Bemerkungen "
sqlstr &= " Abfertigungsanzahl, Speditionsbuch.Abfertigungsart, Abfertigungsbezeichnung,AvisoID" & sql_KdAuftragsNr & ",Speditionsbuch.KdAuftragsNrAvisierer,Speditionsbuch.KdAuftragsNrEmpfaenger,Speditionsbuch.KdAuftragsNrFrachtfuehrer, Speditionsbuch.Bemerkungen,Speditionsbuch.Zollstelle ,Speditionsbuch.Grenzstelle "
sqlstr &= " FROM Speditionsbuch LEFT JOIN Abfertigungsarten ON Speditionsbuch.Abfertigungsart=Abfertigungsarten.Abfertigungsart "
sqlstr &= " LEFT JOIN Währungstabelle on Währungstabelle.Währungsschlüssel=speditionsbuch.Währungsschlüssel WHERE 1=1 "
sqlstr &= getSpedBuchWhere()
@@ -1276,7 +1276,27 @@ Public Class usrCntlSpeditionsBuchSuche
End If
End If
Dim Zahlungsdetails = cbxRptDetailsZahlungsdetails.Checked
rpt.lblBarTital.Visible = Zahlungsdetails
rpt.lblBarzahlungsbetrag.Visible = Zahlungsdetails
rpt.lblGesGesSumBarzahlungsbetrag.Visible = Zahlungsdetails
rpt.lblGesSumBarzahlungsbetrag.Visible = Zahlungsdetails
rpt.lblGesSumRechnungsbetrag.Visible = Zahlungsdetails
rpt.lblGesGesSumRechnungsbetrag.Visible = Zahlungsdetails
rpt.Label43.Visible = Zahlungsdetails
rpt.Label43.Visible = Zahlungsdetails
rpt.Label34.Visible = Zahlungsdetails
rpt.Label35.Visible = Zahlungsdetails
rpt.Label13.Visible = Zahlungsdetails
rpt.Label17.Visible = Zahlungsdetails
rpt.lblSumRechnungsbetrag.Visible = Zahlungsdetails
rpt.lblSumBarzahlungsbetrag.Visible = Zahlungsdetails
rpt.Label19.Visible = Zahlungsdetails
rpt.Label39.Visible = Zahlungsdetails
rpt.Label46.Visible = Zahlungsdetails
rpt.Label47.Visible = Zahlungsdetails
rpt.lblGesWaehrung.Visible = Zahlungsdetails
rpt.lblGesgesWaehrung.Visible = Zahlungsdetails
If CheckBox1.Checked Then
rpt.GroupHeader1.DataField = "FilialenNr" 'Gruppierung
@@ -1370,6 +1390,23 @@ Public Class usrCntlSpeditionsBuchSuche
End If
End If
If rpt.txtPackstücke.Text.Length > 550 Then
rpt.txtPackstücke.Text = rpt.txtPackstücke.Text.Substring(0, 550) & "..."
End If
rpt.Label11.Text = ""
If rpt.Fields.Item("Grenzstelle").Value IsNot Nothing Then
If rpt.Fields.Item("Grenzstelle").Value.Replace("???", "").Replace("WO_FREMD", "") = "" Then
rpt.Label11.Text = SQL.getValueTxtBySql("SELECT Code +' - ' + [Description] FROM tbl_DY_ZollDE_C0141_Zollstellen WHERE Code='" & If(rpt.Fields.Item("Zollstelle").Value, "") & "' AND ((StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()))", "FMZOLL")
Else
Dim GRZ As New VERAG_PROG_ALLGEMEIN.cGrenzstelle(rpt.Fields.Item("Grenzstelle").Value)
If GRZ IsNot Nothing AndAlso GRZ.hasEntry Then
rpt.Label11.Text = If(GRZ.grz_ZollamtDST, "") & " " & If(GRZ.grz_ZollamtBezeichnung, "") & vbNewLine & rpt.Fields.Item("Grenzstelle").Value
End If
End If
End If
rpt.lblAbsKdNr.Text = checkNull(rpt.Fields.Item("AbsenderKundenNr").Value)
rpt.lblAbs.Text = checkNull(rpt.Fields.Item("Absender").Value)
rpt.lblEmpfKdNr.Text = checkNull(rpt.Fields.Item("EmpfängerKundenNr").Value)