neu

2020-03-12 14:49:31 +01:00
parent f4c1a74870
commit cc28d5a6cf
197 changed files with 37402 additions and 4503 deletions
--- a/SDL/Speditionsbuch/Nacherfassung/frmNacherfassungNEU.Designer.vb
+++ b/SDL/Speditionsbuch/Nacherfassung/frmNacherfassungNEU.Designer.vb
--- a/SDL/Speditionsbuch/Nacherfassung/frmNacherfassungNEU.vb
+++ b/SDL/Speditionsbuch/Nacherfassung/frmNacherfassungNEU.vb
@@ -64,6 +64,7 @@ Public Class frmNacherfassungNEU
                    Case "ATILLA" : sbWhere = " AND Niederlassung = 'SUA' "
                    Case "IMEX" : sbWhere = " AND Mandant = 'IMEX' "
                    Case "UNISPED" : sbWhere = " AND Mandant = 'UNAT' "
+                    Case "FRONTOFFICE" : sbWhere = " AND Niederlassung <> 'SUA' "
                    Case Else
                        'If AVISO IsNot Nothing Then
                        '    Select Case AVISO.Grenzstelle
@@ -73,7 +74,7 @@ Public Class frmNacherfassungNEU
                        '        Case "WAI" : sbWhere = " AND Niederlassung IN ('WAI')"
                        '    End Select
                        'End If
-                        sbWhere = " AND Mandant <> 'IMEX' "
+                        sbWhere = " AND Mandant <> 'IMEX' AND Mandant <> 'UNAT'  AND Niederlassung <> 'SUA' "
                End Select
                'Else
                '    Select Case SPEDITIONSBUCH.FilialenNr
@@ -121,7 +122,7 @@ Public Class frmNacherfassungNEU
            allowChange = True


-            If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("FISKAL", "SDL") And (SPEDITIONSBUCH.FilialenNr = 4805 Or SPEDITIONSBUCH.FilialenNr = 4811) Then
+            If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("FISKAL", "SDL") And (SPEDITIONSBUCH.FilialenNr = 4805 Or SPEDITIONSBUCH.FilialenNr = 4811 Or SPEDITIONSBUCH.FilialenNr = 5501 Or SPEDITIONSBUCH.FilialenNr = 5601 Or SPEDITIONSBUCH.FilialenNr = 5801) Then
                pnlFiskal.Visible = True
            Else
                pnlFiskal.Visible = False
@@ -295,7 +296,10 @@ Public Class frmNacherfassungNEU

        cbxCMR.Checked = SPEDITIONSBUCH.SB_CMR
        txtCMRDatum.Text = If(SPEDITIONSBUCH.SB_CMRDatum, "")
+        txtCMRNr.Text = If(SPEDITIONSBUCH.SB_CMRNr, "")

+        cboFilialeHandling.changeItem(If(SPEDITIONSBUCH.FilialenNrHandling, ""))
+        txtHandlingZuKassieren._value = SPEDITIONSBUCH.HandlingZuKassieren

        lblLastMa.Text = SPEDITIONSBUCH.Sachbearbeiter
        If SPEDITIONSBUCH.AvisoID IsNot Nothing Then avisoLinkId = SPEDITIONSBUCH.AvisoID
@@ -558,6 +562,7 @@ Public Class frmNacherfassungNEU


        cboFiliale.fillWithSQL("SELECT FilialenNr, cast(FilialenNr as varchar(4)) + ' ' + Grenzstelle FROM Filialen WHERE Fil_Status='A' ORDER BY FilialenNr ", True, "FMZOLL", True)
+        cboFilialeHandling.fillWithSQL("SELECT FilialenNr, cast(FilialenNr as varchar(4)) + ' ' + Grenzstelle FROM Filialen WHERE Fil_Status='A' ORDER BY FilialenNr ", True, "FMZOLL", True)


        Dim where = ""
@@ -935,10 +940,17 @@ Public Class frmNacherfassungNEU
        SPEDITIONSBUCH.KdAuftragsNrFrachtfuehrer = txtKdAuftragsnummerFrachtfuehrer.Text 
        SPEDITIONSBUCH.AuftraggeberBetragKassiert = txtInkasso._value

+
+        SPEDITIONSBUCH.FilialenNrHandling = cProgramFunctions.isLeerNothing(cboFilialeHandling._value)
+        SPEDITIONSBUCH.HandlingZuKassieren = If(IsNumeric(txtHandlingZuKassieren._value), CDbl(txtHandlingZuKassieren._value), 0)
+
+
        SPEDITIONSBUCH.SB_CMRDatum = Nothing
        If pnlFiskal.Visible Then
            SPEDITIONSBUCH.SB_CMR = cbxCMR.Checked
            If txtCMRDatum.Text <> "" Then SPEDITIONSBUCH.SB_CMRDatum = txtCMRDatum.Text
+            SPEDITIONSBUCH.SB_CMRNr = txtCMRNr.Text
+
        End If
    End Sub

@@ -1474,5 +1486,8 @@ Public Class frmNacherfassungNEU
        '  End If
    End Sub

-
+    Private Sub cbxCMR_CheckedChanged(sender As Object, e As EventArgs) Handles cbxCMR.CheckedChanged
+        txtCMRNr.Enabled = cbxCMR.Checked
+        txtCMRDatum.Enabled = cbxCMR.Checked
+    End Sub
 End Class
--- a/SDL/Speditionsbuch/Nacherfassung/rptSpeditionsbericht_HandlingAussenstellen.Designer.vb
+++ b/SDL/Speditionsbuch/Nacherfassung/rptSpeditionsbericht_HandlingAussenstellen.Designer.vb
@@ -0,0 +1,621 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
+Partial Public Class rptSpeditionsbericht_HandlingAussenstellen
+    Inherits GrapeCity.ActiveReports.SectionReport
+
+    'Form overrides dispose to clean up the component list.
+    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
+        If disposing Then
+        End If
+        MyBase.Dispose(disposing)
+    End Sub
+
+    'NOTE: The following procedure is required by the ActiveReports Designer
+    'It can be modified using the ActiveReports Designer.
+    'Do not modify it using the code editor.
+    Private WithEvents PageHeader As GrapeCity.ActiveReports.SectionReportModel.PageHeader
+    Private WithEvents PageFooter As GrapeCity.ActiveReports.SectionReportModel.PageFooter
+    <System.Diagnostics.DebuggerStepThrough()>
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(rptSpeditionsbericht_HandlingAussenstellen))
+        Me.PageHeader = New GrapeCity.ActiveReports.SectionReportModel.PageHeader()
+        Me.Label7 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Line4 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        Me.Label6 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label8 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label4 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label5 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Line12 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        Me.Label1 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Label2 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
+        Me.lblPosNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblAbfertigungsart = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblAbfDatum = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblAnzahl = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblEndEmpf = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblEndEmpfKdNr = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Line11 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        Me.lblHandlingsgebuehr = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblzuKassierenHandling = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblBarzahlungsbetrag = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter()
+        Me.Label28 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Line2 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        Me.ReportInfo2 = New GrapeCity.ActiveReports.SectionReportModel.ReportInfo()
+        Me.lblDat = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.ReportHeader1 = New GrapeCity.ActiveReports.SectionReportModel.ReportHeader()
+        Me.picVERAG = New GrapeCity.ActiveReports.SectionReportModel.Picture()
+        Me.Label3 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblUeberschrift = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblSachbearbeiter = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter()
+        Me.Label10 = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblGesGesSumAnzahl = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.Line8 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        Me.Line9 = New GrapeCity.ActiveReports.SectionReportModel.Line()
+        Me.lblSumHandlingsgebuehr = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblSumzuKassierenHandling = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        Me.lblSumBarzahlungsbetrag = New GrapeCity.ActiveReports.SectionReportModel.Label()
+        CType(Me.Label7, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label6, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label8, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label4, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label5, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label1, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label2, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblPosNr, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblAbfertigungsart, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblAbfDatum, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblAnzahl, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblEndEmpf, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblEndEmpfKdNr, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblHandlingsgebuehr, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblzuKassierenHandling, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblBarzahlungsbetrag, 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()
+        CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label3, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblUeberschrift, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.Label10, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblGesGesSumAnzahl, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblSumHandlingsgebuehr, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblSumzuKassierenHandling, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me.lblSumBarzahlungsbetrag, System.ComponentModel.ISupportInitialize).BeginInit()
+        CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
+        '
+        'PageHeader
+        '
+        Me.PageHeader.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label7, Me.Line4, Me.Label6, Me.Label8, Me.Label4, Me.Label5, Me.Line12, Me.Label1, Me.Label2})
+        Me.PageHeader.Height = 0.2536527!
+        Me.PageHeader.Name = "PageHeader"
+        '
+        'Label7
+        '
+        Me.Label7.Height = 0.1744094!
+        Me.Label7.HyperLink = Nothing
+        Me.Label7.Left = 1.556693!
+        Me.Label7.Name = "Label7"
+        Me.Label7.Style = "background-color: #003680; color: White; font-size: 8pt; font-weight: bold; text-" &
+    "align: left; vertical-align: middle; ddo-char-set: 1"
+        Me.Label7.Text = "Anz."
+        Me.Label7.Top = 0.03622048!
+        Me.Label7.Width = 0.3149606!
+        '
+        'Line4
+        '
+        Me.Line4.Height = 0!
+        Me.Line4.Left = 0!
+        Me.Line4.LineWeight = 1.0!
+        Me.Line4.Name = "Line4"
+        Me.Line4.Top = 0.2106299!
+        Me.Line4.Width = 7.475195!
+        Me.Line4.X1 = 0!
+        Me.Line4.X2 = 7.475195!
+        Me.Line4.Y1 = 0.2106299!
+        Me.Line4.Y2 = 0.2106299!
+        '
+        'Label6
+        '
+        Me.Label6.Height = 0.1744094!
+        Me.Label6.HyperLink = Nothing
+        Me.Label6.Left = 5.608268!
+        Me.Label6.Name = "Label6"
+        Me.Label6.Style = "background-color: #003680; color: White; font-size: 7pt; font-weight: bold; text-" &
+    "align: right; vertical-align: middle; ddo-char-set: 1"
+        Me.Label6.Text = "Handling"
+        Me.Label6.Top = 0.03622048!
+        Me.Label6.Width = 0.6208658!
+        '
+        'Label8
+        '
+        Me.Label8.Height = 0.1744094!
+        Me.Label8.HyperLink = Nothing
+        Me.Label8.Left = 3.158662!
+        Me.Label8.Name = "Label8"
+        Me.Label8.Style = "background-color: #003680; color: White; font-size: 8pt; font-weight: bold; text-" &
+    "align: left; text-justify: auto; vertical-align: middle; ddo-char-set: 1"
+        Me.Label8.Text = "Empf<EFBFBD>nger"
+        Me.Label8.Top = 0.03622048!
+        Me.Label8.Width = 2.433859!
+        '
+        'Label4
+        '
+        Me.Label4.Height = 0.1744093!
+        Me.Label4.HyperLink = Nothing
+        Me.Label4.Left = 1.829921!
+        Me.Label4.Name = "Label4"
+        Me.Label4.Style = "background-color: #003680; color: White; font-size: 8pt; font-weight: bold; text-" &
+    "align: left; text-justify: auto; vertical-align: middle; ddo-char-set: 1"
+        Me.Label4.Text = "Abfertigungsart"
+        Me.Label4.Top = 0.03622048!
+        Me.Label4.Width = 1.328741!
+        '
+        'Label5
+        '
+        Me.Label5.Height = 0.1744094!
+        Me.Label5.HyperLink = Nothing
+        Me.Label5.Left = 0.01023625!
+        Me.Label5.Name = "Label5"
+        Me.Label5.Style = "background-color: #003680; color: White; font-size: 8pt; font-weight: bold; text-" &
+    "align: left; vertical-align: middle; ddo-char-set: 1"
+        Me.Label5.Text = "Abfertigung"
+        Me.Label5.Top = 0.03622048!
+        Me.Label5.Width = 1.546457!
+        '
+        'Line12
+        '
+        Me.Line12.Height = 0.2035433!
+        Me.Line12.Left = 5.592486!
+        Me.Line12.LineWeight = 2.0!
+        Me.Line12.Name = "Line12"
+        Me.Line12.Top = 0.03622048!
+        Me.Line12.Width = 0.00003433228!
+        Me.Line12.X1 = 5.59252!
+        Me.Line12.X2 = 5.592486!
+        Me.Line12.Y1 = 0.03622048!
+        Me.Line12.Y2 = 0.2397638!
+        '
+        'Label1
+        '
+        Me.Label1.Height = 0.1744094!
+        Me.Label1.HyperLink = Nothing
+        Me.Label1.Left = 6.229134!
+        Me.Label1.Name = "Label1"
+        Me.Label1.Style = "background-color: #003680; color: White; font-size: 7pt; font-weight: bold; text-" &
+    "align: right; vertical-align: middle; ddo-char-set: 1"
+        Me.Label1.Text = "zu kassieren"
+        Me.Label1.Top = 0.03622048!
+        Me.Label1.Width = 0.6208658!
+        '
+        'Label2
+        '
+        Me.Label2.Height = 0.1744094!
+        Me.Label2.HyperLink = Nothing
+        Me.Label2.Left = 6.854331!
+        Me.Label2.Name = "Label2"
+        Me.Label2.Style = "background-color: #003680; color: White; font-size: 7pt; font-weight: bold; text-" &
+    "align: right; vertical-align: middle; ddo-char-set: 1"
+        Me.Label2.Text = "(kassiert)"
+        Me.Label2.Top = 0.03622048!
+        Me.Label2.Width = 0.6208658!
+        '
+        'Detail
+        '
+        Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.lblPosNr, Me.lblAbfertigungsart, Me.lblAbfDatum, Me.lblAnzahl, Me.lblEndEmpf, Me.lblEndEmpfKdNr, Me.Line11, Me.lblHandlingsgebuehr, Me.lblzuKassierenHandling, Me.lblBarzahlungsbetrag})
+        Me.Detail.Height = 0.1905512!
+        Me.Detail.KeepTogether = True
+        Me.Detail.Name = "Detail"
+        '
+        'lblPosNr
+        '
+        Me.lblPosNr.Height = 0.1574803!
+        Me.lblPosNr.HyperLink = Nothing
+        Me.lblPosNr.Left = 0.01811025!
+        Me.lblPosNr.Name = "lblPosNr"
+        Me.lblPosNr.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
+        Me.lblPosNr.Text = "4801 17000000 0"
+        Me.lblPosNr.Top = 0.03149607!
+        Me.lblPosNr.Width = 0.9326772!
+        '
+        'lblAbfertigungsart
+        '
+        Me.lblAbfertigungsart.Height = 0.1574803!
+        Me.lblAbfertigungsart.HyperLink = Nothing
+        Me.lblAbfertigungsart.Left = 1.829921!
+        Me.lblAbfertigungsart.Name = "lblAbfertigungsart"
+        Me.lblAbfertigungsart.Style = "font-size: 8pt; font-weight: normal; text-align: left; ddo-char-set: 1"
+        Me.lblAbfertigungsart.Text = "eigene ATLAS / Handling"
+        Me.lblAbfertigungsart.Top = 0.03149606!
+        Me.lblAbfertigungsart.Width = 1.32874!
+        '
+        'lblAbfDatum
+        '
+        Me.lblAbfDatum.Height = 0.1574803!
+        Me.lblAbfDatum.HyperLink = Nothing
+        Me.lblAbfDatum.Left = 0.9507875!
+        Me.lblAbfDatum.Name = "lblAbfDatum"
+        Me.lblAbfDatum.Style = "font-size: 8pt; font-weight: normal; text-align: left; ddo-char-set: 1"
+        Me.lblAbfDatum.Text = "01.01.2017"
+        Me.lblAbfDatum.Top = 0.03307087!
+        Me.lblAbfDatum.Width = 0.6059055!
+        '
+        'lblAnzahl
+        '
+        Me.lblAnzahl.Height = 0.1574803!
+        Me.lblAnzahl.HyperLink = Nothing
+        Me.lblAnzahl.Left = 1.556693!
+        Me.lblAnzahl.Name = "lblAnzahl"
+        Me.lblAnzahl.Style = "font-size: 8pt; font-weight: normal; text-align: left; ddo-char-set: 1"
+        Me.lblAnzahl.Text = "1"
+        Me.lblAnzahl.Top = 0.03149607!
+        Me.lblAnzahl.Width = 0.2732283!
+        '
+        'lblEndEmpf
+        '
+        Me.lblEndEmpf.Height = 0.1574804!
+        Me.lblEndEmpf.HyperLink = Nothing
+        Me.lblEndEmpf.Left = 3.572049!
+        Me.lblEndEmpf.MultiLine = False
+        Me.lblEndEmpf.Name = "lblEndEmpf"
+        Me.lblEndEmpf.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
+        Me.lblEndEmpf.Style = "font-size: 8pt; font-weight: normal; text-align: left; text-justify: auto; ddo-ch" &
+    "ar-set: 1"
+        Me.lblEndEmpf.Text = "VERAG"
+        Me.lblEndEmpf.Top = 0.03149619!
+        Me.lblEndEmpf.Width = 2.020472!
+        '
+        'lblEndEmpfKdNr
+        '
+        Me.lblEndEmpfKdNr.Height = 0.1574804!
+        Me.lblEndEmpfKdNr.HyperLink = Nothing
+        Me.lblEndEmpfKdNr.Left = 3.158662!
+        Me.lblEndEmpfKdNr.Name = "lblEndEmpfKdNr"
+        Me.lblEndEmpfKdNr.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
+        Me.lblEndEmpfKdNr.Style = "font-size: 8pt; font-weight: normal; text-align: left; text-justify: auto; ddo-ch" &
+    "ar-set: 1"
+        Me.lblEndEmpfKdNr.Text = "100000 VERAG"
+        Me.lblEndEmpfKdNr.Top = 0.03149607!
+        Me.lblEndEmpfKdNr.Width = 0.4133847!
+        '
+        'Line11
+        '
+        Me.Line11.Height = 0.1905512!
+        Me.Line11.Left = 5.59252!
+        Me.Line11.LineWeight = 2.0!
+        Me.Line11.Name = "Line11"
+        Me.Line11.Top = 0!
+        Me.Line11.Width = 0!
+        Me.Line11.X1 = 5.59252!
+        Me.Line11.X2 = 5.59252!
+        Me.Line11.Y1 = 0!
+        Me.Line11.Y2 = 0.1905512!
+        '
+        'lblHandlingsgebuehr
+        '
+        Me.lblHandlingsgebuehr.Height = 0.1574803!
+        Me.lblHandlingsgebuehr.HyperLink = Nothing
+        Me.lblHandlingsgebuehr.Left = 5.608268!
+        Me.lblHandlingsgebuehr.Name = "lblHandlingsgebuehr"
+        Me.lblHandlingsgebuehr.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
+        Me.lblHandlingsgebuehr.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" &
+    "har-set: 1"
+        Me.lblHandlingsgebuehr.Text = "1.000,00"
+        Me.lblHandlingsgebuehr.Top = 0.03149607!
+        Me.lblHandlingsgebuehr.Width = 0.6208656!
+        '
+        'lblzuKassierenHandling
+        '
+        Me.lblzuKassierenHandling.Height = 0.1574803!
+        Me.lblzuKassierenHandling.HyperLink = Nothing
+        Me.lblzuKassierenHandling.Left = 6.229134!
+        Me.lblzuKassierenHandling.Name = "lblzuKassierenHandling"
+        Me.lblzuKassierenHandling.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
+        Me.lblzuKassierenHandling.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" &
+    "har-set: 1"
+        Me.lblzuKassierenHandling.Text = "1.000,00"
+        Me.lblzuKassierenHandling.Top = 0.03149607!
+        Me.lblzuKassierenHandling.Width = 0.6208655!
+        '
+        'lblBarzahlungsbetrag
+        '
+        Me.lblBarzahlungsbetrag.Height = 0.1574803!
+        Me.lblBarzahlungsbetrag.HyperLink = Nothing
+        Me.lblBarzahlungsbetrag.Left = 6.854331!
+        Me.lblBarzahlungsbetrag.Name = "lblBarzahlungsbetrag"
+        Me.lblBarzahlungsbetrag.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
+        Me.lblBarzahlungsbetrag.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" &
+    "har-set: 1"
+        Me.lblBarzahlungsbetrag.Text = "1.000,00"
+        Me.lblBarzahlungsbetrag.Top = 0.03149607!
+        Me.lblBarzahlungsbetrag.Width = 0.6208655!
+        '
+        'PageFooter
+        '
+        Me.PageFooter.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label28, Me.Line2, Me.ReportInfo2, Me.lblDat})
+        Me.PageFooter.Name = "PageFooter"
+        '
+        'Label28
+        '
+        Me.Label28.Height = 0.1330709!
+        Me.Label28.HyperLink = Nothing
+        Me.Label28.Left = 2.451181!
+        Me.Label28.Name = "Label28"
+        Me.Label28.Style = "font-size: 8pt; font-weight: bold; text-align: center; ddo-char-set: 1"
+        Me.Label28.Text = "VERAG Spediton AG"
+        Me.Label28.Top = 0.08622044!
+        Me.Label28.Width = 2.581103!
+        '
+        'Line2
+        '
+        Me.Line2.Height = 0!
+        Me.Line2.Left = 0!
+        Me.Line2.LineWeight = 1.0!
+        Me.Line2.Name = "Line2"
+        Me.Line2.Top = 0.03070864!
+        Me.Line2.Width = 7.480313!
+        Me.Line2.X1 = 0!
+        Me.Line2.X2 = 7.480313!
+        Me.Line2.Y1 = 0.03070864!
+        Me.Line2.Y2 = 0.03070864!
+        '
+        'ReportInfo2
+        '
+        Me.ReportInfo2.FormatString = "Seite {PageNumber} von {PageCount} Seiten "
+        Me.ReportInfo2.Height = 0.1330709!
+        Me.ReportInfo2.Left = 5.032284!
+        Me.ReportInfo2.Name = "ReportInfo2"
+        Me.ReportInfo2.Style = "font-size: 8pt; text-align: right"
+        Me.ReportInfo2.Top = 0.08622048!
+        Me.ReportInfo2.Width = 2.44296!
+        '
+        'lblDat
+        '
+        Me.lblDat.Height = 0.1330709!
+        Me.lblDat.HyperLink = Nothing
+        Me.lblDat.Left = 0.01023622!
+        Me.lblDat.Name = "lblDat"
+        Me.lblDat.Style = "font-size: 8pt; text-align: left"
+        Me.lblDat.Text = "Mittwoch, 02.11.2016"
+        Me.lblDat.Top = 0.08622044!
+        Me.lblDat.Width = 2.440945!
+        '
+        'ReportHeader1
+        '
+        Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.picVERAG, Me.Label3, Me.lblUeberschrift, Me.lblSachbearbeiter})
+        Me.ReportHeader1.Height = 0.7921261!
+        Me.ReportHeader1.Name = "ReportHeader1"
+        '
+        'picVERAG
+        '
+        Me.picVERAG.Height = 0.4169292!
+        Me.picVERAG.HyperLink = Nothing
+        Me.picVERAG.ImageData = CType(resources.GetObject("picVERAG.ImageData"), System.IO.Stream)
+        Me.picVERAG.Left = 5.281889!
+        Me.picVERAG.Name = "picVERAG"
+        Me.picVERAG.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
+        Me.picVERAG.Top = 0!
+        Me.picVERAG.Width = 2.198425!
+        '
+        'Label3
+        '
+        Me.Label3.Height = 0.1759842!
+        Me.Label3.HyperLink = Nothing
+        Me.Label3.Left = 5.032284!
+        Me.Label3.Name = "Label3"
+        Me.Label3.Style = "font-size: 8pt; font-weight: normal; text-align: right; vertical-align: middle; d" &
+    "do-char-set: 1"
+        Me.Label3.Text = "Sachbearbeiter:"
+        Me.Label3.Top = 0.5208662!
+        Me.Label3.Width = 1.19685!
+        '
+        'lblUeberschrift
+        '
+        Me.lblUeberschrift.Height = 0.6062993!
+        Me.lblUeberschrift.HyperLink = Nothing
+        Me.lblUeberschrift.Left = 0.01023622!
+        Me.lblUeberschrift.Name = "lblUeberschrift"
+        Me.lblUeberschrift.Style = "font-size: 12pt; font-weight: bold; text-align: left; ddo-char-set: 1"
+        Me.lblUeberschrift.Text = "HANDLING / FRONT-OFFICE"
+        Me.lblUeberschrift.Top = 0.1858268!
+        Me.lblUeberschrift.Width = 4.930709!
+        '
+        'lblSachbearbeiter
+        '
+        Me.lblSachbearbeiter.Height = 0.1759843!
+        Me.lblSachbearbeiter.HyperLink = Nothing
+        Me.lblSachbearbeiter.Left = 5.032284!
+        Me.lblSachbearbeiter.Name = "lblSachbearbeiter"
+        Me.lblSachbearbeiter.Style = "font-size: 8pt; font-weight: bold; text-align: right; vertical-align: middle; ddo" &
+    "-char-set: 1"
+        Me.lblSachbearbeiter.Text = "Hanslmayr Hubert"
+        Me.lblSachbearbeiter.Top = 0.5208662!
+        Me.lblSachbearbeiter.Width = 2.448031!
+        '
+        'ReportFooter1
+        '
+        Me.ReportFooter1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Label10, Me.lblGesGesSumAnzahl, Me.Line8, Me.Line9, Me.lblSumHandlingsgebuehr, Me.lblSumzuKassierenHandling, Me.lblSumBarzahlungsbetrag})
+        Me.ReportFooter1.Height = 0.2433071!
+        Me.ReportFooter1.KeepTogether = True
+        Me.ReportFooter1.Name = "ReportFooter1"
+        '
+        'Label10
+        '
+        Me.Label10.Height = 0.1574803!
+        Me.Label10.HyperLink = Nothing
+        Me.Label10.Left = 0.361811!
+        Me.Label10.Name = "Label10"
+        Me.Label10.Style = "font-size: 7pt; font-weight: bold; text-align: left; ddo-char-set: 1"
+        Me.Label10.Text = " Abfertigungen"
+        Me.Label10.Top = 0.08582678!
+        Me.Label10.Width = 0.8287402!
+        '
+        'lblGesGesSumAnzahl
+        '
+        Me.lblGesGesSumAnzahl.Height = 0.1574803!
+        Me.lblGesGesSumAnzahl.HyperLink = Nothing
+        Me.lblGesGesSumAnzahl.Left = 0.003937038!
+        Me.lblGesGesSumAnzahl.Name = "lblGesGesSumAnzahl"
+        Me.lblGesGesSumAnzahl.Style = "font-size: 7pt; font-weight: bold; text-align: right; ddo-char-set: 1"
+        Me.lblGesGesSumAnzahl.Text = "0000"
+        Me.lblGesGesSumAnzahl.Top = 0.08582678!
+        Me.lblGesGesSumAnzahl.Width = 0.3606307!
+        '
+        'Line8
+        '
+        Me.Line8.Height = 0!
+        Me.Line8.Left = 0.0039363!
+        Me.Line8.LineWeight = 2.0!
+        Me.Line8.Name = "Line8"
+        Me.Line8.Top = 0.03628609!
+        Me.Line8.Width = 7.475195!
+        Me.Line8.X1 = 0.0039363!
+        Me.Line8.X2 = 7.479131!
+        Me.Line8.Y1 = 0.03628609!
+        Me.Line8.Y2 = 0.03628609!
+        '
+        'Line9
+        '
+        Me.Line9.Height = 0!
+        Me.Line9.Left = 0.002755197!
+        Me.Line9.LineWeight = 2.0!
+        Me.Line9.Name = "Line9"
+        Me.Line9.Top = 0.00006568432!
+        Me.Line9.Width = 7.475194!
+        Me.Line9.X1 = 0.002755197!
+        Me.Line9.X2 = 7.477949!
+        Me.Line9.Y1 = 0.00006568432!
+        Me.Line9.Y2 = 0.00006568432!
+        '
+        'lblSumHandlingsgebuehr
+        '
+        Me.lblSumHandlingsgebuehr.Height = 0.1574803!
+        Me.lblSumHandlingsgebuehr.HyperLink = Nothing
+        Me.lblSumHandlingsgebuehr.Left = 5.608268!
+        Me.lblSumHandlingsgebuehr.Name = "lblSumHandlingsgebuehr"
+        Me.lblSumHandlingsgebuehr.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
+        Me.lblSumHandlingsgebuehr.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" &
+    "har-set: 1"
+        Me.lblSumHandlingsgebuehr.Text = "1.000,00"
+        Me.lblSumHandlingsgebuehr.Top = 0.08582678!
+        Me.lblSumHandlingsgebuehr.Width = 0.6208655!
+        '
+        'lblSumzuKassierenHandling
+        '
+        Me.lblSumzuKassierenHandling.Height = 0.1574803!
+        Me.lblSumzuKassierenHandling.HyperLink = Nothing
+        Me.lblSumzuKassierenHandling.Left = 6.229135!
+        Me.lblSumzuKassierenHandling.Name = "lblSumzuKassierenHandling"
+        Me.lblSumzuKassierenHandling.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
+        Me.lblSumzuKassierenHandling.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" &
+    "har-set: 1"
+        Me.lblSumzuKassierenHandling.Text = "1.000,00"
+        Me.lblSumzuKassierenHandling.Top = 0.08582678!
+        Me.lblSumzuKassierenHandling.Width = 0.6208655!
+        '
+        'lblSumBarzahlungsbetrag
+        '
+        Me.lblSumBarzahlungsbetrag.Height = 0.1574803!
+        Me.lblSumBarzahlungsbetrag.HyperLink = Nothing
+        Me.lblSumBarzahlungsbetrag.Left = 6.854331!
+        Me.lblSumBarzahlungsbetrag.Name = "lblSumBarzahlungsbetrag"
+        Me.lblSumBarzahlungsbetrag.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
+        Me.lblSumBarzahlungsbetrag.Style = "font-size: 8pt; font-weight: normal; text-align: right; text-justify: auto; ddo-c" &
+    "har-set: 1"
+        Me.lblSumBarzahlungsbetrag.Text = "1.000,00"
+        Me.lblSumBarzahlungsbetrag.Top = 0.08582678!
+        Me.lblSumBarzahlungsbetrag.Width = 0.6208655!
+        '
+        'rptSpeditionsbericht_HandlingAussenstellen
+        '
+        Me.MasterReport = False
+        Me.PageSettings.Margins.Bottom = 0.3937008!
+        Me.PageSettings.Margins.Left = 0.3937008!
+        Me.PageSettings.Margins.Right = 0.3937008!
+        Me.PageSettings.Margins.Top = 0.3937008!
+        Me.PageSettings.PaperHeight = 11.0!
+        Me.PageSettings.PaperWidth = 8.5!
+        Me.PrintWidth = 7.480315!
+        Me.Sections.Add(Me.ReportHeader1)
+        Me.Sections.Add(Me.PageHeader)
+        Me.Sections.Add(Me.Detail)
+        Me.Sections.Add(Me.PageFooter)
+        Me.Sections.Add(Me.ReportFooter1)
+        Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" &
+            "l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
+        Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
+        Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" &
+            "lic", "Heading2", "Normal"))
+        Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
+        CType(Me.Label7, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label6, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label8, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label4, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label5, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label1, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label2, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblPosNr, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblAbfertigungsart, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblAbfDatum, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblAnzahl, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblEndEmpf, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblEndEmpfKdNr, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblHandlingsgebuehr, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblzuKassierenHandling, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblBarzahlungsbetrag, 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()
+        CType(Me.picVERAG, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label3, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblUeberschrift, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblSachbearbeiter, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.Label10, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblGesGesSumAnzahl, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblSumHandlingsgebuehr, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblSumzuKassierenHandling, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me.lblSumBarzahlungsbetrag, System.ComponentModel.ISupportInitialize).EndInit()
+        CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
+
+    End Sub
+    Private WithEvents ReportHeader1 As GrapeCity.ActiveReports.SectionReportModel.ReportHeader
+    Private WithEvents Label3 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Line2 As GrapeCity.ActiveReports.SectionReportModel.Line
+    Public WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
+    Public WithEvents lblUeberschrift As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblSachbearbeiter As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents Label28 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents ReportInfo2 As GrapeCity.ActiveReports.SectionReportModel.ReportInfo
+    Public WithEvents lblDat As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblPosNr As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblAbfertigungsart As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblAbfDatum As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblAnzahl As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label10 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
+    Public WithEvents lblGesGesSumAnzahl As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Line4 As GrapeCity.ActiveReports.SectionReportModel.Line
+    Private WithEvents Label6 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label8 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label4 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label5 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents picVERAG As GrapeCity.ActiveReports.SectionReportModel.Picture
+    Private WithEvents Line11 As GrapeCity.ActiveReports.SectionReportModel.Line
+    Private WithEvents Line As GrapeCity.ActiveReports.SectionReportModel.Line
+    Private WithEvents Line12 As GrapeCity.ActiveReports.SectionReportModel.Line
+    Public WithEvents lblEndEmpf As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblEndEmpfKdNr As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label1 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label2 As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblBarzahlungsbetrag As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblSumHandlingsgebuehr As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblSumzuKassierenHandling As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblHandlingsgebuehr As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblzuKassierenHandling As GrapeCity.ActiveReports.SectionReportModel.Label
+    Public WithEvents lblSumBarzahlungsbetrag As GrapeCity.ActiveReports.SectionReportModel.Label
+    Private WithEvents Label7 As GrapeCity.ActiveReports.SectionReportModel.Label
+End Class
--- a/SDL/Speditionsbuch/Nacherfassung/rptSpeditionsbericht_HandlingAussenstellen.resx
+++ b/SDL/Speditionsbuch/Nacherfassung/rptSpeditionsbericht_HandlingAussenstellen.resx
@@ -0,0 +1,752 @@
+<?xml version="1.0" encoding="utf-8"?>
+<root>
+  <!-- 
+    Microsoft ResX Schema 
+    
+    Version 2.0
+    
+    The primary goals of this format is to allow a simple XML format 
+    that is mostly human readable. The generation and parsing of the 
+    various data types are done through the TypeConverter classes 
+    associated with the data types.
+    
+    Example:
+    
+    ... ado.net/XML headers & schema ...
+    <resheader name="resmimetype">text/microsoft-resx</resheader>
+    <resheader name="version">2.0</resheader>
+    <resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
+    <resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
+    <data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
+    <data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
+    <data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
+        <value>[base64 mime encoded serialized .NET Framework object]</value>
+    </data>
+    <data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
+        <value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
+        <comment>This is a comment</comment>
+    </data>
+                
+    There are any number of "resheader" rows that contain simple 
+    name/value pairs.
+    
+    Each data row contains a name, and value. The row also contains a 
+    type or mimetype. Type corresponds to a .NET class that support 
+    text/value conversion through the TypeConverter architecture. 
+    Classes that don't support this are serialized and stored with the 
+    mimetype set.
+    
+    The mimetype is used for serialized objects, and tells the 
+    ResXResourceReader how to depersist the object. This is currently not 
+    extensible. For a given mimetype the value must be set accordingly:
+    
+    Note - application/x-microsoft.net.object.binary.base64 is the format 
+    that the ResXResourceWriter will generate, however the reader can 
+    read any of the formats listed below.
+    
+    mimetype: application/x-microsoft.net.object.binary.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
+            : and then encoded with base64 encoding.
+    
+    mimetype: application/x-microsoft.net.object.soap.base64
+    value   : The object must be serialized with 
+            : System.Runtime.Serialization.Formatters.Soap.SoapFormatter
+            : and then encoded with base64 encoding.
+
+    mimetype: application/x-microsoft.net.object.bytearray.base64
+    value   : The object must be serialized into a byte array 
+            : using a System.ComponentModel.TypeConverter
+            : and then encoded with base64 encoding.
+    -->
+  <xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
+    <xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
+    <xsd:element name="root" msdata:IsDataSet="true">
+      <xsd:complexType>
+        <xsd:choice maxOccurs="unbounded">
+          <xsd:element name="metadata">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" />
+              </xsd:sequence>
+              <xsd:attribute name="name" use="required" type="xsd:string" />
+              <xsd:attribute name="type" type="xsd:string" />
+              <xsd:attribute name="mimetype" type="xsd:string" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="assembly">
+            <xsd:complexType>
+              <xsd:attribute name="alias" type="xsd:string" />
+              <xsd:attribute name="name" type="xsd:string" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="data">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+                <xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
+              <xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
+              <xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
+              <xsd:attribute ref="xml:space" />
+            </xsd:complexType>
+          </xsd:element>
+          <xsd:element name="resheader">
+            <xsd:complexType>
+              <xsd:sequence>
+                <xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
+              </xsd:sequence>
+              <xsd:attribute name="name" type="xsd:string" use="required" />
+            </xsd:complexType>
+          </xsd:element>
+        </xsd:choice>
+      </xsd:complexType>
+    </xsd:element>
+  </xsd:schema>
+  <resheader name="resmimetype">
+    <value>text/microsoft-resx</value>
+  </resheader>
+  <resheader name="version">
+    <value>2.0</value>
+  </resheader>
+  <resheader name="reader">
+    <value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <resheader name="writer">
+    <value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
+  </resheader>
+  <data name="picVERAG.ImageData" mimetype="application/x-microsoft.net.object.binary.base64">
+    <value>
+        AAEAAAD/////AQAAAAAAAAAEAQAAABZTeXN0ZW0uSU8uTWVtb3J5U3RyZWFtCgAAAAdfYnVmZmVyB19v
+        cmlnaW4JX3Bvc2l0aW9uB19sZW5ndGgJX2NhcGFjaXR5C19leHBhbmRhYmxlCV93cml0YWJsZQpfZXhw
+        b3NhYmxlB19pc09wZW4dTWFyc2hhbEJ5UmVmT2JqZWN0K19faWRlbnRpdHkHAAAAAAAAAAACAggICAgB
+        AQEBCQIAAAAAAAAAAAAAAL6QAAC+kAAAAQEBAQoPAgAAAL6QAAACArmQAACJUE5HDQoaCgAAAA1JSERS
+        AAAIMAAAAZIIBgAAAB9io5MAAAABc1JHQgCuzhzpAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29mdHdh
+        cmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAJA+SURBVHhe7d0HlG1Fte7xAxwySBCQJKKgIgZA4YgBxQDy
+        RL2IiBgwBwxgzuEeFRUTIiYQUdRWQVExY0LMIEowICiioEgUBBGQdN832Rx3r95fd6/urqq9wt8xfuON
+        V5fTVWuuqtp7r5qratH//d//AQAAAAAAAAAAAAAAjJUtBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAA
+        lGQLAQAAAAAAAAAAAAAASrKFAAAAAAAAAAAAAAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABA
+        SbYQAAAAAAAAAAAAAACgJFsIAAAAAAAAAAAAAABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACU
+        ZAsBAAAAAAAAAAAAAABKsoUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJ
+        thAAAAAAAAAAAAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRk
+        CwEAAAAAAAAAAAAAAEqyhQAAAAAAAAAAAAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2
+        EAAAAAAAAAAAAAAAoCRbCAAAAAAAAAAAAAAAUJItBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAAlGQL
+        AQAAAAAAAAAAAAAASrKFAAAAAAAAAAAAAAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABASbYQ
+        AAAAAAAAAAAAAACgJFsIAAAAAAAAAAAAAABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACUZAsB
+        AAAAAAAAAAAAAABKsoUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJthAA
+        AAAAAAAAAAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFpa0aMlSAAAAAAAAAACANlhN
+        NpMdZDd5irxQXivvkA/Jp+UrcqL8RE6X38lf5AL5562uk/9DMTfIstiH8yTuSThT4j79UuK+fVuOk8/J
+        UfJBea8slZfKs2Uf2V0eLNvI7WV1cf2md9yaIADUYQtLcpMaAAAAAAAAAABAQSvI5rKTPFFeJe+XL8rJ
+        Eovd14hbGAcm+4/8XX4rP5LPywckklyeIZH4ci9ZR1xf7AS3JggAddjCktykBgAAAAAAAAAAkMHGsqvs
+        L5Gg8HU5S64XtxgN5BQ7QcTOD1+WgyV289hZ1hfXf1vDrQkCQB22MAdNVj8VNzmj6lrZSEYme6Chlpcz
+        xPVnDDCu03mJuBgDaKfYitGNdTRLPExx9w/omqnbyP5a4kFibPn7LYm3pj4uh8ib5RXyNHmU3E/uIrcV
+        N44AoI4l4uYnpBHzejzDcLEH0E0rSRzzsJ/E9v9xLMDl4uYIoIkulei3kdgQx1XcSVxfbyS3VggAddjC
+        HDRZPUjcBIxR8WVqZLIHGiq2vHL9GEMHiYsd5o4EBqBbSGBoBxIYgLmJN/fOl5/LsRK/714je0s8QCfJ
+        AcB0YotpN68gnaeKiz2AbthSniyxVf9JEtv4u7kAaLNIaojnKfGc9B6ynLjxMHZurRAA6rCFuWjCirdW
+        3ISLqnjgdQcZmfCBhllNLhDXjzEQiz5ri4sf5o4EBqBbSGBoBxIYgPSuktPkaHmTPE7uLiuKG4cAuu/R
+        4uYLpBU77MQb2e4eAGifeIb+dDlKYny7cQ903cXyadlL1hA3VsbCrRMCQB22MBdNWNuJm2AxKr50jUz4
+        QMO8UVz/xVC8bedih/khgQHoFhIY2oEEBqCcG+RUOUJiq+PYsWFlcWMTQHcslt+JmxeQ3ovF3QcAzRfz
+        5c7yXjlb3BgH+uw6+Zo8ReLlQzeOinHrhABQhy3MSZPWMeImVlTdKHeTkUkfaIgN5Wpx/RcDF8qq4uKH
+        +SGBAegWEhjagQQGYLziIWRsK/822U1uI26sAmivZ4kb/8gjtt5eU9y9ANA8kcz5WPmMXC5uXAMY9S/5
+        uOwkbmxl59YIAaAOW5iTJq27SCzOuwkVVZ+XkUkfaIjDxPVbDD1PXOwwfyQwAN1CAkM7kMAANEv8no6E
+        htfLvaWxZ94CqCWS3jmasbw3i7sfAJpheYmdFmJXqivEjWMA9cXxdU+VoscouTVCAKjDFuamiSu+eLhJ
+        FKPi2I2RiR8Ys62FRKSZnSOxrZ2LH+aPBAagW0hgaAcSGIBmu0giufhhEg/73TgG0FyRjOTGNvKKHSU3
+        EHdPAIxPjMuYF88XN3YBLMzfJZ6vFtk12K0PAkAdtjA3TVy3l2vFTaCo+qaMTPzAmH1dXH/F0BPExQ4L
+        QwID0C0kMLQDCQxAe8QDyUOFRHigHdaTK8WNZ+QX86W7LwDKu7/EERHXixuvANKKJKHnStYX8Nz6IADU
+        YQtL0OR1sLiJE6MeICOTPzAm8WaX66cYOlXYyjcPEhiAbiGBoR1IYADa6VcSDyU55x1orlhAd+MXZcRC
+        6Z3E3RsAZcRzxhPFjVEA+f1Gsq0/ubVBAKjDFpagySuyzK8SN2miKr7EjUz+wBjElrSxOO/6KYYeIS5+
+        WDgSGIBuIYGhHUhgANotxvA7ZENxYxzAeGwhvGk8fhPi7g+AvOLZ2UnixiWA8j4ma4sbr/Pm1gYBoA5b
+        WIomsKXiJkuMYkEUTbCvuP6JoR+Iix3SIIEB6BYSGNqBBAagG66Tw2RjcWMdQFlHixurKOtm2UbcPQKQ
+        3t3l2+LGI4DxOk+S7sbg1gUBoA5bWIomsDXkMnGTJapOEbakxzitKn8V1z8xtKO4+CENEhiAbiGBoR1I
+        YAC65Ro5UNYSN+YB5Le9uPGJ8fiGuPsEIJ3bykfkRnHjEEAzxBh9oyRZi3LrggBQhy0sSZPYS8VNlBi1
+        h4x8CACFvE5cv8TQl8XFDumQwAB0CwkM7UACA9BNl8gTxY17AHmdIG5cYnweJO5eAVi4eKZ9kbixB6CZ
+        jpHVxI3p2tyaIADUYQtL0iQWb3WfL26SRNWZsryMfBAAmW0gV4nrlxiI7NStxcUP6ZDAAHQLCQztQAID
+        0G3fks3EjX8A6e0ubixivH4u7n4BmL/YdeEz4sYcgOb7hWwobnzX4tYEAaAOW1jSrRPZs8RNkBi1r1Q+
+        BIACPiiuP2LoE+Jih7RIYAC6hQSGdiCBAei+K+Sx4uYAAOnESym/ETcOMX7sfAqk80D5m7ixBqA9zpFN
+        xY3zWbk1QQCowxaWdOtEtljOFjdBoio+MFaUygcBkNFdhfPpZnad8NZaGSQwAN1CAkM7kMAA9Mchwu9N
+        IJ9niht7aIbY+XQFcfcOQH3x7IZniUB3zDuJwa0JAkAdtrCkSZPZ3uImR4zaTybHDsjpK+L6IYYOFhc7
+        pEcCA9AtJDC0AwkMQL8cL2uImw8AzF8cocrbyM0XSSbu/gGYXSRBHilubAFot0hiWF/c2J+WWxMEgDps
+        YUmTJrPl5DRxkyOq4gdv/PCdHD8ghweL64MYukrWExc/pEcCA9AtJDC0AwkMQP/8Uub8gBLAjF4tbryh
+        Wc4XnrkBc7eafFvcuALQDSdLjHU3B1huTRAA6rCFJU2Z0HYTNzFi1EtlavyAlCKpKB5cuv6HoTeJix/y
+        IIEB6BYSGNqBBAagn+KcfpIYgDRuK3yetsfLxd1HAN5a8lNx4wlAt8RuzbFu4OaCEW5NEADqsIUlmUnt
+        RHETI6ouE7b1RE5PEtf3MHSJMA7LIoEB6BYSGNqBBRegvyKhORYl3NwAoL44dtCNMTRTPHNbW9y9BFC1
+        psRb2W4sAeim14ubD0a4NUEAqMMWlmQmtfuLmxQxije/kcsq8hdx/Q5DB4iLH/IhgQHoFhIY2oEEBqDf
+        fihxprWbHwDM7o5yvbjxheZ6m7j7CWBoJfm+uDEEoLtukjh62s0LFW5NEADqsIUluUlNviZuYkRVPExe
+        V1wMgYV4lbg+h6E/S/xQc/FDPiQwAN1CAkM7kMAA4CPi5gcAs/uMuHGFZvu3bCTungIYbCF/jLjxA6D7
+        LpR1xM0P/+XWBAGgDltYkpvUZBu5WdzEiKqDxMUQmK/1hIWK2T1VXPyQFwkMQLeQwNAOfC8AEJ4rbo4A
+        ML17ixtPaIcPi7uvAJYsfYO4cQOgP44SNz/8l1sTBIA6bGFJblK7FRnq9VwjZIQjpUPF9TUM/UaWFxc/
+        5EUCA9AtJDC0AwkMAMK1cjdx8wQA73vixhPa4QbZUty9BfrsUcLLhwDCruLmiVu4NUEAqMMWluQmtVvF
+        D4T4oeAmRVR9QFwMgbm6s3A25+weLS5+yI8EBqBbSGBoBxIYACxzqqwobq4AUPUIceMI7RJb5Lv7C/RV
+        PLPn9wGAZc6VaY9ZdmuCAFCHLSzJTWqTHCZuUkRVLDhvJi6GwFx8UVwfw9BPxcUOZZDAAHQLCQztwANK
+        AJO9WdxcAWAoduw7Q9wYQvvEUSDuPgN9s4L8XNw4AdBfLxc3Z9g1QQCowxaW5Ca1SeJohNim0k2KqJr1
+        vCFgFg8U17dQtZO4+KEMEhiAbiGBoR1IYAAw2XWyhbj5AsDAU8WNH7TTd8TdZ6Bv3iBujADotytkXRmZ
+        N9yaIADUYQtLcpPaFO8UNymi6kbZSlwMgdksJyeL61sY+oa4+KEcEhiAbiGBoR1IYAAwFd+LgemtKueL
+        Gztor4eJu99AX2wnHPcMYDoHycjc4dYEAaAOW1iSm9SmiMwtHprWw7l8mK+9xfUpDN0s24iLH8ohgQHo
+        FhIY2oHv4gCcON/fzRlA371S3JhBu50i8fKHu+dA18WxOLz4BGAmV8naUpk/3JogANRhC0uaOqFNg+2p
+        6otsWBdDYDorybni+hOGJsTFD2WRwAB0CwkM7UACAwAnFjJYzAOq1pHYRtmNGbTfXuLuO9B1zxE3JgBg
+        stdLZf5wa4IAUIctLGnqhDaNNeRicZMiqtjKE3P1cnF9CUPXC+f8NgMJDEC3kMDQDiQwAJjOHuLmDaCv
+        3iNurKAbzpbF4u490FWRmHWJuDEBAJNdKivLf+cQtyYIAHXYwpImT2azOEDcpIhR9xcXQ2CqOKKFt0Nm
+        90Fx8UN5JDAA3UICQzuQwABgOr8SN28AfXQHuU7cWEF3PFfc/Qe66n3ixgIAOHFU9X/nELcmCAB12MKS
+        Jk9ms4ht7s8TNymi6kRxMQSmOlhcH8LQ1bKhuPihPBIYgG4hgaEdSGAAMJOdxM0dQN98WtwYQbf8XVYV
+        1weArtlIrhU3FgDA+b78dx5xa4IAUIctLGnyZFbD08VNihi1i7gYAsvcSeJoBNd/MHSguPhhPEhgALqF
+        BIZ2IIEBwEyOFTd3AH2yrdwsboyge14trh8AXXOIuDEAADPZUm6ZR9yaIADUYQtLWjaR1bSCnCluUkTV
+        ybKcuDgC4fPi+g6GLpO1xcUP40ECA9AtJDC0AwkMAGZyo9xe3PwB9MV3xY0PdFN8N1pHXF8AumIzYfcF
+        APPxRrllLnFrggBQhy0sadlENgd7ipsUMWoPcTEE7ieuz6DqFeLih/EhgQHoFhIY2oEEBgCzeb24+QPo
+        g4eLGxfotneJ6w9AV0Qfd30fAGZzutwyl7g1QQCowxaWtGwim4PYVeAX4iZGVP1WlhcXR/RXjKGfiusz
+        GPqrcK5l85DAAHQLCQztQAIDgNmcLW7+ALounrmcKm5coNvizfRNxPULoO1WlyvE9X0AqGMLsWuCAFCH
+        LSwpJrF5ILu9vieLiyH663Hi+gqqniUufhgvEhiAbiGBoR1IYABQxxJxcwjQZU8RNx7QD0eI6xdA2+0n
+        rs8DQF2vFLsmCAB12MKSYhKbpxPETYyoOkcWi4sh+mcl+aO4voKhs4Rx00wkMADdQgJDO5DAAKCOg8XN
+        IUBXrSx/ETce0A83ylbi+gfQVrFz6+/F9XkAqOu7YtcEAaAOW1hSTGLzdF9xEyNGPU9cDNE/LxbXR1AV
+        u1S4+GH8SGAAuoUEhnYggQFAHZE87+YQoKteLm4soF++KK5/AG11f3F9HQDm4jpZxa0JAkAdtrAkTWIL
+        EQ+93eSIKs7yR1hb/iGuj2DoFxLZ5i6GGD8SGIBuIYGhHUhgAFDX1uLmEaBr4vf15eLGAfqHI3TQJYeJ
+        6+cAMFcPd2uCAFCHLSxJk9hCxMORm8VNjqiKRT8XQ/THe8T1DVQ9TFz80AwkMADdQgJDO5DAAKCu14ib
+        R4Cueae4MYB+imNuXT8B2iaOxrlCXD8HgLl6u1sTBIA6bGFJmsQW6pPiJkdUXSZriIshum9ziW2bXN/A
+        0C1nc6HRSGAAuoUEhnYggQFAXd8TN48AXXJ7uVbcGEB/7SquvwBtEkequv4NAPPxPbcmCAB12MKSNIkt
+        1B3lenETJKreKC6G6L7PiusTqNpeXPzQHCQwAN1CAkM7kMAAoK5rZCVxcwnQFUeJ6//ot9OE4yjRdkeL
+        698AMB9XyfJuXRAAZmMLS9IElsIHxE2QqIqHz+uIiyG6awdx/QFVXxAXPzQLCQxAt5DA0A4kMACYiweK
+        m0uALriXcJQppvNEcf0GaIMV5UpxfRsA5mtrty4IALOxhSVpAkthI7la3ASJqoPExRDd9WNxfQFDN8pd
+        xMUPzUICA9AtJDC0AwkMAObiDeLmEqALviWu3wPhHIlFYNd3gKbbRVy/BoCF2NetCwLAbGxhSZrAUnm7
+        uAkSVf+WSPhwMUT3PFZcP0DVEeLih+YhgQHoFhIY2oEEBgBz8Q1xcwnQdg8T1+eByV4orv8ATccOxwBy
+        OMitCwLAbGxhSZrAUllbeLhaz6HiYohuWSxni+sDGLpWNhEXQzQPCQxAt5DA0A58xwYwFxeJm0uANltO
+        fimuzwOTXShriOtHQJP9WVyfBoCF+KpbFwSA2djCkjSBpfQacZMkqq6XzcTFEN3xInH3H1XvEhc/NBMJ
+        DEC3kMDQDiQwAJgrEoTRNU8U19cBh6N00Dabi+vLALBQ57p1QQCYjS0sSRNYSqtKZDq7iRJVHxcXQ3TD
+        WnKpuHuPoViQWVdcDNFMJDAA3UICQzuQwABgrh4jbj4B2mglOVdcXwec+O60nrj+BDTR08X1ZQBYqJtl
+        Fbc2CAAzsYUlafJK7QXiJkpU3Sh3ERdDtN9B4u47ql4nLn5oLhIYgG4hgaEdSGAAMFdvFDefAG3EbxDM
+        x8Hi+hPQREeJ68cAkMJWbm0QAGZiC0vS5JVaZMb/SdxEiaqjxcUQ7RbHg1wr7p5jKHZrWV1cDNFcPDwE
+        uoUEhnYggQHAXE2Im0+AtllbLhPXz4GZXCcc34q2+Iu4fgwAKezm1gYBYCa2sCRNXjnsK26iRFVs37Od
+        uBiivT4t7n6jKnZrcfFDs5HAAHQLCQztQAIDgLk6Vdx8ArTN28X1caCOT4jrV0CTbCSu/wJAKvu5tUEA
+        mIktLEmTVw7Ly2/ETZao+pq4GKKd7iORmOLuNYbOkRXFxRDNRgID0C0kMLQDCQwA5upqcfMJ0CabCLsb
+        Tu8aU4aqm+Tu4voX0BSPEdd/MV4xf8Tusb+Ub8hH5Z3yBnmxPF0eKw+X+8q2ckfZ/FZ3kNhFqM3WkWXX
+        E2I+jZcxd5bdZA95mjxXXiPvko9JPGf4sZwp/xAXX5T1drc2CAAzsYUlafLK5X/ETZYYtaO4GKJ9fiDu
+        HqPqSeLih+YjgQHoFhIY2oEEBgDzsbG4OQVoiyPF9W0MPFFiYc393zD0FXH9C2iKt4jru8gvfmf9SI6Q
+        V8qesr3ErhgriLtfmLs4QngreYQ8W6LPf0EiweFGcfcGaX3KrQ0CwExsYUmavHI6SdyEiaoTxcUP7fJo
+        cfcXVadJ7NLiYojmI4FhVBey6tFf8SDBjXU0CwkMAOaDRHm02T0k3n51fRtLlv5KlpOHTCrD9O4vrp8B
+        TRBv97t+i7Rid6rvyIESz3A3FXc/UNZKci95shwmvxd3/7Aw33JrgwAwE1tYkiavnGI7ITdhYlRsN+Vi
+        iHZYLHzBqueR4mKIdiCBYVQsArtYAUAqJDBUnS9Tk3HQDreV2H42ttiNbWefKbEVbzy4/7u4+435e4K4
+        OQVog6+L69cYmPwMiVjNLt6wnty/gCa5SFy/xcKdKv8rD5B4duvij+ZZX/aST8vl4u4t5uYUtzYIADOx
+        hSVp8srt2+ImTVTFbhWRPe9iiObbT9x9RdUPxcUP7UECw6hYkHGxAoBUSGCo+ou4OKH9YmvZ/SW+M7p7
+        j7l5hbg4A03HyzAz+55MjlfsVsEW3LN7lEyOG9AE64nrr5i/s+R1spm4mKNdVpZIyuX3wcKc79YGAWAm
+        trAkTV653UfcpIlRe4iLIZptTblY3D1F1f3ExRDtQQLDKBIYAORGAkMVCQz9sIUcIteK6weY3aHiYgs0
+        WbzYcYq4Po2BeM42NW4fE/ffYujXwnGWaJoHieuvmLvjZRfhBcHuiufKPxN3/zGza93aIADMxBaWpMmr
+        hGPFTZyo+o3wY6p94uw0dz9R9RVx8UO7kMAwigQGALmRwFBFAkO/bCRHiesLmNkx4mIKNNnjxfVnDBwt
+        Lm4by7/F/RsM7SsufsC4PEdcX0V9saAdR0S4+KJ7IkHlAPmPuP6A6S1264MAMB1bWJImrhLuJmxnV8+T
+        xMUQzbSp8FbY7G6Wu4uLIdqFBIZRJDAAyI0EhioSGPopdqv7h7g+AW/qNvNA060k54jrz1iy9HrZUlzs
+        wlvF/TsM/Vmin7n4AePwPnF9FbOL57EvEl4G7Kf7yqXi+ga8td36IABMxxaWpImrlI+LmzhRFT/WF4uL
+        IZrnE+LuI6rirTkXP7QPCQyjSGAAkBsJDFUkMPTXXSQWn1y/wKjY4c/FEWiq/cX1ZQx8UFzcluF4y3pe
+        LC5+wDh8S1w/xcz+KtuJiyn6Yyvhc6++O7j1QQCYji0sSRNXKZsJW/vU81xxMUSzbCOxs4C7hxiKt0Tu
+        IC6GaB8SGEaRwAAgNxIYqkhg6LfN5e/i+gaqIk4uhkAT3UZ4k3J6V8uG4mI32QvF/XsMRT9bQ1z8gNLO
+        EtdPMb14+S92xHXxRP/cWzhCqZ67u/VBAJiOLSxJE1dJh4ibPFF1vqwqLoZojtiS1d0/VMW4d/FDO5HA
+        MIoEBgC5kcBQRQIDYsvYG8T1DwxFIrGLH9BEB4rrxxh4i7i4TRU7ep4t7m9gaKm4+AGlcSzt3MRxYjMd
+        pYN+eoa4/oKqHdz6IABMxxaWpImrpPUlssbdBIqqWCR0MUQzPFLcfUNVjPcY9y6GaCcSGEaRwAAgNxIY
+        qkhgQGCxsx7OekcbbCzXiOvDGOwYEMdDuNg5jxX3dzAUzyo2EBc/oJR4Xub6J6a3i7hYAt8Q12cwtLNb
+        HwSA6djCkjRxlRZZ424CRdUlwpZ2zbSC/FbcfUMVbzV0DwkMo0hgAJAbCQxVJDAgrCx/EtdHMMT3FLTB
+        EeL6LwYOEBe3mfxE3N/C0KHiYgeUch9xfRPeweLiCIQtJHYfc30HAyQwAJgTW1iSJq7S1pLLxE2iqHq9
+        uBhivJ4t7n6hKsY5STjdQwLDKBYGAORGAkMVCQxY5uni+giGNhcXO6Ap7iY3iuu/WLL0zzKfnVTuJ+7v
+        YSgWuu4oLn5ACeyWUt9fZXVxcQSWOVxc/8EACQwA5sQWlqSJaxxeIW4SRVU8rGZhrFliQf5CcfcLVRyD
+        0k0kMIxingaQGwkMVSQwYJk46/18cf0EA1uLix3QFF8V13cx8BRxcavjWHF/E0OfFhc7oIQXiOuXGBVJ
+        qy6GwGR3Edd/MPBwtz4IANOxhSVp4hqHVeUCcRMpqt4hLoYYjzeLu0+oOk84b7ebSGAYRQIDgNxIYKgi
+        gQGTvU1cP8HAtuLiBjTBTuL6LQZOl+XFxa6OOwvbac/sZrmXuPgBucWxq65fouqPEkmrLobAVD8U14+w
+        ZOkebn0QAKZjC0vSxDUuzxU3kaLqatlQXAxR1sbyb3H3CVVkRncXCQyjSGAAkBsJDFUkMGCyrcT1Eww8
+        QFzcgHFbTk4S128xsJu42M3FB8T9bQx9Q1zsgNw+JK5PoirWEFz8AGc/cf0IJDAAmCNbWJImrnGJzMlz
+        xE2mqDpEXAxR1sfE3R9U/U4W8pYImo0EhlEkMADIjQSGKhIYMBW/K6e3s7iYAeO2l7g+i4EfiIvbXK0v
+        V4qrA0MPEhc/IKdjxPVHDF0hq4mLH+BsIq4vYcnSXd36IABMxxaWpIlrnPYRN5miKrb820xcDFHGPeUm
+        cfcHVXuIiyG6gQSGUSQwAMiNBIYqEhgwFYnG0yOBAU0UL7T8QVyfxcAScbGbj9eLqwNDPxMXOyCn74vr
+        jxg6TFzsgJnE70XXn/puZ7c+CADTsYUlaeIap3hL+zRxEyqqjhQXQ5RxvLj7gqqfi4sfuoMEhlEkMADI
+        jQSGKhIYMNW+4voKSGBAM71QXH/FwLHi4jZfq8rfxNWFof8RFz8gl1+L64sYeqC42AEz+ay4/tR3JDAA
+        mBNbWJImrnHbXdyEiqob5c7iYoi8dhV3TzDqweJiiO4ggWEUCQwAciOBoYoEBky1rbi+giVLHyouZsC4
+        rCEXi+uvGDz7uYu42C3EM8TVh6EzZQVx8QNy4C3xmV0kHFGL+ThAXJ/qOxIYAMyJLSxJE1cT/FjcpIqq
+        o8XFD/nEF2Uyouv5lrgYoltIYBhFAgOA3EhgqCKBAVOtIhz35rEDA5rmLeL6KgZybZfOs416ItHDxQ/I
+        4TJx/RADHxcXN2A2jxTXp/qOBAYAc2ILS9LE1QQ7iZtUUXWzxNtFLobIg7cU6om+uZ24GKJbSGAYRQID
+        gNxIYKgigQEObzF6JDCgSTaSq8X1VSxZeo1EjFzsUthNXL0YOl8iKc7FD0jtWnH9EAN7i4sbMJutxfWp
+        viOBAcCc2MKSNHE1xTfFTayo+qq4+CG91eQCcfcBVXG2mIshuocEhlEkMADIjQSGKhIY4Jwkrr/0HUe8
+        oUkOF9dPMfA2cXFL6Xvi6sbQy8XFDkhpOXH9D0MbiosdMJt4pu/6VN/d360PAsB0bGFJmriaIt7edhMr
+        Ru0oLoZI643i4o+qG2RLcTFE95DAMIoEBgC5kcBQRQIDnK+I6y99xw5+aIq7yo3i+ikGW8mX+F0Rz95i
+        B0XXBgyUuhfot+hjrv9h4GxxcQPqulJc3+qzbdz6IABMxxaWpImrSY4WN7mi6gfi4od0IsuXrS3r+bC4
+        GKKbSGAYxcMtALmRwFBFAgOco8T1l74jgQFN8SVxfRQDLxMXtxw+La4NGDpQXOyAVDYV1/cw8BlxcQPq
+        ulhc3+qzzd36IABMxxaWpImrSeItbjLy63mYuBgiDba2rCf3GZ1oHhIYRpHAACA3EhiqSGCA80Fx/aXv
+        SGBAEzxAXP/EwPmysrjY5XAH4ez9mcULLTzrQE6bi+t7GCiZ1IVuit+Mrm/12fpufRAApmMLS9LE1TQf
+        FTfBoirOeHXxw8JtLSTS1PN2cTFEd5HAMIoEBgC5kcBQRQIDnEPE9Ze+20JcvICSfiquf2LgaeLiltO7
+        xbUFQ+w2iZxIYJgZL+5hoX4jrm/12WpufRAApmMLS9LE1TSxhRaZ4PX8j7gYYmG+Li7eqLpcWLjtHxIY
+        RjEOAORGAkMVCQxwSGDweIMY47anuL6JgVhgWV5c7HKK3zD/ENcmDNwgsVOsix+wUCQwzGwTcXED6nqL
+        xBFzuJVbGwSAmdjCkjR5NdF7xX15QdUZMo4ful0WGb4u1hj1KnExRLeRwDCKBAYAuZHAUEUCAxwSGLxV
+        xcULKGGxnC2ub2LgUeJiV8JLxbUJQ58TFztgoe4hrs9hydKrxMUMwDy4NUEAqMMWluQmtQZYT64U9yUG
+        VfuIiyHmLpJBThMXZ1RdIDwM7ScSGEaRwAAgNxIYqkhggEMCw6jrxcUKKOV54vomBn4kLm6lrCTnimsb
+        hu4tLn7AQmwrrr9hydLTxcUMwDy4NUEAqMMWluQmtYb4X3FfYlB1jsRbDS6GmJt9xcUYo54jLoboPhIY
+        RpHAACA3EhiqSGCAc4S4/tJnl4iLFVDCGnKhuL6JgfuJi11J8VKMaxuGviMudsBCkMAwvePExQzAPLg1
+        QQCowxaW5Ca1hogfu5eJ+yKDqmeLiyHqi90E/iouvqj6g5A0018kMIwigQFAbiQwVJHAAOeT4vpLn8X3
+        dhcroIQ3ieuXGPiyuLiVtpycIq6NGHqouPgB80UCw/Q+KC5mAObBrQkCQB22sCQ3qTUIC2X1nC8ri4sh
+        6nmduNhi1OPFxRD9wLw8igQGALmRwFBFAgOcr4rrL30Wi5IuVkBut5OrxfVLLFl6o9xNXOzG4cHi2omh
+        X0gke7j4AfNBAsP03iAuZgDmwa0JAkAdtrAkN6k1SCzKx+K8+zKDqlhUdDHE7DaQq8TFFVW/En609xsJ
+        DKNIYACQGwkMVSQwwPmJuP7SZ8eLixWQ24fE9UkMfExc3Mbpa+LaiqG9xMUOmA8SGKb3fHExAzAPbk0Q
+        AOqwhSW5Sa1hninuywyqLpY4dsPFEDPj4Up9u4iLIfqDBIZRJDAAyI0EhioSGOCcKa6/9NkR4mIF5HQX
+        iR0GXJ/EkqXXyibiYjdOWwv3bWZnC8dpIhUSGKa3t7iYAZgHtyYIAHXYwpLcpNYw8ePgLHFfaFAVxyC4
+        GGJ6dxV+pNfzfXExRL+QwAC0AzszdQsJDFUkMMC5XFx/6bM3i4sVkNOx4vojBt4lLm5NEElPrs0Yeo64
+        2AFzRQLD9B4mLmYA5sGtCQJAHbawJDepNVCcue++0KAqHm7zJvDcfEVcLDFqibgYol9IYADagQSGbiGB
+        oYoEBkx1G3F9pe9YaENpO4rrixi4Qpr8zGYjuVpc2zFwgawqLn7AXJDAML1txMUMwDy4NUEAqMMWluQm
+        tQaKM/fj7H33pQZVbxcXQ4x6sLgYYtQXxcUQ/UMCA9AOJDB0CwkMVSQwYKp7iesrfbebuHgBufxYXF/E
+        wCvFxa1JYucW13YMvVpc7IC5IIFhek08ZgdoLbcmCAB12MKS3KTWUI8Q96UGVZEtfztxMcRQJMX8UlwM
+        URVHbGwlLo7oHxIYgHYggaFbSGCoIoEBU+0hrq/03d3FxQvI4THi+iEG/ipteHN/DblI3DVggN1PkQIJ
+        DNNjfAEJuTVBAKjDFpbkJrUGO1HcFxtUHSIufhh6irjYYdSR4mKIfiKBAWgHEhi6hQSGKhIYMNVbxPWV
+        vltTXLyA1BbL78X1Qww8U1zsmmg/cdeAoXeKix1QFwkM0yOBAUjIrQkCQB22sCQ3qTXY/cR9sUHVf2Qz
+        cTHEkqWrSDz4drFD1bVye3FxRD+RwAC0AwkM3UICQxUJDJjqG+L6Sp+dLy5WQA7PEdcPMXCmRJKHi10T
+        RVvPEnctGIhnJWxzj4UggWF6K4qLGYB5cGuCAFCHLSzJTWoN91VxX25Q9TFx8cOSpa8SFzOMeq+4GKK/
+        SGAA2oEEhm4hgaGKBAZMdaG4vtJnx4uLFZDaasIYnNn/iItdk0Wb3bVg6AhxsQPqIIFhei5eAObJrQkC
+        QB22sCQ3qTXcPeVmcV9wMHSjbCkuhn22nrAIUE/EKeLl4oj+IoEBaAcSGLqF7y5VJDBgsnuJ6yd9d7C4
+        eAGpvUFcH8TAT8XFrQ1+LO6aMBDP3e4qLnbAbEhgmJ6LV99wjDZy2tmtEwLAVLawJE1YbTQhbvJF1efE
+        xa/PPiAuVhgVD6JcDNFvJDAA7UACQ7eQwFBFAgMmY3c1r03n7aO91perxPVBDDxQXOza4L7irglDx4qL
+        HTAbEhi8K8XFq29IYEBOJDAAqMUWlqQJq41iZ4HrxU3AGIqdKuKNJBfDPrqz3CAuVqi6SNYQF0f0GwkM
+        QDuQwNAtJDBUkcCAyeLtZtdP+m5HcfECUuIFgZl9TVzc2uTz4q4NQzuIix0wExIYvPjd4+LVNyQwICcS
+        GADUYgtL0oTVVh8WNwGj6jhx8eujL4qLEUa9SFwMARIYgHYggaFbSGCoIoEBy9xNXB/pu5uEZGTkxosl
+        M4sXSu4hLnZtsoVwn2d2grjYATMhgcEjgWGABAbkRAIDgFpsYUmasNpqI7lW3CSMKt6+GWzb6GKDUefK
+        SuLiCJDAALQDCQzdQgJDFQkMWOZgcX2k784QFy8gpS+I638Y+IS4uLXR+8VdI4Z2FRc7YDokMHgkMAyQ
+        wICcSGAAUIstLEkTVpsdJG4SRtX3xcWvL5aTk8XFBqOeIi6OQCCBAWgHEhi6hQSGKhIYECKh/RpxfaTv
+        PiouZkAqsWW+63sYiJdtNhMXuzZaT/guMrNTJZ49ufgBDgkMHgkMAyQwICcSGADUYgtL0oTVZusIP6Lq
+        eYi4GPbBPuJiglHxttby4uIIBBIYgHYggaFb+L5bRQIDwuHi+gdISEZ+LKzM7L3i4tZmrxF3rRiKZ08u
+        doBDAoNHAsMAn7PIiQQGALXYwpI0YbXd68VNxKg6SVz8ui6OQogjEVxMMOpR4uIILEMCA9AOJDB0CwkM
+        VSQw4EES58u7/oElSzcVFzcghfjN6PodBuIz+7biYtdmq8pfxV0zBs6RFcXFD5iKBAaPBIYBEhiQEwkM
+        AGqxhSVpwmq7NeRCcZMxqh4jLoZd9nJxscCoH4uLITAZCQxAO5DA0C0kMFSRwNBvsTjP77/p/V5c3IAU
+        VpDfiut7GHiduNh1wdPEXTOGXiAudsBUJDB4JDAMkMCAnEhgAFCLLSxJE1YX7C9uMkbV6dKn4wHWlSvE
+        xQKjHiAujsBkJDAA7UACQ7eQwFBFAkN/RfLCWeL6BQa6uHU9muNZ4vodBv4usVOBi10XxPOkOHbSXTsG
+        IsFudXHxAyYjgcEjgWGABAbkRAIDgFpsYUmasLogjgmIB5luQkZVn87ke5+4GGDU18TFEJiKBAagHUhg
+        6BYSGKpIYOin+wrbl8/uIeLiByxULMxfIK7fYeA54mLXJbuKu3YMvUFc7IDJSGDwSGAYIIEBOZHAAKAW
+        W1iSJqyueLq4CRlVf5TF4mLYJVvI9eJigKo4P/ie4uIITEUCA9AOJDB0CwkMVSQw9Mva8k65UVx/wNAl
+        Elv8uzgCCxVHI7h+h4GzpQ/PWsJ3xMUAA/G9bT1xsQOWIYHBI4FhgAQG5EQCA4BabGFJmrC6IrayO1Pc
+        pIyq2PbRxbBLPi/u2jHq0+JiCDgkMADtQAJDt5DAUEUCQz9sIK+Ry8T1A4w6TFwsgYWKxVg+i2b2OHGx
+        66JtJF6EcHHAAMf5YDYkMHgkMAyQwICcSGAAUIstLEkTVpfsIW5SRtX5EsduuBh2wf3EXTdGxS4VdxQX
+        R8AhgQFoBxIYuoVFoyoSGLprE3mmfFluEHf/Mb0HiIsrsFCHiOtzGDhZlhMXu676pLhYYOBa2Uxc7IBA
+        AoNHAsMACQzIiQQGALXYwpI0YXVJ/GCMH45uYkZVVxc2og/8VNw1Y9Sh4uIITIcEBqAdSGDoFhIYqkhg
+        aJ/YVj2OgritbC73kEdIHAP4ZjlO/iTufqOes8TFHlioOwnHM87sweJi12W3l1ikd/HAwCfExQ4IJDB4
+        JDAMkMCAnEhgAFCLLSxJE1bXPEzcxIyqi2QNcTFss73EXS9GXS23ExdHYDokMADtQAJDt5DAAGA2zPvI
+        5XPi+hwGvikubn1wkLiYYOAm2Vpc7AASGDwSGAZIYEBOJDAAqMUWlqQJq4u+L25yRtVrxcWvreJYjHPE
+        XStGvUVcHIGZkMAAtAMLWd1CAgOAmVwltxE3fwALsb24PoeBm2UbcbHrg9hZ5zJxscFA7DDkYgeQwOCR
+        wDBAAgNyIoEBQC22sCRNWF20RNzkjKr4Uhg/OF0M2+jF4q4To+IhAw85MR8kMADtQAJDt5DAAGAm8Ra0
+        mzuAheLlkJl9Wlzc+oTnMLO7v7jYod9IYPBIYBgggQE5kcAAoBZbWJImrK76srgJGlUHiotf20Qixj/E
+        XSNGvUxcHIHZkMAAtAMJDN1CAgOA6cSxcOuJmzuAhfh/4vocBq6XzcXFrk9iJ8w/iYsRBn4kLnboNxIY
+        PBIYBkhgQE4kMACoxRaWpAmrq+KcudjOz03SGIoHXuuLi2GbvEfc9WHU+bKKuDgCsyGBAWgHEhi6hQQG
+        ANPpSkI6mmV5+bW4PoeB94mLXR/tLS5GGNpdXOzQXyQweCQwDJDAgJxIYABQiy0sSRNWlx0lbpJG1SHi
+        4tcWd5T/iLs2jHqmuDgCdZDAALQDCQzdQgIDAOfvsoa4eQNYiKeL63MYuErY+WRoOTlZXKwwcIZEYpCL
+        H/qJBAaPBIYBEhiQEwkMAGqxhSVpwuqyO0hs6+cmagxdK5uJi2EbfFbcdWHUmbJYXByBOkhgANqBBIZu
+        IYEBgPMEcXMGsBCryl/F9TkMvFFc7PpsJ3GxwtC+4mKHfiKBwSOBYYAEBuREAgOAWmxhSZqwuu5QcRM1
+        qj4qLn5Nt4O464H3WHFxBOoigQFoBxIYuoUEBgBTHSduvgAW6tXi+hwGLhR2PvG+Ii5mGPizrCQudugf
+        Ehg8EhgGSGBATiQwAKjFFpakCavrNpSrxU3WGLpRthQXwyb7sbjrwajY0jG2dnRxBOoigQFoBxIYuoUE
+        BgCTxdER64ubL4CFWFf4zJnZC8TFDkuWbiXxbMnFDQMHiIsd+ocEBo8EhgESGJATCQwAarGFJWnC6oO3
+        iZusURVHMbj4NVXsJuCuA95DxMURmAsSGIB2IIGhW1hMArBMLA7yvR65vFdcv8PAOcKRjDM7TFzsMHCJ
+        sIMHAgkMHgkMAyQwICcSGADUYgtL0oTVB2vL5eImbAzdLPcUF8OmiYcGfxB3HRj1bXFxBOaKBAagHUhg
+        6BYSGAAs8yJx8wSwUJvLf8T1OwzsLS52GGIX1NktFRc79AsJDB4JDAMkMCAnEhgA1GILS9KE1Rec41hP
+        W85SjQd3rv3w7i0ujsBckcAAtAMJDN1CAgOAEG/HuzkCSGFCXL/DwC+FIxnr+V9xMcRAJHhwDBBIYPBI
+        YBgggQE5kcAAoBZbWJImrL5YVS4UN2mjakdxMWyKteRScW3HqGPExRGYDxIYgHYggaFbSGAAcLiweIpc
+        IuE9dmR0fQ8DDxMXO4yKIxJ4/jaz94uLHfqDBAaPBIYBEhiQEwkMAGqxhSVpwuqT54ubtFH1PXHxa4qD
+        xLUbo+KM3DuLiyMwHyQwAO1AAkO3kMAA9NtHhOQF5BTPAFzfw8B3xMUN03uuuFhi4HqJY1tc7NAPJDB4
+        JDAMkMCAnEhgAFCLLSxJE1afrCTniJu4UbWzuBiO2x3kWnFtxqh4U8vFEZgvEhiAdiCBoVtIYAD6K85K
+        J3kBOe0qru9haDtxscP0FsuZ4uKJgU+Lix36gQQGjwSGARIYkBMJDABqsYUlacLqmyeLm7hRdZK4+I1b
+        /MBz7cWoSPTYSFwcgfkigQFoBxIYuoUEBqB/rpGniJsTgFSWl9PF9UEMfFZc7DC7R4uLKQbi2JZ7iYsd
+        uo8EBo8EhgESGJATCQwAarGFJWnC6pv4gf5rcZM3quLHpovhuNxHOJezvneKiyOwECQwAO1AAkO3kMAA
+        9MvZwqIWSthXXB/EQGzzv4W42KGeH4qLLQa+Li5u6D4SGDwSGAZIYEBOJDAAqMUWlqQJq48eI27yRtVp
+        EgkfLobj8ANx7cSo+MK/trg4AgtBAgPQDiQwdAsJDEB/fFBWEzcXACmtIueJ64cY+IC42KG+HcTFFkM7
+        iYsduo0EBo8EhgESGJATCQwAarGFJWnC6qufiZvAUbWPuPiVxtaDc/MacXEEFooEBqAdSGDoFhIYgO77
+        nTxA3BwA5PAKcX0RA1fLBuJih7k5WlyMMRDPJ13c0G0kMHgkMAyQwICcSGAAUIstLEkTVl/tLG4CR1Vs
+        X7pYXAxLifrPEtc+jLpQVhUXS2ChSGAA2oEEhm4hgQHorkvlRTLu31zol3XkCnF9EgNvFhc7zN2dJI7j
+        cHHGwP+Iix26iwQGL+YKF6++IYEBOZHAAKAWW1iSJqw+O17cJI6qZ4iLXyn7iWsXvIiXiyOQAgkMQDuQ
+        wNAtJDAA3XOZxK5pa4gb90BO7xbXLzFwiTA203qfuFhjIHbhadIRrsiPBIbpuXj1DQkMyIkEBgC12MKS
+        NGH12b3FTeKoOl9WEhfD3NaUi8W1C6POEd7eQk4kMADtQAJDt5DAAHTHHyR2XGBxFOOymVwrrn9iYH9x
+        scP83Vb4PjOzcb88hLJIYJjeKuJi1ickMCAnEhgA1GILS9KE1XdfEDeRo+oAcfHL7UBx7YH3BHFxBFIh
+        gQFoBxIYuoUH/kC7xWLx5+Rhspy4cQ6U8ilx/RTAeMXLQyzc9gcJDNNbW1zM+oQEBuREAgOAWmxhSZqw
+        +u6ucqO4yRxDF8rq4mKYy6bCmyH1nSY8EEVuJDAA7UACQ7eQwAC0z7/lOHmysNsCmmIbuVlcnwUwfi8T
+        N3bRPSQwTO924mLWJyQwICcSGADUYgtL0oSFJUuPFDeZoyrOaHXxy+Uoce2A9whxcQRSIoEBaAcSGLqF
+        BAagHc6Q90h8L19Z3HgGxunb4vougGa4TNYSN37RLSQwTG9LcTHrExIYkBMJDABqsYUlacLC4AzI68RN
+        6Bi6Qkpt48WbIXPzA3FxBFIjgWHUHSTmRqBJWDjrFhIYgHa4Ur4sL5S7iBvPwLg8XFy/BdAscZSqG8Po
+        FhIYpndfcTHrExIYkBMJDABqsYUlacLCwCHiJnRUvVVc/FL7nrj64e0oLo5AaiQwjIrFYhcrAEiFBAag
+        nf4kB0kkZ7uxDZQSRw2eKq6fAmiWq2UjcWMZ3UECw/R2FxezPiGBATmRwACgFltYkiYsDKwn8SPBTeoY
+        ihhFrFwMU3mkuLrhxVteLo5ADiQwjCKBAUBuJDAA7XeWvElYlMI4PFlcvwTQTB8SN5bRHSQwTO854mLW
+        JyQwICcSGADUYgtL0oSFoaXiJnVUxW4VLn4pLJbfiqsXo26SrcXFEsiBBIZRJDAAyI0EBqA7bpBj5MHi
+        xjuQ2kryZ3H9EUAzXS9bihvT6AYSGKZXavffJiOBATmRwACgFltYkiYsDN1GLhM3sWPoWrm9uBguVGTZ
+        ujrhfUJcHIFcSGAYRQIDgNxIYAC66STZTdy4B1J5mbj+B6DZPiduTKMbSGCY3lHiYtYnJDAgJxIYANRi
+        C0vShIWql4ub2FF1uLj4LcQacqG4+jDqOtlMXCyBXEhgGEUCA4DcSGAAuu2n8iBx4x9YiPie+g9x/Q5A
+        820nbmyj/UhgmN7PxcWsT+IZeXyGY37uKa5vYYAEBgC12MKSNGGhalX5m7jJHUM3Surt7N4sri547xMX
+        RyAnEhhGxY8jFysASIUEBqAfJuR24uYBYD7eKa6vAWiHb4sb22g/Ehimd4W4mAF1rSyub2GABAYAtdjC
+        kjRhYRTHGNTzGXHxm4+N5d/i6sGoq2Q9cbEEciKBYRQJDAByI4EB6I94aP88WU7cfADUtanE8Y+unwFo
+        j4eKG+NoNxIYZraJuLgBdV0krm+BBAYANdnCkjRhYdRi+aO4CR5DN8s9xMVwro4UVwe8N4mLI5AbCQyj
+        SGAAkBsJDED/fEs2EDcnAHV8XFzfAtAuvxCS2rqHBIaZPUZc3IC6ThLXt0ACA4CabGFJmrDg7SNugkfV
+        ceLiNxdxLlUkQ7i/j1GXSJyF5mIJ5EYCwygSGADkRgID0E8XyP3EzQvATPiNDXTL48SNdbQXCQwze6u4
+        uAF1fV5c3wIJDABqsoUlacKCF9nNp4mb5FG1RFwM6zpe3N+Fd4C4OAIlkMAwigQGALmRwAD01/XyFHFz
+        AzCdb4jrTwDa6SyJ3WLdeEc7kcAwsxPFxQ2o66Pi+hZIYABQky0sSRMWpvf/xE3yqPqOuPjVsau4vwnv
+        L7KSuFgCJZDAMIoEBgC5kcAA4BXi5gdgqjgv3/UhAO32HHFjHu10F3H3GQPXyariYgfU8S5xfQskMACo
+        yRaWpAkLM/uRuIkeVTuLi99Mlpdfi/t78J4qLpZAKSQwjCKBAUBuJDAACK8RN0cAy8ROkr8U138AtFsc
+        K8SCbndsLu4+Y2h3cbED6jhYXL8CCQwAarKFJWnCwsweKG6iR9XPxMVvJs8S97fg/UYi6cPFEiiFBIZR
+        JDAAyI0EBgDLvFTcPAGEfcT1GwDd8CpxYx/tQwLD7A4XFzugjo+J61cggQFATbawJE1YmB3nR9Yzl8zY
+        1SSyx93fgfcYcbEESiKBYRQJDAByI4EBwDI3y+PEzRXotzhq8E/i+g2AbrhC+P3ZDSQwzO4SWVFc/IDZ
+        HCOuX4EEBgA12cKSNGFhdttKPChyEz6GTpPYstLFcKo3ivsb8H4qLo5AaSQwjOIBEoDcSGAAMNm/5V7i
+        5gv01wHi+guAbnmnuDkA7bKuuPuLqkeJix8wmx+K61MggQFATbawJE1YqOdz4iZ8VD1BXPwm21CuFvfv
+        4T1IXCyB0khgGEUCA4DcSGAAMNUfZA1xcwb6Zy25TFxfAdAt18rG4uYCtMfK4u4vqr4mLn7AbC4S16dA
+        AgOAmmxhSZqwUM+WcqO4SR9DZ8licTFc5qPi/i28OMLExREYBxIYRpHAACA3EhgAOPG7ys0Z6J+3iesj
+        ALqJ+b8bbhB3fzEUOyJvIS5+wHQ2EdefMEACA4BabGFJmrBQ3+HiJn1UPV1c/MLdhUSQ+uKL+jbiYgmM
+        AwkMo0hgAJAbCQwApvMwcfMG+iMe0scb2a5/AOimeK52F3FzAtrjcnH3F1VHiosfMJ2niOtLGCCBAUAt
+        trAkTViojwcD9ZwvK4mL4dfF/Rt4nxEXR2BcSGAYRQIDgNxIYAAwnbNlRXFzB/ohFnZc3wDQbceKmxPQ
+        Hn8Rd29RFQk7dxYXQ8A5WlxfwgAJDABqsYUlacLC3Lxb3MSPqv1lauzi7SD338K7XtgmDU1DAsMoEhgA
+        5EYCA4CZvFjc3IHuY4dDoN92EDc3oB3OEHdfMYrjdVHXmnKNuH6EARIYANRiC0vShIW5WU94iDy7C2U1
+        WRa35eU0cf8tvA/K5L4HNAEJDKNIYACQG989AcwkfnutIm7+QLd9TVyfANAP3xc3N6AdfiDuvsJ7rLg4
+        ApO9VFz/wRAJDABqsYUlacLC3L1J3OSPqtfIspg97dYy1HO1bCST+x3QBCQwjCKBAUBuJDAAmM1+4uYP
+        dNeDxPUFAP2yi7g5As3HNvdzc6nwrBQzWV0isdf1HwyRwACgFltYkiYszN0acom4DwAMXS6xsLeq/PXW
+        MtRzoLi+B4wbCQyjSGAAkBsJDABmc56sIG4OQfcsJ78Q1xcA9MupEnOCmyvQbO8Xd08xvR/JSuLiCbxd
+        XL9BFQkMAGqxhSVpwsL8sIhXz1vkdVPKMLN/CAuiaCrmvlGMVwC5kcAAoI5HiptD0D2PF9cHAPTTE8TN
+        FWi214q7n5jZx4WkHUy1o9wors+gigQGALXYwpI0YWF+ItvzfHEfAhiKoxCumlKGmb1CXJ8DmoAEhlEk
+        MADIjQQGAHUcI24OQbesKOeI6wMA+inmhMXi5gw017PE3U/M7iNCEgOW2UTY/bk+EhgA1GILS9KEhfl7
+        hrgPAWC+4stWHLnh+hvQBCQwjCKBAUBuJDAAqOM64XtJ971I3P0H0G8vEDdnoLkeIe5eop6jZWVxsUV/
+        rC+/EddH4JHAAKAWW1iSJizMX2Q3/17cBwEwH88W19eApiCBYRQLBQByI4EBQF37iptH0A1ryiXi7j2A
+        frtQVhc3d6CZ7izuXqK+X8kW4uKL7ot7z9rM3JHAAKAWW1iSJiwszOPEfRAAc3WWsOUfmo4EhlEkMADI
+        jQQGAHV9Stw8gm54q7j7DgDh9eLmDjRTHE98k7h7ifr+LXEcL89U+2VPuVxcn8DMSGAAUIstLEkTFhYm
+        ztv6pbgPA2AuIhnG9TGgSUhgGEUCA4DcSGAAUFe8gcuZ0N20kcQijbvvABDiO+Ntxc0haKbzxN1LzN2Z
+        EovafA/qtk0kjg9xfQD1kMAAoBZbWJImLCzcruI+DIC6ThG+YKMNSGAYRQIDgNxIYAAwF/cQN5eg3Y4Q
+        d78BYLL3iptD0Ew/EHcfMX+/lWfJKuJijnbaWN4t14q776iPBAYAtdjCkjRhIY0TxX0gAHU8TFy/ApqG
+        BIZRJDAAyI0EhqrzJeZeNNuGsrncUx4ou8uT5dXyAfminC7XibvPmL+ni5tL0F53kxvF3W8AmCwW9zYT
+        N5egeT4q7j5i4eI31EfkAbK8uPij2eJYkHhxNHZcuF7cfcbckcAAoBZbWJImLKSxo7gPBGA23xPXp4Am
+        IoFhVCzSuFgBQCokMFT9RVyc0E4ryF1kb/mg/EZuFnfvUc8h4mKN9jpO3L0GAOfj4uYSNM/+4u4h0vq7
+        HCaPlbXE3Qs0wzryJPmsXCHufmJhSGAAUIstLEkTFtLhoQLmY3tx/QloIhIYRpHAACA3EhiqSGDovtgi
+        Nr5z/EJcH8DMYjtqF1e0U+xg4u4zAEwndmzZWtycgmZ5sLh7iHxukl/KofJEiURadmgYj5Ukdmt7rnxM
+        zhQSmfMjgQFALbawJE1YSCfOGuVDFnPxBXF9CWgqEhhGkcAAIDcSGKpIYOiX+8u3xPUFeJeIiyXaZzn5
+        mbj7DAAziZes3LyCZonnCe7+oayr5efyCYnjzmKnhh0kjkSLz2J371DP6rKV7CLPkIMk5qezheOxxoME
+        BgC12MKSNGEhrU+L+2AApoovaXcV14+ApiKBAeguzkxvLhIYqkhg6KdHyAXi+gRGrSwujmiXx4m7vwBQ
+        x/3EzS1olvPE3T80w/USvz9+KkdL7NzwVnmFPEceL7vKfWVb2UI2v1XsKhZJKss0eaeHFWVyW8O6suxa
+        4rri+iK5eGfZQ+IIuGfJK+UdcrjEy3rfl98KR0A003ZunRAAprKFJWnCQlrxYR5fbNyHAzDZEeL6ENBk
+        JDAA3UUCQ3ORwFBFAkN/3U5iy1/XL1B1J3ExRHsslj+Iu78AUMcPxc0vaJYvibt/AJDDtm6dEACmsoUl
+        acJCeh8S9+EALHOtbCKu/wBNRgID0F0kMDQXCQxVJDD021ryG3F9A0MPFBc/tMcLxN1bAJiL3cXNMWiO
+        l4u7dwCQw9ZunRAAprKFJWnCQnobyTXiPiCA8G5xfQdoOhIYgO4igaG5SGCoIoEBsbvAVeL6Bwbi6AEX
+        O7TDGnKRuHsLAHNxhjR523oMjh5w9w4ActjQrRMCwFS2sCRNWMjjIHEfEEAsQsQZYq7fAE1HAgPQXSQw
+        NBcJDFUkMCDsL65/YIA5vd2WiruvADAfTxE316AZVhRehANQykpunRAAprKFJWnCQh5rCw+b4bxeXJ8B
+        2oAEBqC7WOxqLr5TVpHAgLBYzhbXR7Bk6XPExQ3Nt6FcLe6+AsB8nCsriZtz0Aw/EHfvACClf7k1QgBw
+        bGFJmrSQz2vFfVCgvy6U1cX1F6ANSGAAuosEhuYigaGKBAYs8wxxfQSD72wuZmi+j4i7pwCwEAeIm3PQ
+        DK8Wd98AIKVz3BohADi2sCRNWsgnFqpjwdp9WKCfXiCurwBtQQID0F0kMDQXCQxVJDBgmdWE8eG9RlzM
+        0Gx3lRvF3VMAWIhLZA1xcw/G757i7hsApPR9t0YIAI4tLEmTFvJ6kbgPC/TPOcKWfWg7EhiA7iKBoblY
+        oK0igQGTHSmun/TdUnHxQrN9Sdz9BIAU/lfc3INmOF/cfQOAVD7m1ggBwLGFJWnSQl6xYP1ncR8Y6Jcn
+        iesjQJuQwAB0FwkMzUUCQxUJDJhsL3H9pO9IYGif+4u7lwCQyr9kPXFzEMaPI4QA5PYGt0YIAI4tLEmT
+        FvJ7qrgPDPTHabK8uP4BtAkJDEB3kcDQXCQwVJHAgMnWlpvF9ZU+I4GhfX4i7l4CQErvFzcHYfweLu6e
+        AUAqj3NrhADg2MKSNGkhv1i4/p24Dw30wyPF9Q2gbUhgALqLBIbmIoGhigQGTBVHtbm+0mckMLTLHuLu
+        IwCkdr1sLm4uwnjF8+MLxN03AEhhS7dGCACOLSxJkxbK4IFEf/1QXJ8A2ogEBqC7SGBoLhIYqkhgwFRf
+        FNdX+owEhvZYLGeJu48AkMOnxM1HGL93i7tnALBQcYzQcm6NEAAcW1iSJi2UsZycJO7DA90WZ5m6PgG0
+        EQkMQHeRwNBcJDBUkcCAqQ4U11f6jASG9nieuHsIALnE0Uv3FDcnYby2FXfPAGChfuzWBwFgOrawJE1c
+        KOeh4j480F1fEdcXgLYigQHoLhIYmosEhioSGDDV88X1lT4jgaEd1pALxd1DAMjp6+LmJYzfL8TdMwBY
+        iAPd+iAATMcWlqSJC2V9V9wHCLonMtrvLq4fAG1FAgPQXSQwNBcJDFUkMGAqjusbRQJDO7xR3P0DgBJ2
+        Ejc3YbyeIu5+AcBCPNytDwLAdGxhSZq4UNYO4j5A0D2fFNcHgDYjgQHoLhIYmosEhioSGDDVg8T1lT4j
+        gaH5NpA4i9jdP4z6u2wkawPTWE/OFdd/4P1U3PyE8VpJ2J0HQEr/kdXc+iAATMcWlqSJC+V9SdwHCbrj
+        ermDuPsPtBkJDEB3kcDQXCQwVJHAgKk4L3oUCQzN90Fx9w4e31NQx57i+g+m9xhxscR4vUnc/QKA+fiW
+        WxsEgJnYwpI0eaG8reVGcR8m6IZDxN17oO1IYAC6i4WB5iKBoYoEBky1jbi+0mckMDTbneUGcfcOo06R
+        5cXFEpjqRHH9CN7vhPHVPLGrCL8BAKTyHLc2CAAzsYUlafLCeBwl7sME7Xe1rC/uvgNtRwID0F0kMDQX
+        Dy+rSGDAVJuL6yt9RgJDsx0r7r7Bu7+4OAJO7Mpzs7i+BI/fAc0Un+XufgHAXMRn4gZubRAAZmILS9Lk
+        hfHYTOKYAfehgnbjYSG6jAQGoLt4cNlcJDBUkcCAqUhgGMVvkua6r7h7Bu9z4uIIzOQIcf0J3vmysrhY
+        YnxuI5eJu2cAUNc33bogAMzGFpakCQzj835xHypor/hhsaa4+w10AQkMQHeRwNBcJDBUkcCAqUhgGEUC
+        Q3P9SNw9w6hr5Pbi4gjM5HZylbh+Be9l4mKJ8XqluPsFAHU9zq0LAsBsbGFJmsAwPvGDKo4bcB8saKdY
+        3HX3GugKEhiA7iKBoblIYKgigQFTkcAwigSGZnq0uPsFj36MhXi1uH4FL17IWUtcLDE+K8lZ4u4ZAMzm
+        IlnRrQsCwGxsYUmawDBebxX34YL2iS334oeFu89AV5DAAHQXCQzNRQJDFQkMmIoEhlEs/DbPYvmduPuF
+        UX+V1cTFEqgjjkQ4V1z/ghfPKF0sMV67iLtfADCbN7g1QQCowxaWpEkM47W2/EPcBwzahYUf9AEJDEB3
+        8TnWXCQwVJHAgKlIYBhFAkPzPFvcvYL3RHFxBOZiT3H9C17sEruhuFhivL4g7p4BwHTiKKW13ZogANRh
+        C0vSJIbxe5W4Dxm0R7xJs7y4+wt0CQkMQHeRwNBcJDBUkcCAqUhgGEUCQ7PETgJ/F3evMOpnspy4WAJz
+        daK4fgbvQ+LiiPHaSHgBDsBcHCR2TRAA6rCFJcUkhrFbVS4U90GDdthD3L0FuoYEBqC7SGBoLhIYqkhg
+        wFQkMIwigaFZ3iDuPmHUzbJEXByB+dhWol+5/oZR18uW4mKJ8XqcuHsGAFNFwtM6YtcEAaAOW1hSTGJo
+        hP3Efdig+X4u7p4CXUQCA9BdJDA0FwkMVSQwYCoSGEaRwNAc68mV4u4TRh0lLo7AQhwhrr/B+6y4OGL8
+        PinungHAZC+SW+YNtyYIAHXYwpKWTWQYu8VyjrgPHDTbzuLuKdBFJDAA3UUCQ3ORwFBFAgOmIoFhFAkM
+        zXGouHuEUXH+/sbi4ggsxO0kzgJ3/Q6jYseK7cTFEuN1G+H5MYCZ/FZiremWecOtCQJAHbawpGUTGRrh
+        SeI+dNBc3xJ3L4GuIoEB6C4SGJqLBIYqEhgwFQkMo0hgaIYtJLZjd/cIo14rLo5ACq8W1+/gfVtcHDF+
+        95BI+HL3DUC/3Sjby3/nDLcmCAB12MKSJk9mGLvl5QxxHz5oHjLS0UckMADdRQJDc5HAUEUCA6YigWEU
+        CQzNcIy4+4NRf5ZVxMURSGFlOVdc/4P3EHGxxPjtJe6eAei3t0llvnBrggBQhy0saeqEhrF7tLgPHzTP
+        58TdQ6DLSGAAuosEhuYigaGKBAZMRQLDKBIYxm8HcfcGXizGuTgCKe0prv/BO1mWExdLjN9bxd03AP0U
+        c/ZKUpkr3JogANRhC0uaOqGhEX4q7kMIzXGDbCnu/gFdRgID0F0kMDQXCQxVJDBgKhIYRpHAMH4/EHdv
+        MOpEcTEEcoj+5vohvMeJiyPGL5JLPi7uvgHol4tlUxmZK9yaIADUYQtLcpMaxu7B4j6I0BwfEXfvgK4j
+        gQHoLhIYmosEhioSGDAVCQyjSGAYr93F3ReMiqMZtxUXRyCH6G/R71x/xKizZLG4WGL8VpDjxN07AP1w
+        vUx75I9bEwSAOmxhSW5SQyMcL+4DCeN3jWwk7r4BXUcCA9BdJDA0FwkMVSQwYCoSGEaRwDA+y8tvxN0X
+        jDpcXByBnI4Q1x/hPVtcHNEMq8oJ4u4dgG6LhLx9xM0Nt3BrggBQhy0syU1qaITtxH0oYfzeLu6eAX1A
+        AgPQXSQwNBcJDFUkMGAqEhhGkcAwPs8Ud08w6krZQFwcgZxuJ1eJ65cY9TeJRXIXSzTDakISA9A/B4ib
+        E/7LrQkCQB22sCQ3qaExjhH3wYTxuULWFne/gD4ggQHoLhIYmosEhioSGDAVCQyjSGAYj1jgi4U+d08w
+        6pXi4giU8Gpx/RLeq8TFEc0RSQzs6Av0x6zJC8GtCQJAHbawJDepoTHuIjeK+4DCePCDDX1HAgPQXSQw
+        NBcJDFUkMGAqEhhGkcAwHq8Vdz8w6g+ykrg4AiWsLOeK658YxQs97RDz6ufE3UMA3XCTxI5fbg4Y4dYE
+        AaAOW1iSm9TQKB8T90GF8i4QtsxD35HAAHQXCQzNRQJDFQkMmIoEhlEkMJS3njBf1/cYcXEEStpTXP+E
+        9w5xcUSzLCdvEXcPAbRbHH/0KHFj33JrggBQhy0syU1qaJTN5FpxH1go67ni7hHQJyQwAN1FAkNzsSBW
+        RQIDpiKBYRQJDOUdLO5eYNR3xMUQGIcTxfVTjIrnkxuJiyOa50lynbh7CaB9zpGtxY33abk1QQCowxaW
+        5CY1NA4PQsYvtrdcLO7+AH1CAgPQXSQwNBcJDFUkMGAqEhhGkcBQ1h3lenH3AlVxTObdxcURGIdt5WZx
+        /RWjPioujmim+8n54u4lgPY4WuZ1jI9bEwSAOmxhSW5SQ+PEVpT/EvfhhTL2FndvgL4hgQHoLhIYmosE
+        hioSGDAVCQyjSGAo6zPi7gNGfUhcDIFxOkJcf8WoSEK6i7g4opnWlS+Lu58Ami2OjNhX3Niuxa0JAkAd
+        trAkN6mhkeIBlPsQQ36/kjg/zt0XoG9IYAC6iwSG5iKBoYoEBkxFAsMoEhjKuY+4e4BRl0sspLk4AuN0
+        O4lFItdvMeoL4uKI5ornmi+Uf4u7pwCaJ+baTcWN6drcmiAA1GELS3KTGhppTblM3IcZ8tpF3D0B+ogE
+        BqC7SGBoLhIYqkhgwFQkMIwigaGc74u7Bxh1gLgYAk3wanH9Ft724uKIZosjj74j7p4CaIY/ym7ixvCc
+        uTVBAKjDFpbkJjU01svEfaghnxPE3Qugr0hgALqLBIbmIoGhigQGTEUCwygSGMr4f+Lij1G/l8Xi4gg0
+        wcpyrrj+i1GRvOXiiOaL3Rjit9/F4u4tgPH4qzxHkn5fcmuCAFCHLSzJTWporFXlfHEfcMhjibh7AfQV
+        CQxAd5HA0FwkMFSRwICpSGAYRQJDfsvLGeLij1GPEBdHoEn2FNd/4bFjabvdRt4h14q7vwDK+LPsL7H2
+        48bqgrg1QQCowxaW5CY1NNqzxX3QIb0virsHQJ+RwAB0FwkMzUUCQxUJDJiKBIZRJDDk91Rxsceob4iL
+        IdBEPxTXjzHqVxJv87s4oj3ie9RRcqO4+wwgj5Pk8ZJ1hyq3JggAddjCktykhkaLD7Q/iPvQQzrxpf1u
+        4u4B0GckMADdRQJDc5HAUEUCA6YigWEUCQx5sTtifdfLXcXFEWiie8vN4vozRu0tLo5ony3lcIl5291r
+        AAt3uXxAthE3DpNza4IAUIctLMlNami8+HHgPgCRzpHiYg/0HQkMQHeRwNBcJDBUkcCAqUhgGEUCQ16v
+        FBd3jDpYXAyBJvu4uP6MUedI1reHUdzt5e1yibh7DmBu4piW2On5CbKKuHGXjVsTBIA6bGFJblJD48X2
+        bKeJ+0DEwsWXis3ExR7oOxIYgO4igaG5SGCoIoEBU5HAMIoEhnzWFeblei6VtcXFEWiyDeVf4vo1Rj1f
+        XBzRbitLHJf0E3H3HcD0rpBjZB9ZQ9wYK8KtCQJAHbawJDepoRV2E/fhiIV7r7iYAyCBAegyEhiai4Wy
+        KhIYMBUJDKNIYMgnfi+6mGPU88TFEGiD14rr1xh1oawmLo7ohjvJG+RscX0A6Lub5JfyDnmgrCBuLBXn
+        1gQBoA5bWJKb1NAaPxT3gYn5iwWC9cTFGwAJDECXkcDQXCQwVJHAgKlIYBhFAkMed5DrxMUcVb+Wxjy8
+        B+Yhtvn+s7j+jVGvFxdHdM+9JO73yXKzuP4AdN0N8gt5jzxK1hI3XsbOrQkCQB22sCQ3qaE1HiDuAxTz
+        90ZxsQYwQAID0F0kMDQXCQxVJDBgKhIYRpHAkMenxcUbox4iLoZAmzxeXP/GqPi+eltxcUR3xXErT5GP
+        yTni+gbQdrG7wu9lQvaXHSWOWHFjonHcmiAA1GELS3KTGlrla+I+WDF3F8lYz6QCWoAEBqC7SGBoLhIY
+        qkhgwFQkMIwigSG9bYU3Tev5krgYAm30I3H9HKPiTWQXQ/THpvIEOUi+K5eL6ytAE8X3vPPkO/I+eYbc
+        R1YV199bwa0JAkAdtrAkN6mhVSLbb20ksbq4GAMYYs4BumslceMe4xfbUbp71le3ERcn9Nfy4vpKn8XW
+        5y5WmD++B9fHdwp0CWO/vjXFxRD9Fomm/0/ihZgPywnyVyEpEOMQR4GdJcfLR+W18jiJo1FanagwHbcm
+        CAB12MKS3KQGAAAAAAAAAACQwYoSyQ07yZMlFpI/JJ+XEyW27L9U3CI0MNUV8kc5Sb4uh0vsSPY8eZRs
+        L3HkieuLnebWBAGgDltYkpvUAAAAAAAAAAAAxmix3E7uKveVXWVvea68Ut4sh8hhcpR8Wb4pkQTxKzld
+        fidxDF2II4TjiL5wo7jFcORxkyyL/cWy7J7E/Yn79BOJHTqOk89J3M+4t2+XV8t+8iTZXR4od5dISohk
+        GNd3IG5NEADqsIUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJthAAAAAA
+        AAAAAAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRkCwEAAAAA
+        AAAAAAAAAEqyhQAAAAAAAAAAAAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2EAAAAAAA
+        AAAAAAAAoCRbCAAAAAAAAAAAAAAAUJItBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAAlGQLAQAAAAAA
+        AAAAAAAASrKFAAAAAAAAAAAAAAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABASbYQAAAAAAAA
+        AAAAAACgJFsIAAAAAAAAAAAAAABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACUZAsBAAAAAAAA
+        AAAAAABKsoUAAAAAAAAAAAAAAAAl2UIAAAAAAAAAAAAAAICSbCEAAAAAAAAAAAAAAEBJthAAAAAAAAAA
+        AAAAAKAkWwgAAAAAAAAAAAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRkCwEAAAAAAAAA
+        AAAAAEqyhQAAAAAAAAAAAAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2EAAAAAAAVC1a
+        srS0jeTB8ix5vRwqn5XvyIlyspw+xc/lBPmSfFzeLS+Vx8sSWVtcXQAAAGie28h95AnyKjlY4vvgN+Qn
+        MvW74E8lvid+U+K/i++Cr5QnyQOE74Kozf0m6pOJiQkgt7Vle9lbXinvlvjfV+VEOd2I8h/IsXK4vE1e
+        JLvLXWUlcXXNiRsTJdlCAAAAAABQ5R7qJbSh7CXvkXgY/S/5v0wukEiCeJs8Sm4rrk1dd5RMfejfBKdK
+        LDyEuE9fkI9JLFj8r7xA/kdiMeN24q6tSz4nLk599jVZRVy8Svm6uLaVFIt035Xj5JMSSV6R7LWfxBjZ
+        VtYR134M5BxfHxRXZw6xqOvagIGfSSRFutjl0JV+NQ6LZUeJhINIRj1X3He5hfqbHC8HysNlNXHt6YtS
+        3zV2Fld/CZEU7do0H7fMKe73Ute4Rd2Ge624Be9cloprB7y15BEScfum/FX+L4Ob5HfyKdlftpHlxLVp
+        Wm5MlGQLAQAAAABA1SL/MHAh7iWxIH2KuIfLpdwssZvDUtlOXFu7ZkW5Rlw82uY6OU1iAfcV8jDpykJE
+        XMf14q6772LBycWshPXFtampLpcfyWHyPNlGVhB3bX1SYnxFX3F1p3aSuPox9GJxsUutS/2qlLVkXzlW
+        rhJ3zbnFPYvEyf2lZLJLE5T8rvErWV5cO3J7q7g2zddL3O+lrnGLug12X7lR3IJ2Lr8V1xYM3VMiYeGn
+        Uvr+THaxfFoeL6uIa2uFGxMl2UIAAAAAAFC1yD8MnKs15bkSDzDdw8AmOFNeKxuIu4YuiLcb3bV3xX8k
+        3qyMxdrYetrFoA3iTUV3fX13o6whLmYl7CGuXW0Su9x8VZ4vm4q7zq7LPb7+KK7e1GLx8QZxbcDQ9uLi
+        l1pX+lVusYi9m8QuC/GZ7a51XG6S78tTJBI+Xfu7pPR3jaeJa0duPxDXnvm6r/u91DVuUbehYkH6LHEL
+        17mtK65NfXZHiaSFP4mL2bhdKR+XJeLafws3JkqyhQAAAAAAoGqRfxhYV5w3HDsc/FPcQ8Amijf7j5St
+        xF1Tm8VOBe6au+jf8hHZQlwsmuwN4q6p734pLl6lxFE3rl1tFbvQxMLO02VlcdfcRbnH1yfE1ZvaQ8TV
+        j6GrJY4mcPFLrSv9KpdV5YXyJ3HX1zRx1EQcZxHfY931dEHp7xoR0+gHri25pN55LP7WYvd7qWvcom5D
+        vVvcQnUJjxbXpr6JIxoeKceLi1NT/UQeIyNHTLgxUZItBAAAAAAAVYv8A8HZxDblL5E2JS5MFW97f0w2
+        EXeNbfQVcdfaZXEf4+zwdcXFpIliFwl3LX33XnHxKqXL2/VfIm+SNu9cUlfu8fVMcfWmFvfL1Y+huNcu
+        djl0pV+ltpIcIBeJu66mu0IikaGLSV7j+K4RSROuLbmk3nnsBPdbqYumLug21I5yk7jF6RLeJa5dfbG8
+        7CNxnIaLT1ucLA+U/16bGxMl2UIAAAAAAFC1yD8QnEmcs36KuAd/bRRbrr9IxnV2byrLyWXirrEPLpU9
+        xcWmSSL5Z1xngTddHOHgYlZCX7brjzni5VLqrfXSSoyvu4irO7XviKsfQ6UWS7vUr1LaXdqy48Js4giP
+        XcRdZxuN67tGfKfeUFybcki989hb3G+lLpq8mNtQ4zw6YpmTxLWtD3aRM8TFpa3if7cVOyZKsoUAAAAA
+        AKBqkX8gOJ3YHvh6cQ/92u5HsrG4626Du4m7rr75kMQboS5GTbCduHZjvLtoPFRcm7rqN3J/cbFos9zj
+        62Jx9aYWi49xPIJrA4Z2Ehe/1LrSr1KJBeovi7uWtvuwlD4GIYd7i7u+Ej4qrk05pO6Hu7rfSl0Ui7gN
+        N86jI5a5XlYT176u2kyOExePLrhIdndjoiRbCAAAAAAAqhb5B4JTxdvJnxH3sK9LYhEhzh13MWi654q7
+        pj76oawlLk7jFlttuzb33W/FxauUPm7Xf5McKF3ajSH3+PqiuHpT215c/Ri6TlYRF7/UutKvUoidcv4h
+        7jq6IhK82rgjxmTj/K4RR3vdQ1y7Uovdt1wb5iM+E9dwv5W6aMIvXjfFuI+OmOwh4trYNcvJC+RqcXHo
+        mjfLcm5slGALAQAAAABA1SL/QHCyWAg+UdzDvi6KHSYeLy4WTfYpcdfTV7+WJiYxfF5ce/su3np18Sql
+        z9v1x/y+nri4tE3u8fVScfWm9hJx9WModk1yscuhK/1qIVaUQ8S1v4uukLYmtIZxf9f4lrh2pbSVuLrn
+        61fud1JXTfhF7CZowtERk71RXDu7ZAM5Xtz1d9kXZFU3PnKzhQAAAAAAoGqRfyi4TCwAnyruQV+XxVtY
+        TxcXk6Y6V9y19NlJUuoN3bouFNfWvttHXLxKYLv+JUv/LLEY5OLTJrnH1w7i6k3tWHH1Yyh2D3Gxy6Er
+        /Wq+1pbviWt7l0VC6+PExaTpmvBdY1dxbUvl2eLqna9D3O+krprwC9lN0ISjIyb7jrh2dsUD5QJx194H
+        J8hqbozkZAsBAAAAAEDVIv9QMKwkJ4h7yNcHkcTwGHGxaZqNxV0Dliz9uLiYjcMW4tqIQR92MSvhPuLa
+        1DexFfc24mLUBrnHVyS5lDpuI44zcm3A0CPExS61LvWr+dhUfi+u7X3Qpu+CyzTlu0bshLW8uDam8Alx
+        9c7XXu53UldN+MXscWvS0RHLxJEKi8W1t+2eIdeLu+4++Yas4MZJLrYQAAAAAABULfIPBcOR4h7w9ck1
+        sq24+DTJE8S1HwNNWXx4mrj29d054uJVyovFtauPYtv0e4qLU9PlHl/xBrqrN7U4e9/Vj6E4Y38NcfFL
+        rSv9aj62lNidxbW7T2Inhp3ExaiJmvRdI3ZJcG1M4Y/i6pyvDd3vpK6a8Ava49S0oyMm215cm9vsreKu
+        ta8OduMkF1sIAAAAAACqFvmHgnuKe7jXR/GANI7ScHFqig+IazsG/iKxo4iLXUlHiGtf38VblC5epXxB
+        XLv66gK5o7hYNVnu8fW/4upN7Vni6sfQL8TFLofc/WqpuHrH7Q7yN3Ft7qN/yObiYtU0TfquEUdZ5Eg2
+        2lBcffP1R/cbqcsm/KL2ODXt6IjJXiquzW20nHxY3HX23ZPdWMnBFgIAAAAAgKpFow8F46zj2ErcPeDL
+        Ld5yu1xiwTkSB+L/jf//teL++1LGvcA6m9PEtRtD+4mLXUlniWtb3z1dXLxKuUhcu1KIrddPn8XvJOa6
+        ODYg5kD3d0r7rZR6wz2V3OPrYeLqTY1Ep9m9R1zscuhKv5qLWByOnXFce0u6UiKJYtn3wXF9N13mZFlR
+        XMyapGnfNd4srp0LsZe4uubrE+43UpdN+MXtcdlJbha3qNwEXxTX7raJ5IWPiLvGcbhM/iJ/lL/Jv8T9
+        d6X8UzZx4yU1WwgAAAAAAKoWjT4UfIu4h3up3SwnSdQXZ1nHG78riGtTuJ3cT54pR8l54v5uLg8R165x
+        u43EGc2uzSnE33aLrtOJBdtYaAiXyX/E/d3SzhAXv1LWF9eulCLm7p403Z3ExayE2CLdxTKFSEZYVVy9
+        M1lPtpMny7sk5snYMt/VkdOXxLWviXKPr4j/6uLqTm0HiaQ0N1ZSiB023DWm8k9x9aa0i7jYpdalflVX
+        JC6dKq69OUWy6mfkGRJjYLoEqthNKT4z9pCDpHRbm7pjxjIlvmvM1b9lE3Htna/3iatrvp7lfiN12YRf
+        4B6H1SQWsN2CclNcIq7tbfMBcddXwjlyqDxRtpY4MsS1cQXZQh4rsSvHmeL+Xi5fceMlNVsIAAAAAACq
+        FlUfCMZi+NXiHu6lEg/sD5O7ytT65+oBEskMJd5ajreklxfXjnHaTVx7U4mFNFfvXMRCRNzvXWV/iXuW
+        +uziOu4hrn0lPFZcm1K6j7i6Mb1YLHOxTOHn4uqcj3XlOfJLcXXl8lxx7Wma3OOr5JEFuX1Q3DWm8g5x
+        9bZRLJK7a0ylaf1qOfmKuLbm8hP5H5kpgXU2W8vhcoO4OlKKpMxIfHPtaIIS3zXmI/VOZqeIq2e+7up+
+        I3XZhF88HodDxC0kN81W4trfFq8Wd105XStxXMV9xLWprh3kGHF15LCzGzMp2UIAAAAAAFC1qPpAMOdi
+        XohtbbeXqfUuVLyN921xdaa0r7j6x+lAcW1N5VBx9aZwN/mAlFh0CC8R144S3iuuTalE4tFCFoD66khx
+        8Uwhdk9wdS7UwyWOeHB1phb9qg3nvuceXweLq7eNYgcDd42pPFJcvW3Ut34VW/27duYQuzWlPj7j7lJi
+        R4Yvi6u/CXL32fmKXde2EdfmuYqk2JS7El3ifh913YRfKC6t6UdHTPZscdfQBrGbgbumnD4mG4lrz3xF
+        f4mdHFx9Kf3cjZmUbCEAAAAAAKhaVH0omDMJIN64j61tp9aZSrw5GFv7urpT+bq4usfpRHFtTWVvcfWm
+        FDsHxDnXrv6UPieu/hLi7GzXplRi7Lp6MbOzxcUzhceIqzOFxRIJEq7e1Jq8WLdM7vG1p7h622YtyXnk
+        UCxSri2u7jbqU7+KZIK4f66dqX1EVhHXjoVaTb4qrt6U4pgfV/+45e6zC/E9cW2eq0jic39/vr7kfh91
+        3YRfIC4px9ERfzBlqXxS3HU0XRzX8C9x15TD3+RB4tqSwrpysri6U8q6C4MtBAAAAAAAVYuGDwTjeISr
+        xD3cS+HRMrm+XFInMcQD/T/LNySOrHB1jkucBX2NuHanspG4ulOLLZkvFteGVH4lru7cYkEl5duCzhvF
+        1Y3pbSAulqncVly9KT1Fci5IL/NgcfU3QYnxFX3F1d02uY8c+rW4etuoT/0q5qq/i2tjSvF9Ko6Rcm1I
+        aVWJ4zlcG1KZEFf3OJXoswv1KHFtn4vU3/Nf6n4fdd2EXxwuKfXRESfKPlPKUjpX3HU02crya3HXk8NP
+        ZD1xbUlpLTlDXBtS+awbN6nYQgAAAAAAULVo+EDwzrc+yMtlZZlcXy6xE8O3xLVhJnGMQRxx8SWJYxme
+        LPGGXTwQdvU0wY7iriWVP4mrN5fdxbUjlfPE1ZvbQ8W1J6WdxdWN6cXbzy6WKfxOXJ05vEhcG1I6QVzd
+        TZB7fMUuHa7eNnqbuGtM5cPi6m2jPvWrz4hrY2rPF1d/DpEUeZ24dqTwHymRpDYXJb5rLNSZEjsIufbX
+        9V1xf3u+dnC/j7puwi8Ml5L66IjrJXYauNOkshw2Fnc9TXWwuOvI4auyqrh25HBnuUZcW1L4j6zrxk4K
+        thAAAAAAAFQtGj4QzP3gs+SbhneU68W141qJM8A/K2+SWMSMc5NXFPe3muyV4q4xlaPE1ZvTz8W1JYV/
+        iqszt+hnrj2pRF9vcqJNU8X58y6eKRwmrs5cviCuHSktEVf3uOUeXx8TV28b/VDcNabyRHH1tlFf+tUu
+        4tqXWiTPuPpzyjnHh/3E1TsuuftsKgtJZInkh6vF/d35iL+12P0+6roJvyhcQo6jI94uy/7+ZbeW5RA7
+        PEy+libbQW4Sdx2pfV9WEteOnF4nrj2pPMWNnRRsIQAAAAAAqFo0fCj4OHEP91J5jkyuL7dYQDxJYhE+
+        FvrjCIs7SRyV4f77NvqKuFin8mxx9eb0VnFtSeFycXXm9h1x7Ukl+rmrFzPLucV4HO3g6sxlE0m5qON8
+        VFzd45Z7fD1dXL1tE0cORQKfu8ZUbi+u7jbqQ7+KxM3Yecq1L6WfyAri2pBTJLPGsRWuTSl8W1y945K7
+        z6ZyidxG3DXMZntxf3O+vud+G/XBhF8QLiH10RF/lkiKWPb3jxf336XwQZl8LU21vJwm7hpS+73EkQ6u
+        HbnFff+HuHalMOHGTgq2EAAAAAAAVC0aPhTMncBwlbDNfTpxVMY/xMU6la3E1Z3TAeLaksIfxdWZUyza
+        5F5Yfpe4ujG91SXnWeGbi6s3p9xvG18pcba8q3tcSoyv2Ire1d029xN3famM64ieHPrSr+JNeNe2lOK7
+        XyQSuPpLOFlcu1KIIypWEVdvaan7bByr5spTebu465jNi8X9vfla6n4b9cGEXxDOLfXREeGRMrmOA8X9
+        dymcIZPraqpniGt/anGEw1bi2lDKu8W1LYUfubGTgi0EAAAAAABVi4YPBXe99WFebp+QbWVy3Zi7rcXF
+        N5VLxdWbW84dGH4grs6cUr8t6DxGXN2Y3sPFxTKFv4mrM7ctxLUnpd3F1T0uucfXReLqbaNXibvGVD4j
+        rt426kO/imSkC8W1L6WXiau/lJzfKcIDxdVbWuo++0bJuXtF7Aazmbhrmckx4v7efD3c/Tbqgwm/GJxT
+        jqMjjpWp9TxG3H+bQiRfrC1T62ySOMrhfHHtT+0F4tpQ0n3EtW2u/iVnSuzgcYS8Ue7sxk4KthAAAAAA
+        AFQtGj4UjLcB3cO9XM6QOBP5/hLbGE9uC2b3PHFxTeXL4urNLbaadu1J4VBxdeb0EnFtSem24urG9JaK
+        i2UKR4urs4TTxLUplXGMoZnkHl9fEFdvG31N3DWmsp+4etuoD/2qxO4Lf5A4usTVX8qe4tqWSsTR1Vta
+        6j4buwh9fEpZahPirmUmfxH3t+YjdmFaw/026oMJvxic06HiFo7nKxacN5Wp9Wwk7r9PZeqOD02zn7h2
+        p3ayxFEVrg0lLSeXimvjMjdIHDXyI/mMvEOeL7vLvWQdN0ZysoUAAAAAAKBq0fCh4PLyT3EP+XK7RuLt
+        +ANlD5nPW1l982lxsUxlHG9N5t7ifB9x9eZ0rLi2pPI7cfViZt8TF88UXiiuzhIOEtemVCLxzNU7LrnH
+        V2xX7uptmzhy6HJx15jKPcTV3UZd71fRHyK5wLUtpb3E1V/SPcW1LZVDxNVbWso+G9/Jo49sKP+6tSyX
+        2DnCXY+zkbi/MV+nuN9FfTHhF4NzeYi4heWFeKm4usIF4v5NCgeJq7MJYjE/9S4X07mfuDaMw5FyinxJ
+        3i8vl71lR9lYRhIt3JgoyRYCAAAAAICqRdWHg18U95BvHGKxJRYZ3yNPlrtLnPE7tc199WdxcUtlibh6
+        c1lTYjHetSWFm2Q9cXXnFFuFu/akcpi4ejG9xZLzfPttxNVbwuPEtSmVeGN1ZXF1j0Pu8XUfcfW2TXx+
+        uutLJT6vIwnS1d1GXe9Xu4hrV0pnShP6RHzuu/al8i1x9ZaWss+eIsv+7mtvLcvlhzL5OmbyWHF/Y77e
+        534X9cXUBd2M1pB4+90tgs/X6bJYXH3hOHH/LoWfiKuzCXYT1+bUviqu/tZwY6IkWwgAAAAAAKoWVR8O
+        xtty7iFfU8SZuSfLh2VfuYtMvYY+2ERcfFL5t8Qir6s7h7XkBHFtSeW74urO6c7i2pLS3+X0homt6lcR
+        F5Mm2EFcLFOIXWzGuWh3N3HtSune4uouLff4iiSXriTNxfEO7hpT+bq4etuoD/0qjrlxbUspEk9d3aXF
+        EWWufanEZ56rt6TUffZwWfa347M8d8JsJCZMvp7pvFPcv5+vPd3vor5wi7qZfEjcIvh83SzxZr2ra5nX
+        i/u3KfxHVhFX77h9XlybU9tJXP2t4cZESbYQAAAAAABULao+HIxF6/PFPehrqsvkm/Ia2VH6sEtDHIXg
+        YpHK98XVm0Ps9HC2uHakNI6trJ8hri19EG/4upg0wUvFtTmFmItcnaWsLq5dKdVdbMot9/j6jrh62yjO
+        mnfXmEp8/rp626jr/WoNybkDTbhEVhJX/zi4NqZyjrg6S0rdZyPhafLff4K4/y6VOM4kEk0m1+nEbg3u
+        38/XBu53UV+4Rd0Mchwdcbi4uibbVdy/TeVB4uodp7XkWnHtTelUcfW3ihsTJdlCAAAAAABQtWj0AWHs
+        bOAe9LXFlRJvg8YZ03cSd41t90Fx157KUnH1phJnKz9QjpGbxbUhpVhgKLmjxDJHimtP18U9XVtcTJog
+        51E5sd22q7Ok2KnGtS2V/cXVW1ru8fVGcfW20V/EXWMqDxBXbxt1vV/tKa5dKb1LXN3jkDup60Jx9ZaU
+        us/GLkWT/358Z/uJuP82lQNkcp1TxXe42B3M/dv5ONv9JuoTt6ibWI6jIy6RdcTVN9m64v59Kq8TV+84
+        7SOurantL67+VnFjoiRbCAAAAAAAqhaNPiSMB5U/EPfAr41+K2+T7cRdbxvFlsXuWlN5uLh65yP600YS
+        C1zxVt9R8ldx9eYSbye6tuVWYmeJJoqzz108muJice1OYSdxdZZ0ubi2pZI7wamu3OPrIeLqbZtNxV1f
+        KtfJyuLqbqOu96uPiWtXSvcUV/c4rC+ujanEsUGu3pJS9tkbxI3n7SVnwuk/ZKbExzi6yP27+TrS/Sbq
+        E7eom1jqoyPCvuLqcv4o7m+kcLy4Osfp0+LamtJNsoG4+lvFjYmSbCEAAAAAAKha5B8UbiwXiXvo12aR
+        zBBvD68p7rrbYC25Sdz1pRIL0JEkMV9/knjjN473yN3W2Zwqy4uLZU63E9eePjhCXEya4K7i2pzCfyTO
+        C3f1lhQLQa59qTTh7erc4ysW8VYTV3fb5D5y6Mfi6m2jDcRdYypN6FfnimtbKnEcgKt3XO4hrp2pjDuB
+        IfVc+Ctx9YRIQHX/JpX3iKs3PF/cv5mvZ7jfRH3iFnUTynF0xA9kOXH1OUeL+zspXCkriKt3XC4U19aU
+        fiyu7tZxY6IkWwgAAAAAAKoW+QeFIbaQ/Ze4B39tFw+c4y3iSAZw195ku4m7Joy6UeKtQRfH3B4nrk19
+        8ExxMWmCZ4lrcwo/FVdnabnn7UPE1VtS7vF1krh62+hD4q4xlbeLq7eNut6vYjck166UmnR8RMj9nek8
+        cfWWkrrPxnzh6gmR3Hy1uH+XQiQB3lFc3Z8S92/m687uN1GfuEXdRHIcHXG93E1cfdN5ubi/lcp24uod
+        hy3EtTG1V4mrv657yekt8Cu5uxs3qdhCAAAAAABQtcg/KFzmgXKluId/XXCJxIJmHHPgrr+J4jgMdy0Y
+        9QZxMSzhfeLa1Ad3ExeTJviEuDancJC4OktaUVzbUprpLdlSco+vJlxjKmeIu8ZU/p+4etuo6/3qUeLa
+        lVIkDLi6xyV23XLtTOU34uotJXWffZK4epZ5k7h/l8rnxdUbO3u4/34+Yoc5+5uoTyb8AnMKOY6OeJu4
+        umbyIHF/K5UDxNU7Dk8U18bUthZXf10RM/d3m+h9btykYgsBAAAAAEBVPMSbxb0kjgNwDwG74tuyobjr
+        b5ofirsGVH1RxnF0xDKniGtX18XxBU1OCPqjuHansLu4OkuKt1dd21KK3Wtc3SXlHl97iKu3bWKXoZzn
+        1sffbuNORtPper96rbh2pRK7Hq0hru5xOUxcW1M5QVy9paTus3cSV88yq8r54v5tKveTyXWuI+6/m69j
+        xf4m6pMJv8C8UDmOjviTrCquvpmsLjeJ+5spfF5cvePwdnFtTOkv4uqei5zHeqS2lxs3qdhCAAAAAABQ
+        FQ/xalhXviTuQWBX/F3i2Ax3/U2xklwrrv0YigWFcZ4zHgs4sZDj2tZ13xQXkyaIJCXX5hRiITcWWVy9
+        JT1EXPtSOkBc3aWUGF/ri6u7bWJ3BHd9qcTuDq7eNupDv/q4uHalcrq4esfpZHFtTSWONnD1lpC6z14s
+        rp6pniju36cSxzFNToTcRdx/N18vFvubqE8m/ALzQuQ4OiL8P3H11fE7cX8zhYvE1TkOXxLXxpTif67u
+        uThf3N9uovXduEnFFgIAAAAAgKp4iDcHe0nuN6/GKc72fai4a2+CeCvNtRtDx8s4kxfCw8W1rQ/GeWzH
+        bGL+cm1OYdzbiC/zMnHtS+kJ4uouJff4OktcvW30dnHXmMpM5+W3TR/6VST3ubalMiGu3nGJ7wK5k1Le
+        LK7uElL32ePE1TNVJBf8TNzfSGVvWVbf628tS+U+Yn8T9cmEX2BeiI+KWwheiC+Iq6uuT4j7u6lsKa7e
+        0k4V176U9hNXd12bivu7TfQ7N2ZSsoUAAAAAAKAqHuLNUWwf+xKJHQvcg8G2u0ruLe7ax+1V4tqMgTgL
+        egVxsSsptth37euDJicAHSKuzSl8RFydpX1GXPtSuq+4ukvJPb4+Kq7eNvqRuGtMZR9x9bZRH/rV78W1
+        LZU4osLVOy4lkgnHmdCVus++Wlw9zhJxfyOVcyV2HYu6vnxrWQqRqHzL90T3m6hPJvwi83ztKm4heCGu
+        kk3E1VfXC8X97VSeIa7e0i4V176U7iGu7rqeIO7vNtFhbsykZAsBAAAAAEBVPMSbp3iwGIsX35WbxD0o
+        bKvz5LbirnucviquvX0XyTSPFhezcfieuHZ2XcwDTTv/fLJfimt3Ck8SV2dJ8VZsicSy24irv5Tc4+up
+        4uptm/iMvk7cNaayqbi626gP/SqOCHBtSyWOFnD1jkskNbp2pnQ3cXWXkLrPPkhcPdOJHTfc30nl5RL1
+        XDCpbKG+I7e03/0m6pMJv8g8H7eRHEcDvERcfXOxg7i/ncrHxdVb2s3i2pfKDbKiuLrrer+4v91E+7gx
+        k5ItBAAAAAAAVcse5C3QBvJ8OVFuEPfQsG3Gea6xE4uT/xDX1r76j7xX1hIXs3FYLPGGn2tv150mLiZN
+        kPt8+83E1VvStuLaltKfxdVdSonxdSdxdbfN/cVdXyp/EVdvG/WlX/1TXNtS2VlcveMSb/G7dqZyhSwv
+        ru7cUvfZ+O4eO6y5uqYTCUzXiPt7KUR/veeUsoV6k9zSfvebqE8m/CLzfBwhbhF4IU6TxeLqm4uVJRbf
+        XR0p/FFcvSWtLa5tKZ0lru65+IW4v91EG7oxk5ItBAAAAAAAVcse5CUUb+fuIYfLOeIeILbFDuKucRzu
+        Lq6NfXStvF+asGg8Ve5tlZvsw+Ji0gS7imtzCueLq7O0t4trX0rjPuM+9/iKHSxcvW0U28G7a0xl3H0h
+        pfisd9eYSlP6lWtbSncVV+84xFFgro0pfV1c3SWkngt/Ia6e2eQ+euW3pmwh/nvMlftN1CcTfpF5rnIc
+        HRG7CdxXXH3zcYq4elLZUFy9pawvrl0pHSeu7rpWkxvF/e2mOduNl9RsIQAAAAAAqFr2IC+jjWRvOVRi
+        C/c27dBwnLhrGof9xLWxT/4q8bB8PXExaoKXiWt7Sqc31P+Ii0kTvEVcLFP4jLg6S4q3gCORwrUvpeeJ
+        q7+U3OPrGHH1ttHXxF1jKvGZ5Opto770q9i1yLUvlc3F1TsO8Z3TtTGlA8TVXULqPhvxcvXMZjX5m7i/
+        2TSxC1O095a2u99EfTLhF5rnItfRER8RV998HSaunlT2EldvKZuLa1dKscuGq7uuB4v7u030MTdeUrOF
+        AAAAAACgatmDvIJWlu3lOXKYnCK5H6rPVzzs3FDcdZSW+6zhpootkmPx59GygrjYNMmXxF1HKr8XVy9m
+        doK4eKbQhIXcR4lrW2q3F1d/KbnH1/7i6m2bSGi5XNw1phK7Arm626gv/Sr3MVTriKu3tPieeZm4NqY0
+        zmNBUvfZJ4qrp44ni/ubTXOy/Lfd7jdRn0z4hea5yHF0RIhjGU5P6O/i6knl/eLiU8p64tqV0nvE1V3X
+        a8X93SZ6ihsvqdlCAAAAAABQNflh3hitKLHd77KkhlPlJnEPIEt7trg2lxbnjbv2dc118jN5t8SibCxE
+        uHg01SXiriuVj4qrF9OLs8JzntN9D3H1lvRjcW1LKXbQcXWXlHt8bSeu3raJPumuL5VIjlhOXN1t1Jd+
+        lft7xNri6i3tmeLal9KvxNVdSuo+u5DdM2IuiCMo3N9tkvfIf9vtfhP1yYRfaK4rx9ERbXWquBiVsqq4
+        dqW0VFzddX1d3N9tok3deEnNFgIAAAAAgKrJD/MaZg3ZRf5Xvi/j2qXhU+LaV9Km4tqWShzr4Y4ESOkk
+        OVG+IrGjwpHyLnmVPF0eJneQeHPYxaAN4vxvF9+UniqubkzvvuJimUIs5I67z8aZ3q5tqb1UXP2l5B5f
+        V0kbdnmpI/eRQ3E8hau3jXL3qyulKf0qkkNdG1PZTFy9pf1aXPtSGud8mLrPxhEQrp65uL+4v90ke8h/
+        2+x+E/XJhF9oriPX0RFtdZNETFysSok2uLalspAdGJaTf4j7u01zrhsrOdhCAAAAAABQNflhXsOtLnGM
+        QLyBHgtN7uFkDvEg3LWnpH3EtS2VeHvb1Yu5eZa4+KZ0R3F1Y3ovFxfLFL4urs5S4s3X2BnBtS2lSCBb
+        T1wbSsk9vo4XV28bfUbcNabyanH1tlGf+tXnxbUxldhJy9Vb0m7i2pZS7BS1rrj6S0jdZ48WV89cfU7c
+        32+K9eW/7XW/ifpkwi8215Hr6Ig2201crErJfUzGZ8XVW8edxf3NJjrKjZUcbCEAAAAAAKia/DCvRVaT
+        l8nV4h5SpnSFuDaU9CFxbUvlHeLqxdx8Qlx8U7lAXL2Y2ZfFxTOF14irs5QSSTOhCTvR5B5frxdXbxud
+        J+4aU4m3rV29bdSnfvVmcW1M5bHi6i2l1FEGHxdXfymp++wLxdUzV7EDx7Xi6hi3s6TSXvebqE8m/GLz
+        bDg6wjtQXLxKOVFcu1L5tbh664gdGI6S0xP5p7g2pvB0N1ZysIUAAAAAAKBq6gO9STaQOEf7ERLb1sdC
+        3fsltv+PN/b/IBuJ+7elbC/xJpx7WJmSq7ukM8S1K5X/J65ezM0fxcU3lVRvSfbNpeLimcIDxNVZwoby
+        T3HtSu3u4tpQUu7x9WBx9bbN7cVdXyrxmbuSuLrbqE/96gni2pjKW8TVW0okULh2pXSz3E1c/aWk7rPb
+        iKtnPqIPuDrG7QiptNX9JuqTCb/YPJO1haMjvB+Ki1kph4trVyo3y7ri6i5pDblMXBtT2NyNlRxsIQAA
+        AAAAfbZoydIVZRNZInEcw/NkqRwmX5WTJc7CvV7cA8CpYheEygPBMThUXNtScvWWspbEA3PXrhTib0cd
+        rm7UF4vJLr4pvUhc3ZjeVuJimUIs5K4srt7c4k3jb4hrV2pfFNeGknKPr/jMW1Vc3W3zRHHXmMqPxNXb
+        Rn3rV5uKa2cqPxRXbwkxF+dORglxTIKrv5TUfTaS4JYXV9d8xHFvfxdX1zg9TSptdb+T+mTCLxDPJN6i
+        d4u+mJi4TlYSF7cS9hfXrpSeJ67ukt4qrm0p/NWNk1xsIQAAAAAAfbNo8GAyFqAuEfdQbyHOl3G/ibmP
+        uLalcpW4ekuJ3RFcu1KJ3R1cvZibx4uLb0op35Lsi+eIi2UK41zIfZu4NqV2g9xZXBtKyj2+fi6u3jb6
+        sLhrTOXt4uptoz72q9g9y7U1hZskFthdvbnFUViuTSnFfLiluPpLSd1nvymunoV4uri6xmkLqbTT/Wbq
+        kwm/QDyd3cUt+mLoAeJiV8J24tqU0pkSx0G4+kvYSiJRxLUthQk3TnKxhQAAAAAA9M2iwcNW9zAvlXGf
+        AZ97gf/P4uotJRaLXLtS+ZC4ejE3cbyKi28qV0rKtyT74pPi4pnCOBZyY+eF3OfYT3awuHaUlnt8vUtc
+        vW30a3HXmMpu4uptoz72q2iTa2sq4zhGIo46y7lT1TLvFld/San77GvF1bMQ8V3ll+LqG4cLZaSd7jdT
+        n0z4RWInjo64QNyiL4ZeIy5+JSwvl4hrV0rPFFd/bivLKeLalMqz3TjJxRYCAAAAANBHi/Juq/sfua+M
+        PBws5A3i2pXKt8TVW0q85e3alUrsYOHqxdz8Slx8Uxl3P2yrP4mLZwqRPOXqzGVt+YK4tuRwnqwhri2l
+        5R5fjxFXb9tEH8m5kBtv2HfpyKE+9qt7iWtrKv+SjcXVnUNcTyT4ubakFDuOrSmuDSWl7rMPFFfPQsXf
+        dfWNw+dlpI3u91KfTPiFYoejI+r5urj4lXKEuHaldLlsJq7+XGLXh0+Ja09KW7pxkostBAAAAACgjxYt
+        WXqIuId6qVwq28rIA8LMYnHtb+LalEq87ezqLiGO54hz9l27UtlEXN2oL/phLOy5+KaS4y3JrttIXCxT
+        iEXiUgu58TbrvhJvkbq25BJvNbv2lFZifN1WXN1t80hx15fK6eLqbaM+96uTxbU3le/KCuLqTuneEt8/
+        XRtS21VcG0pK3Wfj++Uq4upK4Rhx9Za2v4y0z/1e6pMJv1g8FUdH1HeFxE4ILo4l7CSuXamdKmuJa0Nq
+        Ec+PiGtHShe5MZKTLQQAAAAAoI8WDc7Odw/1Uoq37p4gIw8JM1lZviGuLSk9SFz9JdxfXJtSGffxGF0R
+        CxsuvintJK5uTG9vcbFM4Qxxdaa0ujxTfieuDTm9T1ybxiH3+DpTXL1t9A5x15jKB8XV20a5+1WMW1dv
+        EzxeXJtT+oysKK7+FJ4k/xZXd2pN6fep++xPxNWTyuaSOwm3ju1kpH3u91KfTPgF48k4OmLu7iUuliXE
+        TgW/Edeu1H4m64lrRyqRJPFVcfWndrQbIznZQgAAAAAA+mrRkqU/FPdgL7WvytYy8rAwobtL7q2fw18k
+        zpx3bSjh1eLalcqnxdWLuYkzv118U4ljWnK+JdlVh4qLZwofElfnQt1Oni6x5fVV4urO7SSJBDHXvnHI
+        Pb4OE1dvG/1Y3DWm0qUjh/rcr2JXl9hNw7U7pTgC607i2jBfm0nJo3Tiu2ZT5sPUffYgcfWklDupajbx
+        OWp3A3G/lfpkwi8aT8bREXP3QnGxLOVp4tqVw/nyCHHtWKg95a/i6s1hPzdGcrKFAAAAAAD01aIlSx8l
+        7uFeDrG9euyOEG9Ax1vEIw8O5ym2Cz5KbhRXb2pLxbWjlK+Ja1cqzxVXL+bmBHHxTSX3W5Jddaq4eKaw
+        kIXcOBomFuF2lD3ljXKsnCOurpL+LnH0hmv3uOQeX08RV2/bxCIrRw7V1/d+9TBx7U7tWokdXRaayBDH
+        lH1UrhdXTw6XyB3EtWccUvfZOHLG1ZPSmnKRuPpLOF5cu+xvpT6Z8AvHy+Q6OuJfcvoYXS6uXakcLS6e
+        pawgvxPXtlxOlEfJiuLaVNfKsrecJK6enLZyYyQnWwgAAAAAQJ8tGpxL7B7w5RRvj58o8RbWU+WBsrGM
+        PEycIv6b+G/jbeSPyB/F/f1crpT1xLWthNj54XJxbUvlbuLqRn2xRfY14uKbSvSDeFu2bey504XcRnKe
+        b3+2uGt24qiW2M3lCvmnuL/XBDHnxXFDLp7jUmJ8xTbnru62eYC460ulS0cOLRb61ZKlE+LansvJcqBE
+        Qm0kNEx3xEQked1LIlEsdtKJ+dP9vZwiGahJRzelngsj0XhtcXWlFkchuTaU8AZxbbK/k/pkwi8ih5xH
+        R8QOAa7OUt4srl2pRNxcvSU9TFzbcrtUIoHjBfIg2UDiWAvXxrCu7CwvkmPkCnF/N7do93JujORkCwEA
+        AAAA6LNFS5beQ24Q95BvHGIx70KJhZFIUDj/1rImnJn7Uhl54FlQ3CvXrlQuk3Eej9EV8Ra9iy+WLP2b
+        uJiVsJu4NsGLhbEmLdYtk3t8jbOPpvYacdeYSpeOHKJfDawj0VZ3DaXELgeRoBA70ERbIpHK/XclRfLb
+        48TFbFxS99lfi6snhziyJOeOSDPZWVyb7O+kPpnwi8oh19ER8ab+TAvaJeTaWWKyO4qru6QjxbWttBvk
+        7/IX+b2cI5fIdeL++3E41o2P3GwhAAAAAAB9t2jJ0teLe8iHoZ+LPTO3oP3EtS2Vr4irF3PzCnHxxZKl
+        R4uLWQnxlq9rE0bFgmETkxdC7vE1zj6a2tfFXWMqzxNXbxvRr4ZiYbzksQxNF8kLTxYXq3FK3Wc/LK6e
+        XB4krh05Rb9eTVx77G+kPpnwC9+5Fvivl63F1VnShuLal9JTxdVd0hpylrj2oepFbnzkZgsBAAAAAOi7
+        RYM3ob4h7mEfliy9VOJ8+pGHnYV9Rlz7UomH4a5ezM1x4uKLJUtfJC5mJcSxNa5NqIodcLYXF8MmyD2+
+        Xiiu3raJz/XcRw5tLa7uNqJfVe0r7jr6JpIXniUuRuOWus/G8Ryunpy+JK4tuZwkrh23cL+R+mRidNH7
+        tnKhuEXehXqbuDrH4XxxbUzlCHH1lraVXCmujRi6pxsfudlCAAAAAABwSxLDmnKauAd+fRbbqN9fRh50
+        jsF54tqYSrx16epFfXEERyS8uPhiydJ7iotbbnF+eu7z7bsgPgOakKw1nRLjaxtxdbdN7iOH/iFdOXKI
+        fuW9TNy19EW8rb+XuNiMW44+u6m4unK6k/xHXHtyeJe4dtzC/T7qk4nRBe/PiFvgXahzZVVxdY7Dl8S1
+        M5XY+cDVOw47yTXi2omJictleTc+crOFAAAAAABgYNGSpetLnIHrHvr1USx4PlRGHnKOwe3FtTGVuNYV
+        xdWN+rYSF18M3gaPt8Jd3HLLfb59Fxwmq4iLX1PkHl9xdMa4+mhqzxd3jal8VVy9bZS7X/1T2tqvXiLu
+        mrruEokjDlxMmiB1n/2LuHpKeKe4NuXwGHFtuIX7bdQnE9WF7j3ELfCm8EiZWt84vUZcO1NaX1zd4/BQ
+        IYnBO86NjRJsIQAAAAAAGFq0ZOlacoK4B399Em+23U9GHnCOyRPFtTOVH4irF3PzHHHxxZKlXxEXsxJe
+        Ka5NWLL0ItlTXNyaJvf4+qa4etvos+KuMZVXiau3jehXM4ujBa4Vd21d9CvZXFwsmiJ1n50QV08Jt5GL
+        xbUrtduKa8Mt3O+iPpkYLnDH0REXiVvgXahjZXJdTbCLuLam9FhxdY/LfSTX8SBt9hI3NkqwhQAAAAAA
+        oGrRkqWL5b1ys7gHgF33C2naw+sPi2trKm8VVy/m5pPi4oslS18hLmYlRPKEa1Ofxfz+cZlxQadhco+v
+        14qrt43OF3eNqTQpwW+h6Fez20HiLX13fV3yPokjh1wMmiR1n32euHpKKZH8eaa4uv/L/Sbqk4nh4nau
+        oyP+JZvK5LqaYC1x7U3pYHF1j9PG8hNx7W2ruJ63Timbi3u7sVGCLQQAAAAAAFWTHuY9RM4T9yCwi26S
+        A6WJRynkPtpjV3H1Ym7+JC6+WLJ0ibiY5RZnhV8mrk199TMZ1/1YiNzjaydx9bbNZuKuL5V4G78Ni7x1
+        0a/qWUc+L+4a2+6P0qb7lLrPbi2unlJWkNzfcw8XV/d/ud9EfTIxWNTOeXTES2XyAnqT/FFcm1M5RVy9
+        47ZYXi//EdfuNnmfrCT3mFQ2F1fKCm5slGALAQAAAABA1ZQHemtKLOpfI+6BYFecJE1d0Ftbcu6GEYkb
+        a4irG/VtLC6+WLL0aomdXVzccouFGdemPjpNHi0uTk2Xe3z9R1YRV3fbPEncNabyQ3H1ttFG4q4xlS71
+        q2X2kgvEXW/b/FteJ226R6nnwn9IJPq5ukp6qLj2pbKvuHr/y/0m6pOJvEdHnC6xWD51Ab0pcu06scyN
+        soa4uptgK/m5uLY33fmyqyy7luXkYnH/7Uy+7sZFKbYQAAAAAABUuYd6sol8RLp2DnJssx0PNZvw8HY6
+        jxTX9lTivGdXL+bmCeLiiyVLvyMuZiXE1tiuTX1yguwmTZ7nZpN7fP1UXL1tFJ/V7hpTeZu4etuIfjU/
+        y5JbIznNXXfTRWLJIRIJLO76mix1n40jllw943CcuDamcEdxdf6X+03UJxP5FvFvlh1l2QJzE8XuEK7t
+        Ke0iru6miIX/J8m54trfNNfLu2VNmXotR4v7NzN5hRsXpdhCAAAAAABQ5R7qTbK+/K9cKO4BYVv8UuIt
+        1XG9FT4X7xB3DanEQ3xXL+bmA+LiiyVL3yAuZiV8Wlybui7m6IPlbuLi0ja5x9dB4upto9+Iu8ZUIhnG
+        1dtG9KuFuZ1EIkNbjum5XOI7Vexi4K6nDVL32VeKq2cctpTrxbVzIWLHEFdfhftN1BcTeY+OOFymLjA3
+        zQPEtT2lN4uru2niGIb9pamJDJG4cJhsJq79YT9x/3Ym93VjoxRbCAAAAAAAqtxDPSPOq41FjM9KW97A
+        u1jiwe+O4q6pqX4s7npSie2gXb2Ym9ie38UXS5Y+WFzMSvizuDZ1UZzjHglJsRV3zNEuHm2Ve3w9Sly9
+        bbOO5D5yaC1xdbcR/SqNVeX5crK4OIxT9NnYheYpEu107W+T1H22ad+J3yOunQtxtLi6Ktxvoj6YyHt0
+        xCWyjkxdYG6a1eUmcdeQygni6m6q5SUSW6LdsYuGu6aSLpODZabEhWXuLO5vTOdqWezGRym2EAAAAAAA
+        VLmHerNYWXaV98vvxT08HIdYxImdFt4pbV3Qix0ich/bsaG4ulHf6hKLJC6+fXedjOt88ejbrk1tFzE9
+        S74u8Tbx3tLGrdDryj2+4rNiXXF1t00kFrprTCUWT129bUS/ymMLeY3E969xfS7+W2J+3E82ENfONkrd
+        Z6+RlcTVNS5ry6Xi2jtfLxRXV4X7TdQHExMT75i0kJvavjJ1cbmpfi3uGlL5t6wgru6m21heLidJyWSG
+        iNlX5PESO0O4tk3nb+L+pnO8Gxsl2UIAAAAAAFDlHurN0W1ld4ltheM823grOPdD7BvlHPmCvF4eKV1Z
+        OHiLnJ7Jt8TVibl7t7gY992EuHiVcrhEO/4gf5mj8+Sf8xAJBm6eCvF/m/zfxpbmUdfvJBb8TpSvyeck
+        doyJ4zdiEe7xcn9p89bnC5FzfDXpDPiFijfMvynuOlMY53EwOeTsV/H9x9XZJ7FbR+xCEW/V/0hivnPz
+        4kL9Sb4kr5YHSCTWuvZ0Qco+e5S4OsbtGeLaO193F1dPhftN1AcTExPbyukZfE6Wk6kLy011oLjrSOVN
+        4uptm3Uldmb4gPxKrhGXFDAf/5Ify3vl4bKyuDbUEf9zdTivcWOjJFsIAAAAAACq3EO9BOIN7DiL/RHy
+        bHmTHCpxPn28JReLdj+TqQ8dT5H4v4VYDDhS4uHta+WZEjsr3ElWFFcvAAAAmiF2i3m4PEteJx+SSD79
+        nsR3vfjeN/l7YOz6EeWRaPQpiV21XiaPk21lDXH1AHPifhP1yYRfBAZmE7tKxJENe8oBcpB8Sr4tJ8rJ
+        siyJ45e3lh0vkeDyTtlfHit3lTi2wtUxH3vJ5ASSmezgxkRJthAAAAAAAAAAAAAAAKAkWwgAAAAAAAAA
+        AAAAAFCSLQQAAAAAAAAAAAAAACjJFgIAAAAAAAAAAAAAAJRkCwEAAAAAAAAAAAAAAEqyhQAAAAAAAAAA
+        AAAAACXZQgAAAAAAAAAAAAAAgJJsIQAAAAAAAAAAAAAAQEm2EAAAAAAAAAAAAAAAoCRbCAAAAAAAAAAA
+        AAAAUJItBAAAAAAAAAAAAAAAKMkWAgAAAAAAAAAAAAAAlGQLAQAAAAAAAAAAAAAASrKFAAAAAAAAAAAA
+        AAAAJdlCAAAAAAAAAAAAAACAkmwhAAAAAAAAAAAAAABASbYQAAAAAAAAAAAAAACgJFsIAAAAAAAAAAAA
+        AABQki0EAAAAAAAAAAAAAAAoyRYCAAAAAAAAAAAAAACUZAsBAAAAAAAAAAAAAADK+b9F/x9qbIygM988
+        TgAAAABJRU5ErkJgggs=
+</value>
+  </data>
+  <metadata name="$this.ScriptEditorPositionForUndo" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>0, 0</value>
+  </metadata>
+  <metadata name="$this.ScriptEditorPositionForRedo" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
+    <value>0, 0</value>
+  </metadata>
+</root>
--- a/SDL/Speditionsbuch/Nacherfassung/rptSpeditionsbericht_HandlingAussenstellen.vb
+++ b/SDL/Speditionsbuch/Nacherfassung/rptSpeditionsbericht_HandlingAussenstellen.vb
@@ -0,0 +1,9 @@
+Imports GrapeCity.ActiveReports 
+Imports GrapeCity.ActiveReports.Document
+
+Public Class rptSpeditionsbericht_HandlingAussenstellen
+
+    Private Sub GroupHeader3_Format(sender As Object, e As EventArgs)
+
+    End Sub
+End Class
--- a/SDL/Speditionsbuch/usrCntlSpeditionsBuchSuche.Designer.vb
+++ b/SDL/Speditionsbuch/usrCntlSpeditionsBuchSuche.Designer.vb
@@ -38,7 +38,6 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.Label25 = New System.Windows.Forms.Label()
        Me.txtPackstücke = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.Label36 = New System.Windows.Forms.Label()
-        Me.Button12 = New System.Windows.Forms.Button()
        Me.Button11 = New System.Windows.Forms.Button()
        Me.Label15 = New System.Windows.Forms.Label()
        Me.Label33 = New System.Windows.Forms.Label()
@@ -56,8 +55,10 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.dgvLKW = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
        Me.pnlOpt = New System.Windows.Forms.Panel()
        Me.pnlBerichte = New System.Windows.Forms.Panel()
+        Me.Button20 = New System.Windows.Forms.Button()
+        Me.Label46 = New System.Windows.Forms.Label()
+        Me.Button19 = New System.Windows.Forms.Button()
        Me.Button18 = New System.Windows.Forms.Button()
-        Me.Label43 = New System.Windows.Forms.Label()
        Me.Button16 = New System.Windows.Forms.Button()
        Me.Button17 = New System.Windows.Forms.Button()
        Me.cbxFilterInBericht = New System.Windows.Forms.CheckBox()
@@ -83,6 +84,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.CheckBox2 = New System.Windows.Forms.CheckBox()
        Me.Button10 = New System.Windows.Forms.Button()
        Me.cbxSpedDetailBem = New System.Windows.Forms.CheckBox()
+        Me.Label43 = New System.Windows.Forms.Label()
        Me.pnl = New System.Windows.Forms.Panel()
        Me.Button15 = New System.Windows.Forms.Button()
        Me.Label32 = New System.Windows.Forms.Label()
@@ -142,8 +144,8 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.DateTimePicker1 = New System.Windows.Forms.DateTimePicker()
        Me.cbxCMR = New System.Windows.Forms.CheckBox()
        Me.Label41 = New System.Windows.Forms.Label()
-        Me.lstGrenze = New VERAG_PROG_ALLGEMEIN.MyListBox()
        Me.txtKdAuftragsNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.lstGrenze = New VERAG_PROG_ALLGEMEIN.MyListBox()
        Me.Label40 = New System.Windows.Forms.Label()
        Me.Label9 = New System.Windows.Forms.Label()
        Me.Label8 = New System.Windows.Forms.Label()
@@ -164,8 +166,13 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.Label24 = New System.Windows.Forms.Label()
        Me.Label16 = New System.Windows.Forms.Label()
        Me.cbxOderEmpfanger = New System.Windows.Forms.CheckBox()
+        Me.Panel2 = New System.Windows.Forms.Panel()
+        Me.MyComboBox1 = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.lstFilialeHandling = New VERAG_PROG_ALLGEMEIN.MyListBox()
+        Me.Label45 = New System.Windows.Forms.Label()
+        Me.cboFilialeHandling = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.SplitContainer = New System.Windows.Forms.SplitContainer()
-        Me.Button19 = New System.Windows.Forms.Button()
+        Me.cboHandlingssatz = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.cntxtCntxtSpeditionsbuch.SuspendLayout()
        Me.pnlRechts.SuspendLayout()
        CType(Me.DataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -182,6 +189,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.SplitContainer1.Panel1.SuspendLayout()
        Me.SplitContainer1.Panel2.SuspendLayout()
        Me.SplitContainer1.SuspendLayout()
+        Me.Panel2.SuspendLayout()
        CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SplitContainer.Panel1.SuspendLayout()
        Me.SplitContainer.Panel2.SuspendLayout()
@@ -193,7 +201,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.TabPage1.Location = New System.Drawing.Point(4, 25)
        Me.TabPage1.Name = "TabPage1"
        Me.TabPage1.Padding = New System.Windows.Forms.Padding(3)
-        Me.TabPage1.Size = New System.Drawing.Size(1175, 0)
+        Me.TabPage1.Size = New System.Drawing.Size(1212, 0)
        Me.TabPage1.TabIndex = 0
        Me.TabPage1.Text = "Abfertigungen"
        Me.TabPage1.UseVisualStyleBackColor = True
@@ -226,7 +234,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.txtAvisoId._WaehrungZeichen = True
        Me.txtAvisoId.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtAvisoId.ForeColor = System.Drawing.Color.Black
-        Me.txtAvisoId.Location = New System.Drawing.Point(353, 188)
+        Me.txtAvisoId.Location = New System.Drawing.Point(353, 192)
        Me.txtAvisoId.MaxLineLength = -1
        Me.txtAvisoId.MaxLines_Warning = ""
        Me.txtAvisoId.MaxLines_Warning_Label = Nothing
@@ -238,7 +246,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        'Label39
        '
        Me.Label39.AutoSize = True
-        Me.Label39.Location = New System.Drawing.Point(301, 192)
+        Me.Label39.Location = New System.Drawing.Point(301, 196)
        Me.Label39.Name = "Label39"
        Me.Label39.Size = New System.Drawing.Size(46, 13)
        Me.Label39.TabIndex = 42
@@ -247,17 +255,16 @@ Partial Class usrCntlSpeditionsBuchSuche
        'lstFiliale
        '
        Me.lstFiliale._value = ""
-        Me.lstFiliale.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
-            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.lstFiliale.FormattingEnabled = True
-        Me.lstFiliale.Location = New System.Drawing.Point(738, 108)
+        Me.lstFiliale.Location = New System.Drawing.Point(3, 15)
        Me.lstFiliale.Name = "lstFiliale"
        Me.lstFiliale.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
-        Me.lstFiliale.Size = New System.Drawing.Size(114, 56)
+        Me.lstFiliale.Size = New System.Drawing.Size(116, 82)
        Me.lstFiliale.TabIndex = 4
        '
        'kdtxtAuftraggeber
        '
+        Me.kdtxtAuftraggeber._AlleFirmenCLUSTER = False
        Me.kdtxtAuftraggeber._AllowSetValue = True
        Me.kdtxtAuftraggeber._autoSizeGross = False
        Me.kdtxtAuftraggeber._display_Name1 = False
@@ -323,7 +330,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.txtCRN.MaxLines_Warning = ""
        Me.txtCRN.MaxLines_Warning_Label = Nothing
        Me.txtCRN.Name = "txtCRN"
-        Me.txtCRN.Size = New System.Drawing.Size(209, 20)
+        Me.txtCRN.Size = New System.Drawing.Size(241, 20)
        Me.txtCRN.TabIndex = 15
        '
        'txtBelegNr
@@ -357,7 +364,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.cboVersLand.FormattingEnabled = True
        Me.cboVersLand.Location = New System.Drawing.Point(738, 69)
        Me.cboVersLand.Name = "cboVersLand"
-        Me.cboVersLand.Size = New System.Drawing.Size(101, 21)
+        Me.cboVersLand.Size = New System.Drawing.Size(117, 21)
        Me.cboVersLand.TabIndex = 24
        '
        'cboBestLand
@@ -367,15 +374,15 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.cboBestLand._value = ""
        Me.cboBestLand.DropDownWidth = 300
        Me.cboBestLand.FormattingEnabled = True
-        Me.cboBestLand.Location = New System.Drawing.Point(845, 69)
+        Me.cboBestLand.Location = New System.Drawing.Point(861, 69)
        Me.cboBestLand.Name = "cboBestLand"
-        Me.cboBestLand.Size = New System.Drawing.Size(102, 21)
+        Me.cboBestLand.Size = New System.Drawing.Size(118, 21)
        Me.cboBestLand.TabIndex = 25
        '
        'Label25
        '
        Me.Label25.AutoSize = True
-        Me.Label25.Location = New System.Drawing.Point(842, 55)
+        Me.Label25.Location = New System.Drawing.Point(858, 55)
        Me.Label25.Name = "Label25"
        Me.Label25.Size = New System.Drawing.Size(92, 13)
        Me.Label25.TabIndex = 20
@@ -400,7 +407,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.txtPackstücke.MaxLines_Warning = ""
        Me.txtPackstücke.MaxLines_Warning_Label = Nothing
        Me.txtPackstücke.Name = "txtPackstücke"
-        Me.txtPackstücke.Size = New System.Drawing.Size(217, 20)
+        Me.txtPackstücke.Size = New System.Drawing.Size(141, 20)
        Me.txtPackstücke.TabIndex = 41
        '
        'Label36
@@ -412,26 +419,16 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.Label36.TabIndex = 40
        Me.Label36.Text = "Packstücke:"
        '
-        'Button12
-        '
-        Me.Button12.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button12.Location = New System.Drawing.Point(738, 182)
-        Me.Button12.Margin = New System.Windows.Forms.Padding(0)
-        Me.Button12.Name = "Button12"
-        Me.Button12.Size = New System.Drawing.Size(84, 26)
-        Me.Button12.TabIndex = 39
-        Me.Button12.Text = "Alle"
-        Me.Button12.UseVisualStyleBackColor = True
-        '
        'Button11
        '
        Me.Button11.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button11.Location = New System.Drawing.Point(826, 182)
+        Me.Button11.Location = New System.Drawing.Point(826, 164)
        Me.Button11.Margin = New System.Windows.Forms.Padding(0)
+        Me.Button11.MaximumSize = New System.Drawing.Size(100, 26)
        Me.Button11.Name = "Button11"
-        Me.Button11.Size = New System.Drawing.Size(26, 26)
+        Me.Button11.Size = New System.Drawing.Size(22, 0)
        Me.Button11.TabIndex = 3
        Me.Button11.Text = "Keine"
        Me.Button11.UseVisualStyleBackColor = True
@@ -439,7 +436,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        'Label15
        '
        Me.Label15.AutoSize = True
-        Me.Label15.Location = New System.Drawing.Point(735, 93)
+        Me.Label15.Location = New System.Drawing.Point(0, 1)
        Me.Label15.Name = "Label15"
        Me.Label15.Size = New System.Drawing.Size(36, 13)
        Me.Label15.TabIndex = 3
@@ -456,6 +453,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        '
        'kdtxtAvisierer
        '
+        Me.kdtxtAvisierer._AlleFirmenCLUSTER = False
        Me.kdtxtAvisierer._AllowSetValue = True
        Me.kdtxtAvisierer._autoSizeGross = False
        Me.kdtxtAvisierer._display_Name1 = False
@@ -510,7 +508,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.pnlRechts.Controls.Add(Me.Button13)
        Me.pnlRechts.Controls.Add(Me.Label14)
        Me.pnlRechts.Dock = System.Windows.Forms.DockStyle.Right
-        Me.pnlRechts.Location = New System.Drawing.Point(949, 0)
+        Me.pnlRechts.Location = New System.Drawing.Point(986, 0)
        Me.pnlRechts.Name = "pnlRechts"
        Me.pnlRechts.Size = New System.Drawing.Size(234, 217)
        Me.pnlRechts.TabIndex = 35
@@ -606,7 +604,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.DataGridView.Dock = System.Windows.Forms.DockStyle.Fill
        Me.DataGridView.Location = New System.Drawing.Point(450, 0)
        Me.DataGridView.Name = "DataGridView"
-        Me.DataGridView.Size = New System.Drawing.Size(733, 262)
+        Me.DataGridView.Size = New System.Drawing.Size(770, 227)
        Me.DataGridView.TabIndex = 0
        '
        'pnlAnzeige
@@ -621,7 +619,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.pnlAnzeige.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlAnzeige.Location = New System.Drawing.Point(0, 0)
        Me.pnlAnzeige.Name = "pnlAnzeige"
-        Me.pnlAnzeige.Size = New System.Drawing.Size(1183, 390)
+        Me.pnlAnzeige.Size = New System.Drawing.Size(1220, 390)
        Me.pnlAnzeige.TabIndex = 0
        '
        'dgvLKW
@@ -637,7 +635,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.dgvLKW.Dock = System.Windows.Forms.DockStyle.Left
        Me.dgvLKW.Location = New System.Drawing.Point(0, 0)
        Me.dgvLKW.Name = "dgvLKW"
-        Me.dgvLKW.Size = New System.Drawing.Size(450, 262)
+        Me.dgvLKW.Size = New System.Drawing.Size(450, 227)
        Me.dgvLKW.TabIndex = 35
        Me.dgvLKW.Visible = False
        '
@@ -652,16 +650,18 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.pnlOpt.Controls.Add(Me.txtMaxSrch)
        Me.pnlOpt.Controls.Add(Me.lblErgebnis)
        Me.pnlOpt.Dock = System.Windows.Forms.DockStyle.Bottom
-        Me.pnlOpt.Location = New System.Drawing.Point(0, 262)
+        Me.pnlOpt.Location = New System.Drawing.Point(0, 227)
        Me.pnlOpt.Name = "pnlOpt"
-        Me.pnlOpt.Size = New System.Drawing.Size(1183, 128)
+        Me.pnlOpt.Size = New System.Drawing.Size(1220, 163)
        Me.pnlOpt.TabIndex = 1
        '
        'pnlBerichte
        '
+        Me.pnlBerichte.Controls.Add(Me.cboHandlingssatz)
+        Me.pnlBerichte.Controls.Add(Me.Button20)
+        Me.pnlBerichte.Controls.Add(Me.Label46)
        Me.pnlBerichte.Controls.Add(Me.Button19)
        Me.pnlBerichte.Controls.Add(Me.Button18)
-        Me.pnlBerichte.Controls.Add(Me.Label43)
        Me.pnlBerichte.Controls.Add(Me.Button16)
        Me.pnlBerichte.Controls.Add(Me.Button17)
        Me.pnlBerichte.Controls.Add(Me.cbxFilterInBericht)
@@ -679,13 +679,53 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.pnlBerichte.Controls.Add(Me.Label31)
        Me.pnlBerichte.Controls.Add(Me.Button8)
        Me.pnlBerichte.Controls.Add(Me.Panel1)
+        Me.pnlBerichte.Controls.Add(Me.Label43)
        Me.pnlBerichte.Dock = System.Windows.Forms.DockStyle.Left
        Me.pnlBerichte.Location = New System.Drawing.Point(197, 0)
        Me.pnlBerichte.Name = "pnlBerichte"
-        Me.pnlBerichte.Size = New System.Drawing.Size(847, 126)
+        Me.pnlBerichte.Size = New System.Drawing.Size(847, 161)
        Me.pnlBerichte.TabIndex = 6
        Me.pnlBerichte.Visible = False
        '
+        'Button20
+        '
+        Me.Button20.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button20.Image = Global.SDL.My.Resources.Resources.statistik_small
+        Me.Button20.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button20.Location = New System.Drawing.Point(399, 109)
+        Me.Button20.Margin = New System.Windows.Forms.Padding(0)
+        Me.Button20.Name = "Button20"
+        Me.Button20.Size = New System.Drawing.Size(159, 28)
+        Me.Button20.TabIndex = 59
+        Me.Button20.Text = "Handling an Außenstellen"
+        Me.Button20.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.Button20.UseVisualStyleBackColor = True
+        '
+        'Label46
+        '
+        Me.Label46.AutoSize = True
+        Me.Label46.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.Label46.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label46.Location = New System.Drawing.Point(396, 96)
+        Me.Label46.Name = "Label46"
+        Me.Label46.Size = New System.Drawing.Size(61, 13)
+        Me.Label46.TabIndex = 58
+        Me.Label46.Text = "Handling:"
+        '
+        'Button19
+        '
+        Me.Button19.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+        Me.Button19.Image = Global.SDL.My.Resources.Resources.statistik_small
+        Me.Button19.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+        Me.Button19.Location = New System.Drawing.Point(764, 54)
+        Me.Button19.Margin = New System.Windows.Forms.Padding(0)
+        Me.Button19.Name = "Button19"
+        Me.Button19.Size = New System.Drawing.Size(83, 28)
+        Me.Button19.TabIndex = 57
+        Me.Button19.Text = "Fehlende"
+        Me.Button19.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+        Me.Button19.UseVisualStyleBackColor = True
+        '
        'Button18
        '
        Me.Button18.FlatStyle = System.Windows.Forms.FlatStyle.Flat
@@ -700,18 +740,6 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.Button18.TextAlign = System.Drawing.ContentAlignment.MiddleRight
        Me.Button18.UseVisualStyleBackColor = True
        '
-        'Label43
-        '
-        Me.Label43.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles)
-        Me.Label43.AutoSize = True
-        Me.Label43.BackColor = System.Drawing.Color.WhiteSmoke
-        Me.Label43.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label43.Location = New System.Drawing.Point(603, 83)
-        Me.Label43.Name = "Label43"
-        Me.Label43.Size = New System.Drawing.Size(86, 13)
-        Me.Label43.TabIndex = 55
-        Me.Label43.Text = "Bürgschaften:"
-        '
        'Button16
        '
        Me.Button16.FlatStyle = System.Windows.Forms.FlatStyle.Flat
@@ -1042,6 +1070,17 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.cbxSpedDetailBem.Text = "Bemerkung drucken"
        Me.cbxSpedDetailBem.UseVisualStyleBackColor = False
        '
+        'Label43
+        '
+        Me.Label43.AutoSize = True
+        Me.Label43.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.Label43.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label43.Location = New System.Drawing.Point(603, 83)
+        Me.Label43.Name = "Label43"
+        Me.Label43.Size = New System.Drawing.Size(86, 13)
+        Me.Label43.TabIndex = 55
+        Me.Label43.Text = "Bürgschaften:"
+        '
        'pnl
        '
        Me.pnl.Controls.Add(Me.Button15)
@@ -1050,7 +1089,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.pnl.Dock = System.Windows.Forms.DockStyle.Left
        Me.pnl.Location = New System.Drawing.Point(0, 0)
        Me.pnl.Name = "pnl"
-        Me.pnl.Size = New System.Drawing.Size(197, 126)
+        Me.pnl.Size = New System.Drawing.Size(197, 161)
        Me.pnl.TabIndex = 5
        '
        'Button15
@@ -1098,7 +1137,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.btnExcel.BackgroundImage = Global.SDL.My.Resources.Resources.Excel_logo
        Me.btnExcel.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
        Me.btnExcel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.btnExcel.Location = New System.Drawing.Point(1089, 89)
+        Me.btnExcel.Location = New System.Drawing.Point(1089, 124)
        Me.btnExcel.Name = "btnExcel"
        Me.btnExcel.Size = New System.Drawing.Size(41, 34)
        Me.btnExcel.TabIndex = 3
@@ -1113,7 +1152,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.FlatButton7.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.FlatButton7.ForeColor = System.Drawing.Color.Black
        Me.FlatButton7.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.FlatButton7.Location = New System.Drawing.Point(1136, 89)
+        Me.FlatButton7.Location = New System.Drawing.Point(1136, 124)
        Me.FlatButton7.Name = "FlatButton7"
        Me.FlatButton7.Size = New System.Drawing.Size(41, 34)
        Me.FlatButton7.TabIndex = 4
@@ -1155,7 +1194,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        'lblErgebnis
        '
        Me.lblErgebnis.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.lblErgebnis.Location = New System.Drawing.Point(962, 14)
+        Me.lblErgebnis.Location = New System.Drawing.Point(958, 14)
        Me.lblErgebnis.Name = "lblErgebnis"
        Me.lblErgebnis.Size = New System.Drawing.Size(215, 14)
        Me.lblErgebnis.TabIndex = 2
@@ -1219,7 +1258,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.TabPage2.Location = New System.Drawing.Point(4, 25)
        Me.TabPage2.Name = "TabPage2"
        Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
-        Me.TabPage2.Size = New System.Drawing.Size(1175, 0)
+        Me.TabPage2.Size = New System.Drawing.Size(1212, 0)
        Me.TabPage2.TabIndex = 1
        Me.TabPage2.Text = "LKWs"
        Me.TabPage2.UseVisualStyleBackColor = True
@@ -1233,7 +1272,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.tbcntr.Location = New System.Drawing.Point(0, 305)
        Me.tbcntr.Name = "tbcntr"
        Me.tbcntr.SelectedIndex = 0
-        Me.tbcntr.Size = New System.Drawing.Size(1183, 25)
+        Me.tbcntr.Size = New System.Drawing.Size(1220, 25)
        Me.tbcntr.TabIndex = 36
        '
        'Label29
@@ -1258,7 +1297,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.pnlTop.Dock = System.Windows.Forms.DockStyle.Top
        Me.pnlTop.Location = New System.Drawing.Point(0, 0)
        Me.pnlTop.Name = "pnlTop"
-        Me.pnlTop.Size = New System.Drawing.Size(1183, 48)
+        Me.pnlTop.Size = New System.Drawing.Size(1220, 48)
        Me.pnlTop.TabIndex = 2
        '
        'Label30
@@ -1303,6 +1342,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        '
        'kdtxtFrachtfuehrer
        '
+        Me.kdtxtFrachtfuehrer._AlleFirmenCLUSTER = False
        Me.kdtxtFrachtfuehrer._AllowSetValue = True
        Me.kdtxtFrachtfuehrer._autoSizeGross = False
        Me.kdtxtFrachtfuehrer._display_Name1 = False
@@ -1336,7 +1376,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.cboSB_Qs.FormattingEnabled = True
        Me.cboSB_Qs.Location = New System.Drawing.Point(738, 58)
        Me.cboSB_Qs.Name = "cboSB_Qs"
-        Me.cboSB_Qs.Size = New System.Drawing.Size(252, 24)
+        Me.cboSB_Qs.Size = New System.Drawing.Size(241, 24)
        Me.cboSB_Qs.TabIndex = 27
        '
        'txtAbfertDat
@@ -1397,7 +1437,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.cboSachbearbeiter.FormattingEnabled = True
        Me.cboSachbearbeiter.Location = New System.Drawing.Point(738, 31)
        Me.cboSachbearbeiter.Name = "cboSachbearbeiter"
-        Me.cboSachbearbeiter.Size = New System.Drawing.Size(252, 24)
+        Me.cboSachbearbeiter.Size = New System.Drawing.Size(241, 24)
        Me.cboSachbearbeiter.TabIndex = 26
        '
        'cboFiliale
@@ -1408,7 +1448,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.cboFiliale.DropDownWidth = 250
        Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Tai Le", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.cboFiliale.FormattingEnabled = True
-        Me.cboFiliale.Location = New System.Drawing.Point(333, 32)
+        Me.cboFiliale.Location = New System.Drawing.Point(333, 29)
        Me.cboFiliale.Name = "cboFiliale"
        Me.cboFiliale.Size = New System.Drawing.Size(80, 22)
        Me.cboFiliale.TabIndex = 20
@@ -1526,11 +1566,12 @@ Partial Class usrCntlSpeditionsBuchSuche
        '
        'btnSuche
        '
+        Me.btnSuche.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.btnSuche.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnSuche.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.btnSuche.Image = Global.SDL.My.Resources.Resources.search
        Me.btnSuche.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.btnSuche.Location = New System.Drawing.Point(1015, 6)
+        Me.btnSuche.Location = New System.Drawing.Point(1053, 6)
        Me.btnSuche.Name = "btnSuche"
        Me.btnSuche.Size = New System.Drawing.Size(162, 52)
        Me.btnSuche.TabIndex = 28
@@ -1547,7 +1588,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.pnlSearch.Dock = System.Windows.Forms.DockStyle.Fill
        Me.pnlSearch.Location = New System.Drawing.Point(0, 0)
        Me.pnlSearch.Name = "pnlSearch"
-        Me.pnlSearch.Size = New System.Drawing.Size(1183, 330)
+        Me.pnlSearch.Size = New System.Drawing.Size(1220, 330)
        Me.pnlSearch.TabIndex = 0
        '
        'SplitContainer1
@@ -1597,12 +1638,11 @@ Partial Class usrCntlSpeditionsBuchSuche
        '
        Me.SplitContainer1.Panel2.Controls.Add(Me.cbxCMR)
        Me.SplitContainer1.Panel2.Controls.Add(Me.Label41)
-        Me.SplitContainer1.Panel2.Controls.Add(Me.lstGrenze)
        Me.SplitContainer1.Panel2.Controls.Add(Me.txtKdAuftragsNr)
+        Me.SplitContainer1.Panel2.Controls.Add(Me.lstGrenze)
        Me.SplitContainer1.Panel2.Controls.Add(Me.Label40)
        Me.SplitContainer1.Panel2.Controls.Add(Me.txtAvisoId)
        Me.SplitContainer1.Panel2.Controls.Add(Me.Label39)
-        Me.SplitContainer1.Panel2.Controls.Add(Me.lstFiliale)
        Me.SplitContainer1.Panel2.Controls.Add(Me.kdtxtAuftraggeber)
        Me.SplitContainer1.Panel2.Controls.Add(Me.txtAuftraggeberKdnr)
        Me.SplitContainer1.Panel2.Controls.Add(Me.txtCRN)
@@ -1612,9 +1652,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.SplitContainer1.Panel2.Controls.Add(Me.Label25)
        Me.SplitContainer1.Panel2.Controls.Add(Me.txtPackstücke)
        Me.SplitContainer1.Panel2.Controls.Add(Me.Label36)
-        Me.SplitContainer1.Panel2.Controls.Add(Me.Button12)
        Me.SplitContainer1.Panel2.Controls.Add(Me.Button11)
-        Me.SplitContainer1.Panel2.Controls.Add(Me.Label15)
        Me.SplitContainer1.Panel2.Controls.Add(Me.Label33)
        Me.SplitContainer1.Panel2.Controls.Add(Me.kdtxtAvisierer)
        Me.SplitContainer1.Panel2.Controls.Add(Me.txtAvisiererKdNr)
@@ -1644,7 +1682,8 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.SplitContainer1.Panel2.Controls.Add(Me.Label24)
        Me.SplitContainer1.Panel2.Controls.Add(Me.Label16)
        Me.SplitContainer1.Panel2.Controls.Add(Me.cbxOderEmpfanger)
-        Me.SplitContainer1.Size = New System.Drawing.Size(1183, 305)
+        Me.SplitContainer1.Panel2.Controls.Add(Me.Panel2)
+        Me.SplitContainer1.Size = New System.Drawing.Size(1220, 305)
        Me.SplitContainer1.SplitterDistance = 84
        Me.SplitContainer1.TabIndex = 0
        '
@@ -1765,6 +1804,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        '
        'Button4
        '
+        Me.Button4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Button4.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer))
        Me.Button4.FlatAppearance.BorderColor = System.Drawing.Color.Black
        Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
@@ -1772,7 +1812,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.Button4.ForeColor = System.Drawing.Color.White
        Me.Button4.Image = Global.SDL.My.Resources.Resources.pfeil_unten
        Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button4.Location = New System.Drawing.Point(1015, 57)
+        Me.Button4.Location = New System.Drawing.Point(1053, 57)
        Me.Button4.Margin = New System.Windows.Forms.Padding(0)
        Me.Button4.Name = "Button4"
        Me.Button4.Padding = New System.Windows.Forms.Padding(0, 0, 10, 0)
@@ -1886,7 +1926,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.cbxCMR.BackColor = System.Drawing.Color.White
        Me.cbxCMR.Checked = True
        Me.cbxCMR.CheckState = System.Windows.Forms.CheckState.Indeterminate
-        Me.cbxCMR.Location = New System.Drawing.Point(678, 180)
+        Me.cbxCMR.Location = New System.Drawing.Point(669, 195)
        Me.cbxCMR.Name = "cbxCMR"
        Me.cbxCMR.Size = New System.Drawing.Size(50, 17)
        Me.cbxCMR.TabIndex = 49
@@ -1896,25 +1936,13 @@ Partial Class usrCntlSpeditionsBuchSuche
        '
        'Label41
        '
-        Me.Label41.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label41.AutoSize = True
-        Me.Label41.Location = New System.Drawing.Point(852, 93)
+        Me.Label41.Location = New System.Drawing.Point(666, 93)
        Me.Label41.Name = "Label41"
        Me.Label41.Size = New System.Drawing.Size(44, 13)
        Me.Label41.TabIndex = 48
        Me.Label41.Text = "Grenze:"
        '
-        'lstGrenze
-        '
-        Me.lstGrenze._value = ""
-        Me.lstGrenze.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
-        Me.lstGrenze.FormattingEnabled = True
-        Me.lstGrenze.Location = New System.Drawing.Point(855, 108)
-        Me.lstGrenze.Name = "lstGrenze"
-        Me.lstGrenze.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
-        Me.lstGrenze.Size = New System.Drawing.Size(63, 82)
-        Me.lstGrenze.TabIndex = 47
-        '
        'txtKdAuftragsNr
        '
        Me.txtKdAuftragsNr._DateTimeOnly = False
@@ -1937,6 +1965,16 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.txtKdAuftragsNr.Size = New System.Drawing.Size(217, 20)
        Me.txtKdAuftragsNr.TabIndex = 46
        '
+        'lstGrenze
+        '
+        Me.lstGrenze._value = ""
+        Me.lstGrenze.FormattingEnabled = True
+        Me.lstGrenze.Location = New System.Drawing.Point(669, 108)
+        Me.lstGrenze.Name = "lstGrenze"
+        Me.lstGrenze.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
+        Me.lstGrenze.Size = New System.Drawing.Size(63, 82)
+        Me.lstGrenze.TabIndex = 47
+        '
        'Label40
        '
        Me.Label40.AutoSize = True
@@ -1978,7 +2016,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.MyTextBox14._WaehrungZeichen = True
        Me.MyTextBox14.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.MyTextBox14.ForeColor = System.Drawing.Color.Black
-        Me.MyTextBox14.Location = New System.Drawing.Point(135, 188)
+        Me.MyTextBox14.Location = New System.Drawing.Point(135, 192)
        Me.MyTextBox14.MaxLineLength = -1
        Me.MyTextBox14.MaxLines_Warning = ""
        Me.MyTextBox14.MaxLines_Warning_Label = Nothing
@@ -1997,6 +2035,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        '
        'kdtxtEmpfaenger
        '
+        Me.kdtxtEmpfaenger._AlleFirmenCLUSTER = False
        Me.kdtxtEmpfaenger._AllowSetValue = True
        Me.kdtxtEmpfaenger._autoSizeGross = False
        Me.kdtxtEmpfaenger._display_Name1 = False
@@ -2036,7 +2075,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        'Label18
        '
        Me.Label18.AutoSize = True
-        Me.Label18.Location = New System.Drawing.Point(12, 191)
+        Me.Label18.Location = New System.Drawing.Point(12, 195)
        Me.Label18.Name = "Label18"
        Me.Label18.Size = New System.Drawing.Size(99, 13)
        Me.Label18.TabIndex = 26
@@ -2068,6 +2107,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        '
        'kdtxtEndempfaenger
        '
+        Me.kdtxtEndempfaenger._AlleFirmenCLUSTER = False
        Me.kdtxtEndempfaenger._AllowSetValue = True
        Me.kdtxtEndempfaenger._autoSizeGross = False
        Me.kdtxtEndempfaenger._display_Name1 = False
@@ -2130,6 +2170,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        '
        'kdtxtAbsender
        '
+        Me.kdtxtAbsender._AlleFirmenCLUSTER = False
        Me.kdtxtAbsender._AllowSetValue = True
        Me.kdtxtAbsender._autoSizeGross = False
        Me.kdtxtAbsender._display_Name1 = False
@@ -2228,7 +2269,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.txtErfassungsnNr.MaxLines_Warning = ""
        Me.txtErfassungsnNr.MaxLines_Warning_Label = Nothing
        Me.txtErfassungsnNr.Name = "txtErfassungsnNr"
-        Me.txtErfassungsnNr.Size = New System.Drawing.Size(217, 20)
+        Me.txtErfassungsnNr.Size = New System.Drawing.Size(141, 20)
        Me.txtErfassungsnNr.TabIndex = 14
        '
        'Label24
@@ -2260,6 +2301,66 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.cbxOderEmpfanger.Text = "oder Empfänger"
        Me.cbxOderEmpfanger.UseVisualStyleBackColor = True
        '
+        'Panel2
+        '
+        Me.Panel2.BackColor = System.Drawing.Color.WhiteSmoke
+        Me.Panel2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+        Me.Panel2.Controls.Add(Me.MyComboBox1)
+        Me.Panel2.Controls.Add(Me.lstFiliale)
+        Me.Panel2.Controls.Add(Me.lstFilialeHandling)
+        Me.Panel2.Controls.Add(Me.Label45)
+        Me.Panel2.Controls.Add(Me.cboFilialeHandling)
+        Me.Panel2.Controls.Add(Me.Label15)
+        Me.Panel2.Location = New System.Drawing.Point(735, 93)
+        Me.Panel2.Name = "Panel2"
+        Me.Panel2.Size = New System.Drawing.Size(248, 122)
+        Me.Panel2.TabIndex = 53
+        '
+        'MyComboBox1
+        '
+        Me.MyComboBox1._allowedValuesFreiText = Nothing
+        Me.MyComboBox1._allowFreiText = False
+        Me.MyComboBox1._value = ""
+        Me.MyComboBox1.DropDownWidth = 250
+        Me.MyComboBox1.Font = New System.Drawing.Font("Microsoft Tai Le", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.MyComboBox1.FormattingEnabled = True
+        Me.MyComboBox1.Location = New System.Drawing.Point(3, 99)
+        Me.MyComboBox1.Name = "MyComboBox1"
+        Me.MyComboBox1.Size = New System.Drawing.Size(116, 22)
+        Me.MyComboBox1.TabIndex = 52
+        '
+        'lstFilialeHandling
+        '
+        Me.lstFilialeHandling._value = ""
+        Me.lstFilialeHandling.FormattingEnabled = True
+        Me.lstFilialeHandling.Location = New System.Drawing.Point(125, 15)
+        Me.lstFilialeHandling.Name = "lstFilialeHandling"
+        Me.lstFilialeHandling.SelectionMode = System.Windows.Forms.SelectionMode.MultiSimple
+        Me.lstFilialeHandling.Size = New System.Drawing.Size(118, 82)
+        Me.lstFilialeHandling.TabIndex = 51
+        '
+        'Label45
+        '
+        Me.Label45.AutoSize = True
+        Me.Label45.Location = New System.Drawing.Point(124, 1)
+        Me.Label45.Name = "Label45"
+        Me.Label45.Size = New System.Drawing.Size(81, 13)
+        Me.Label45.TabIndex = 50
+        Me.Label45.Text = "Filiale Handling:"
+        '
+        'cboFilialeHandling
+        '
+        Me.cboFilialeHandling._allowedValuesFreiText = Nothing
+        Me.cboFilialeHandling._allowFreiText = False
+        Me.cboFilialeHandling._value = ""
+        Me.cboFilialeHandling.DropDownWidth = 250
+        Me.cboFilialeHandling.Font = New System.Drawing.Font("Microsoft Tai Le", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cboFilialeHandling.FormattingEnabled = True
+        Me.cboFilialeHandling.Location = New System.Drawing.Point(125, 99)
+        Me.cboFilialeHandling.Name = "cboFilialeHandling"
+        Me.cboFilialeHandling.Size = New System.Drawing.Size(118, 22)
+        Me.cboFilialeHandling.TabIndex = 32
+        '
        'SplitContainer
        '
        Me.SplitContainer.Dock = System.Windows.Forms.DockStyle.Fill
@@ -2276,24 +2377,22 @@ Partial Class usrCntlSpeditionsBuchSuche
        'SplitContainer.Panel2
        '
        Me.SplitContainer.Panel2.Controls.Add(Me.pnlAnzeige)
-        Me.SplitContainer.Size = New System.Drawing.Size(1183, 722)
+        Me.SplitContainer.Size = New System.Drawing.Size(1220, 722)
        Me.SplitContainer.SplitterDistance = 330
        Me.SplitContainer.SplitterWidth = 2
        Me.SplitContainer.TabIndex = 3
        '
-        'Button19
+        'cboHandlingssatz
        '
-        Me.Button19.FlatStyle = System.Windows.Forms.FlatStyle.Flat
-        Me.Button19.Image = Global.SDL.My.Resources.Resources.statistik_small
-        Me.Button19.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
-        Me.Button19.Location = New System.Drawing.Point(764, 54)
-        Me.Button19.Margin = New System.Windows.Forms.Padding(0)
-        Me.Button19.Name = "Button19"
-        Me.Button19.Size = New System.Drawing.Size(83, 28)
-        Me.Button19.TabIndex = 57
-        Me.Button19.Text = "Fehlende"
-        Me.Button19.TextAlign = System.Drawing.ContentAlignment.MiddleRight
-        Me.Button19.UseVisualStyleBackColor = True
+        Me.cboHandlingssatz._allowedValuesFreiText = Nothing
+        Me.cboHandlingssatz._allowFreiText = False
+        Me.cboHandlingssatz._value = ""
+        Me.cboHandlingssatz.DropDownWidth = 300
+        Me.cboHandlingssatz.FormattingEnabled = True
+        Me.cboHandlingssatz.Location = New System.Drawing.Point(399, 137)
+        Me.cboHandlingssatz.Name = "cboHandlingssatz"
+        Me.cboHandlingssatz.Size = New System.Drawing.Size(159, 21)
+        Me.cboHandlingssatz.TabIndex = 60
        '
        'usrCntlSpeditionsBuchSuche
        '
@@ -2302,7 +2401,7 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.Controls.Add(Me.SplitContainer)
        Me.Controls.Add(Me.pnlTop)
        Me.Name = "usrCntlSpeditionsBuchSuche"
-        Me.Size = New System.Drawing.Size(1183, 770)
+        Me.Size = New System.Drawing.Size(1220, 770)
        Me.cntxtCntxtSpeditionsbuch.ResumeLayout(False)
        Me.pnlRechts.ResumeLayout(False)
        Me.pnlRechts.PerformLayout()
@@ -2328,6 +2427,8 @@ Partial Class usrCntlSpeditionsBuchSuche
        Me.SplitContainer1.Panel2.PerformLayout()
        CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.SplitContainer1.ResumeLayout(False)
+        Me.Panel2.ResumeLayout(False)
+        Me.Panel2.PerformLayout()
        Me.SplitContainer.Panel1.ResumeLayout(False)
        Me.SplitContainer.Panel2.ResumeLayout(False)
        CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).EndInit()
@@ -2350,7 +2451,6 @@ Partial Class usrCntlSpeditionsBuchSuche
    Friend WithEvents Label25 As System.Windows.Forms.Label
    Friend WithEvents txtPackstücke As VERAG_PROG_ALLGEMEIN.MyTextBox
    Friend WithEvents Label36 As System.Windows.Forms.Label
-    Friend WithEvents Button12 As System.Windows.Forms.Button
    Friend WithEvents Button11 As System.Windows.Forms.Button
    Friend WithEvents Label15 As System.Windows.Forms.Label
    Friend WithEvents Label33 As System.Windows.Forms.Label
@@ -2478,4 +2578,12 @@ Partial Class usrCntlSpeditionsBuchSuche
    Friend WithEvents Button18 As Button
    Friend WithEvents cbxCMR As CheckBox
    Friend WithEvents Button19 As Button
+    Friend WithEvents cboFilialeHandling As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents Label45 As Label
+    Friend WithEvents Button20 As Button
+    Friend WithEvents Label46 As Label
+    Friend WithEvents Panel2 As Panel
+    Friend WithEvents MyComboBox1 As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents lstFilialeHandling As VERAG_PROG_ALLGEMEIN.MyListBox
+    Friend WithEvents cboHandlingssatz As VERAG_PROG_ALLGEMEIN.MyComboBox
 End Class
--- a/SDL/Speditionsbuch/usrCntlSpeditionsBuchSuche.vb
+++ b/SDL/Speditionsbuch/usrCntlSpeditionsBuchSuche.vb
@@ -4,7 +4,7 @@ Imports System.Globalization
 Public Class usrCntlSpeditionsBuchSuche
    Dim SQL As New SQL

-    Dim AVISOSERVER = "[BUCHHALTUNG\SQLEXPRESS].AVISO.dbo.AVISO"
+    Dim AVISOSERVER = VERAG_PROG_ALLGEMEIN.cAllgemein.AVISO_SERVER & " .AVISO.dbo.AVISO"


    Sub New()
@@ -56,7 +56,7 @@ Public Class usrCntlSpeditionsBuchSuche
            '/*Sachbearbeiter ,[Bar],[Fakturiert],[BelegNr],[ErfassungsNr],[AnzahlZA],[AnzahlZAFremd],[AnzahlZnV],[AnzahlZnVFremd],[AnzahlT1],[AnzahlT2],[AnzahlAE],[AnzahlCarnetTIR],[AnzahlBarvorlagen],[AnzahlSonstiges],[AnzahlGrenzgebühren],[AvisUhrzeit],[Rechnungsbetrag],[Abfertigungsanzahl],[Barzahlungsbetrag],[Sachbearbeiter],[Personalnummer],[AtlasBezNrEZA],[AtlasBezNrNCTS],[Versendungsland],[SB_CMR],[SB_CMRDatum],[veoerz_basbtg],[Zucker_MRN_Nr],[Zucker_MRN_Datum],[Zucker_Aufschub],[Zollsystem],[Bestimmungszollstelle],[Bürgschaft],[Sicherheitsbetrag],[SgutKompl],[Bestimmungsland],[EuFiskalEmpfänger],[QKN],[EndempfängerKundenNr],[Endempfänger] */
            With DataGridView
                '  .DataSource = myTable
-                .SET_SQL(sqlstr & getSpedBuchWhere() & " ORDER BY Abfertigungsdatum  ", "FMZOLL", getSpedbuchList)
+                .SET_SQL(sqlstr & getSpedBuchWhere() & " ORDER BY Abfertigungsdatum, [FilialenNr],[AbfertigungsNr],[UnterNr]  ", "FMZOLL", getSpedbuchList)
                'MsgBox(sqlstr)
                '   MsgBox(getSpedBuchWhere)
                .LOAD()
@@ -118,7 +118,7 @@ Public Class usrCntlSpeditionsBuchSuche

                                                  With DataGridView
                                                      '  .DataSource = myTable
-                                                      .SET_SQL(sqlstrTmp & getSpedBuchWhere() & " AND AvisoID='" & dgvLKW.SelectedRows(0).Cells("AvisoID").Value & "' " & " ORDER BY Abfertigungsdatum  ", "FMZOLL", getSpedbuchList)
+                                                      .SET_SQL(sqlstrTmp & getSpedBuchWhere() & " AND AvisoID='" & dgvLKW.SelectedRows(0).Cells("AvisoID").Value & "' " & " ORDER BY Abfertigungsdatum, [FilialenNr],[AbfertigungsNr],[UnterNr]  ", "FMZOLL", getSpedbuchList)
                                                      .LOAD()
                                                  End With
                                                  showDGV()
@@ -238,16 +238,22 @@ Public Class usrCntlSpeditionsBuchSuche
        End If
        If txtUnterNr.Text <> "" Then sqlstr &= " AND [UnterNr] LIKE @UnterNr "
        If cboFiliale._value <> "" Then sqlstr &= " AND [FilialenNr] LIKE @FilialenNr "
+        ' If cboFilialeHandling._value <> "" Then sqlstr &= " AND FilialenNrHandling IS NOT NULL AND [FilialenNrHandling] LIKE @FilialeHandling "


        Dim abfertigungsarten = getValues()
-        If abfertigungsarten <> "" Then sqlstr &= " AND Speditionsbuch.Abfertigungsart IN (" & getValues() & ") "
+        If abfertigungsarten <> "" Then sqlstr &= " AND Speditionsbuch.Abfertigungsart IN (" & abfertigungsarten & ") "

        Dim filialeAuswahl = getValuesFiliale()
-        If filialeAuswahl <> "" Then sqlstr &= " AND Speditionsbuch.FilialenNr IN (" & getValuesFiliale() & ") "
+        If filialeAuswahl <> "" Then sqlstr &= " AND Speditionsbuch.FilialenNr IN (" & filialeAuswahl & ") "
+
+        Dim filialeAuswahlHandling = getValuesFilialeHandling()
+        If filialeAuswahlHandling <> "" Then sqlstr &= " AND Speditionsbuch.FilialenNrHandling IN (" & filialeAuswahlHandling & ") "
+
+

        Dim grenzeAuswahl = getValuesGrenzstelle()
-        If grenzeAuswahl <> "" Then sqlstr &= " AND Speditionsbuch.Grenzstelle IN (" & getValuesGrenzstelle() & ") "
+        If grenzeAuswahl <> "" Then sqlstr &= " AND Speditionsbuch.Grenzstelle IN (" & grenzeAuswahl & ") "


        If txtCRN.Text <> "" Then sqlstr &= " AND Speditionsbuch.QKN LIKE @QKN "
@@ -313,6 +319,7 @@ Public Class usrCntlSpeditionsBuchSuche
        list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("AvisoId", txtAvisoId.Text.Trim))


+        ' list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("FilialeHandling", cboFilialeHandling._value))
        list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Personalnummer", cboSachbearbeiter._value))
        list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PersonalnummerQS", cboSB_Qs._value))
        Return list
@@ -353,11 +360,24 @@ Public Class usrCntlSpeditionsBuchSuche

        cboSachbearbeiter.fillWithSQL("SELECT  ID,/*cast(ID as nvarchar(3)) +' ' + Name as*/ Name FROM Personal WHERE [Status]<>'L'  " & sbWhere & " ORDER BY Name ", False, "FMZOLL", True)
        cboFiliale.fillWithSQL("SELECT FilialenNr, Grenzstelle FROM Filialen WHERE Fil_Status='A' ORDER BY FilialenNr ", True, "FMZOLL", True)
+        '  cboFilialeHandling.fillWithSQL("SELECT FilialenNr, Grenzstelle FROM Filialen WHERE Fil_Status='A' ORDER BY FilialenNr ", True, "FMZOLL", True)
+
+        cboHandlingssatz.fillWithSQL("SELECT [hs_Bezeichnung]   FROM [tblHandlingssaetzeIntern] group by [hs_Bezeichnung] ", False, "FMZOLL", True)

        If VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE <> "" And Not VERAG_PROG_ALLGEMEIN.cAllgemein.isCLUSTER Then
-            cboFiliale._allowedValuesFreiText = {VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE}
+            If VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER = "FRONTOFFICE" Then
+                Dim whereCluster = ""
+                If VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER = "FRONTOFFICE" Then whereCluster = ",'5801'"
+                cboFiliale.fillWithSQL("SELECT FilialenNr, Grenzstelle FROM Filialen WHERE Fil_Status='A' AND FilialenNr  IN ('" & VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE & "'" & whereCluster & ") ORDER BY FilialenNr ", True, "FMZOLL", True)
+                '    cboFiliale._allowedValuesFreiText = {VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE, 5801}
+
+            Else
+                cboFiliale._allowedValuesFreiText = {VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE}
+                cboFiliale.Enabled = False
+            End If
+
            cboFiliale.changeItem(VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE)
-            cboFiliale.Enabled = False
+
        End If

        'Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
@@ -375,10 +395,15 @@ Public Class usrCntlSpeditionsBuchSuche
        MyListBox1.fillWithSQL(" SELECT [Abfertigungsart],[Abfertigungsbezeichnung] FROM [Abfertigungsarten] ORDER BY Abfertigungsart ", , "FMZOLL")

        If VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE <> "" And Not VERAG_PROG_ALLGEMEIN.cAllgemein.isCLUSTER Then
-            lstFiliale.fillWithSQL(" SELECT FilialenNr, Grenzstelle FROM Filialen WHERE Fil_Status='A' AND FilialenNr='" & VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE & "' ORDER BY FilialenNr ", , "FMZOLL")
+            Dim whereCluster = ""
+            ' If VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER = "FRONTOFFICE" Then whereCluster = ",'5801'"
+            lstFiliale.fillWithSQL(" SELECT FilialenNr, Grenzstelle FROM Filialen WHERE Fil_Status='A' AND FilialenNr  IN ('" & VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE & "'" & whereCluster & ") ORDER BY FilialenNr ", , "FMZOLL")
        Else
            lstFiliale.fillWithSQL(" SELECT FilialenNr, Grenzstelle FROM Filialen WHERE Fil_Status='A' ORDER BY FilialenNr ", , "FMZOLL")
        End If
+
+        lstFilialeHandling.fillWithSQL(" SELECT FilialenNr, Grenzstelle FROM Filialen WHERE Fil_Status='A'    ORDER BY FilialenNr ", , "FMZOLL")
+
        'Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
        '    Case "IMEX"
        '        lstFiliale.fillWithSQL(" SELECT FilialenNr, Grenzstelle FROM Filialen WHERE Fil_Status='A' AND FilialenNr=5501 ORDER BY FilialenNr ", , "FMZOLL")
@@ -397,6 +422,26 @@ Public Class usrCntlSpeditionsBuchSuche
        lstGrenze.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUA", "SUA"))


+
+        MyComboBox1.Items.Clear()
+        MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
+        MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", "ALLE"))
+        MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("VERAG", "VERAG"))
+        MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("IMEX", "IMEX"))
+        MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UNISPED", "UNISPED"))
+        MyComboBox1.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("FRONTOFFICE", "FRONTOFFICE"))
+
+
+        cboFilialeHandling.Items.Clear()
+        cboFilialeHandling.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
+        cboFilialeHandling.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", "ALLE"))
+        cboFilialeHandling.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("VERAG", "VERAG"))
+        cboFilialeHandling.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("IMEX", "IMEX"))
+        cboFilialeHandling.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UNISPED", "UNISPED"))
+        cboFilialeHandling.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("FRONTOFFICE", "FRONTOFFICE"))
+
+
+
        Dim where = ""
        Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
            Case "VERAG", "ATILLA", ""
@@ -479,6 +524,17 @@ Public Class usrCntlSpeditionsBuchSuche
        Return s
    End Function

+    Function getValuesFilialeHandling() As String
+        Dim s As String = ""
+        For Each i In lstFilialeHandling.SelectedItems
+            s += DirectCast(i, VERAG_PROG_ALLGEMEIN.MyListItem).Value & ", "
+        Next
+        If s.EndsWith(", ") Then
+            s = s.Substring(0, s.Length - 2)
+        End If
+        Return s
+    End Function
+
    Function getValuesGrenzstelle() As String
        Dim s As String = ""
        For Each i In lstGrenze.SelectedItems
@@ -514,11 +570,7 @@ Public Class usrCntlSpeditionsBuchSuche
        Next
    End Sub

-    Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
-        For i = 0 To lstFiliale.Items.Count - 1
-            lstFiliale.SetSelected(i, True)
-        Next
-    End Sub
+
    '   Sub initKdAuftraggeber()
    '     Dim dgvFindKD As New DataGridView
    ' dgvFindKD.Name = "dgvFindKD"
@@ -791,6 +843,9 @@ Public Class usrCntlSpeditionsBuchSuche
            Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
                Case "IMEX" : rpt.picVERAG.Image = My.Resources.IMEX_LOGO_simple : rpt.Label28.Text = "IMEX Customs Service GmbH"
                Case "ATILLA" : rpt.picVERAG.Image = My.Resources.Atilla : rpt.Label28.Text = "ATILLA Spedition"
+                Case "UNISPED" : rpt.picVERAG.Image = My.Resources.Atilla : rpt.Label28.Text = "UNISPED Spedition"
+                Case "AMBAR" : rpt.picVERAG.Image = My.Resources.Atilla : rpt.Label28.Text = "AMBAR"
+                Case "FRONTOFFICE" : rpt.picVERAG.Image = My.Resources.Atilla : rpt.Label28.Text = "FRONTOFFICE"
                Case Else
            End Select

@@ -1322,6 +1377,7 @@ Public Class usrCntlSpeditionsBuchSuche
        If kdtxtEndempfaenger.KdNr_value > 0 Then kdnrTmp = kdtxtEndempfaenger.KdNr_value : FirmaTmp = kdtxtEndempfaenger.Text
        If kdtxtAvisierer.KdNr_value > 0 Then kdnrTmp = kdtxtAvisierer.KdNr_value : FirmaTmp = kdtxtAvisierer.Text
        Dim VBNr = -1
+        FirmaTmp = FirmaTmp.Replace("*", "").Replace("/", "").Replace(";", "").Replace(",", "").Replace("&", "").Replace("?", "")
        Dim path = getGelangensbestätigung(FirmaTmp, kdnrTmp,, VBNr)
        If path <> "" Then

@@ -1329,6 +1385,170 @@ Public Class usrCntlSpeditionsBuchSuche
        End If
    End Sub

+
+    Function getrHandlingAussenstellen(Optional showDok As Boolean = True, Optional Handlingssatz As String = "") 'Firma As String, kdnrTmp As Integer, Optional showDok As Boolean = False, Optional ByRef VBNr As Integer = -1) As String
+        Dim displayFilter = cbxFilterInBericht.Checked
+        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ZOLL_Auswertungen", "SDL") Then
+            Dim sqlstr As String = ""
+            '     If CheckBox1.Checked Then
+
+            Dim sql_KdAuftragsNr = "" '",Speditionsbuch.KdAuftragsNr as KdAuftragsNr"
+
+
+            'sqlstr &= " SELECT  FilialenNr, AbfertigungsNr,UnterNr, Speditionsbuch.Abfertigungsart as Abfertigungsart ,Abfertigungsdatum, BelegNr, Rohmasse, Vermerk, Packstücke, AbsenderKundenNr, Absender, EmpfängerKundenNr, Empfänger,EndEmpfänger,EndEmpfängerKundenNr, 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 &= " SELECT  Speditionsbuch.*,Abfertigungsbezeichnung"
+            sqlstr &= " FROM Speditionsbuch LEFT JOIN Abfertigungsarten ON Speditionsbuch.Abfertigungsart=Abfertigungsarten.Abfertigungsart "
+            sqlstr &= " WHERE 1=1 "
+            sqlstr &= getSpedBuchWhere()
+            '    sqlstr &= " order by FilialenNr, AvisoId,Speditionsbuch.Abfertigungsart,Abfertigungsdatum"
+            sqlstr &= " order by FilialenNr, Speditionsbuch.Abfertigungsart,Abfertigungsdatum"
+
+            Dim dt As DataTable = SQL.loadDgvBySql_Param(sqlstr, "FMZOLL", , getSpedbuchList())
+
+            Dim print As New frmPrintLayout
+            print.Text = "Handling / Front-Office"
+
+            Dim rpt As New rptSpeditionsbericht_HandlingAussenstellen
+
+            Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
+                Case "IMEX" : rpt.picVERAG.Image = My.Resources.IMEX_LOGO_simple : rpt.Label28.Text = "IMEX Customs Service GmbH"
+                Case "ATILLA" : rpt.picVERAG.Image = My.Resources.Atilla : rpt.Label28.Text = "ATILLA Spedition"
+                Case Else
+            End Select
+
+            rpt.DataSource = dt
+
+
+
+            If rpt.DataSource.rows.count = 0 Then
+                rpt.Dispose() : print.Dispose()
+                MsgBox("Keine Daten vorhanden!")
+                Return ""
+            End If
+
+
+
+            Dim sum = 0
+            rpt.lblSachbearbeiter.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME
+            'rpt.lblMandantNiederlassung.Text = PERSONAL.Mandant & "  /  " & PERSONAL.Niederlassung
+
+            Dim defaultHandlingPreis As Double = 15
+
+            Dim HandlingList As VERAG_PROG_ALLGEMEIN.cHandlingssaetzeInternLIST = Nothing
+            If Handlingssatz <> "" Then
+                HandlingList = New VERAG_PROG_ALLGEMEIN.cHandlingssaetzeInternLIST(Handlingssatz)
+            End If
+
+            'Dim cnt As Integer = 0
+            rpt.lblDat.Text = Now.ToLongDateString
+            'Dim sumRg As Double = 0
+            'Dim gesSumAnz As Double = 0
+            'Dim gesSumBar As Double = 0
+            'Dim gesSumRg As Double = 0
+            'Dim gesgesSumAnz As Double = 0
+            'Dim gesgesSumBar As Double = 0
+            'Dim gesgesSumRg As Double = 0
+            'Dim SumAnzLKW As Double = 0
+            'Dim gesSumAnzLKW As Double = 0
+            'Dim gesgesSumAnzLKW As Double = 0
+
+            Dim sumAnz As Double = 0
+            Dim sumBar As Double = 0
+            Dim sumhandling As Double = 0
+            Dim sumzukassBAR As Double = 0
+
+            Dim sumAbfBez = ""
+            Dim gesFilBez = ""
+
+            '   Dim gesgesAbfBez = ""
+
+            AddHandler rpt.Detail.Format, Sub()
+                                              ' rpt.lblVon.Text = CDate(rpt.Fields.Item("von").Value).ToShortDateString
+                                              ' rpt.lblLKWNr.Text = CDate(rpt.Fields.Item("bis").Value).ToShortDateString
+
+                                              rpt.lblPosNr.Text = rpt.Fields.Item("FilialenNr").Value & " " & rpt.Fields.Item("AbfertigungsNr").Value & " " & rpt.Fields.Item("UnterNr").Value
+                                              rpt.lblAbfDatum.Text = rpt.Fields.Item("Abfertigungsdatum").Value
+
+                                              rpt.lblEndEmpfKdNr.Text = checkNull(rpt.Fields.Item("EmpfängerKundenNr").Value)
+                                              rpt.lblEndEmpf.Text = checkNull(rpt.Fields.Item("Empfänger").Value)
+
+                                              Dim bar As Double = 0
+                                              Dim handling As Double = 0
+                                              Dim zukassBAR As Double = 0
+                                              '  Dim rg As Double = 0
+                                              Dim anz As Double = 0
+
+
+                                              If IsNumeric(checkNull(rpt.Fields.Item("Barzahlungsbetrag").Value)) Then bar = CDbl(rpt.Fields.Item("Barzahlungsbetrag").Value())
+                                              If IsNumeric(checkNull(rpt.Fields.Item("HandlingZuKassieren").Value)) Then zukassBAR = CDbl(rpt.Fields.Item("HandlingZuKassieren").Value())
+                                              ' If IsNumeric(checkNull(rpt.Fields.Item("Rechnungsbetrag").Value)) Then rg = CDbl(rpt.Fields.Item("Rechnungsbetrag").Value())
+                                              If IsNumeric(checkNull(rpt.Fields.Item("Abfertigungsanzahl").Value)) Then anz = CDbl(rpt.Fields.Item("Abfertigungsanzahl").Value)
+                                              Dim Abfertigungsart = checkNull(rpt.Fields.Item("Abfertigungsart").Value)
+                                              handling = getHandlingKostByListe(Abfertigungsart, defaultHandlingPreis, HandlingList) * anz
+
+                                              '  rpt.lblLKWNr.Text = checkNull(rpt.Fields.Item("LKW Kennzeichen").Value)
+                                              rpt.lblAnzahl.Text = checkNull(rpt.Fields.Item("Abfertigungsanzahl").Value)
+                                              rpt.lblAbfertigungsart.Text = checkNull(rpt.Fields.Item("Abfertigungsbezeichnung").Value)
+                                              ' rpt.lblAbs.Text = checkNull(rpt.Fields.Item("Abfertigungsbezeichnung").Value)
+
+                                              rpt.lblBarzahlungsbetrag.Text = CDbl(bar).ToString("C2")
+                                              rpt.lblzuKassierenHandling.Text = CDbl(zukassBAR).ToString("C2")
+                                              rpt.lblHandlingsgebuehr.Text = CDbl(handling).ToString("C2")
+                                              'sumBar += CDbl(rpt.Fields.Item("Barzahlungsbetrag").Value)
+
+                                              sumAbfBez = checkNull(rpt.Fields.Item("Abfertigungsbezeichnung").Value)
+
+
+                                              sumAnz += anz
+                                              sumBar += bar
+                                              sumhandling += handling
+                                              sumzukassBAR += zukassBAR
+
+                                          End Sub
+
+            AddHandler rpt.ReportFooter1.Format, Sub()
+                                                     rpt.lblGesGesSumAnzahl.Text = sumAnz.ToString("N0")
+                                                     rpt.lblSumBarzahlungsbetrag.Text = sumBar.ToString("N2")
+                                                     rpt.lblSumzuKassierenHandling.Text = sumzukassBAR.ToString("N2")
+                                                     rpt.lblSumHandlingsgebuehr.Text = sumhandling.ToString("N2")
+
+                                                 End Sub
+            If showDok Then
+                print.Viewer.LoadDocument(rpt)
+                print.Viewer.ViewType = GrapeCity.Viewer.Common.Model.ViewType.Continuous
+                print.Show()
+            Else
+
+                Dim tmpPath = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath("HandlingFO.pdf", ".pdf", True, False)
+                Dim p As New GrapeCity.ActiveReports.Export.Pdf.Section.PdfExport
+                rpt.Run(False)
+                p.NeverEmbedFonts = ""
+                p.Export(rpt.Document, tmpPath)
+
+                rpt.Dispose()
+                Return tmpPath
+
+            End If
+
+
+
+
+        End If
+        Return ""
+    End Function
+
+    Function getHandlingKostByListe(AbfertigungsArt As Integer, defaultHandlingPreis As Double, HandlingList As VERAG_PROG_ALLGEMEIN.cHandlingssaetzeInternLIST) As Double
+        If HandlingList IsNot Nothing AndAlso HandlingList.LIST IsNot Nothing Then
+            For Each h In HandlingList.LIST
+                If h.hs_Abfertigungsart = AbfertigungsArt Then Return h.hs_Preis
+                If h.hs_Abfertigungsart Is Nothing Then defaultHandlingPreis = h.hs_Preis
+            Next
+        End If
+        Return defaultHandlingPreis
+    End Function
+
    Function getGelangensbestätigung(Firma As String, kdnrTmp As Integer, Optional showDok As Boolean = False, Optional ByRef VBNr As Integer = -1) As String
        Dim displayFilter = cbxFilterInBericht.Checked
        If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ZOLL_Auswertungen", "SDL") Then
@@ -1512,4 +1732,39 @@ Public Class usrCntlSpeditionsBuchSuche
        cProgramFunctions.genExcelFromDT_NEW(dt, {"J1:J" & (dt.Rows.Count + 2)})

    End Sub
+
+    Private Sub DataGridView_CellContentClick(sender As Object, e As DataGridViewCellEventArgs)
+
+    End Sub
+
+    Private Sub Button20_Click(sender As Object, e As EventArgs) Handles Button20.Click
+        getrHandlingAussenstellen(, cboHandlingssatz._value)
+    End Sub
+
+    Private Sub MyComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles MyComboBox1.SelectedIndexChanged
+        selctList(lstFiliale, MyComboBox1)
+    End Sub
+    Private Sub cboFilialeHandling_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboFilialeHandling.SelectedIndexChanged
+        selctList(lstFilialeHandling, cboFilialeHandling)
+    End Sub
+
+    Sub selctList(lst, cbo)
+        lst.ClearSelected()
+        Select Case cbo._value
+            Case "ALLE"
+                For i = 0 To lst.Items.Count - 1
+                    lst.SetSelected(i, True)
+                Next
+            Case ""
+                lst.ClearSelected()
+            Case Else
+                For i = 0 To lst.Items.Count - 1
+                    If VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale2(DirectCast(lst.Items(i), VERAG_PROG_ALLGEMEIN.MyListItem).Value) = cbo._value Then
+                        lst.SetSelected(i, True)
+                    End If
+                Next
+        End Select
+    End Sub
+
+
 End Class