neu

2020-03-12 14:49:31 +01:00
parent f4c1a74870
commit cc28d5a6cf
197 changed files with 37402 additions and 4503 deletions
--- a/SDL/kassenbuch/frmNacherfassungLeihgeld.Designer.vb
+++ b/SDL/kassenbuch/frmNacherfassungLeihgeld.Designer.vb
@@ -24,11 +24,8 @@ Partial Class frmNacherfassungLeihgeld
    Private Sub InitializeComponent()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmNacherfassungLeihgeld))
        Me.pnl = New System.Windows.Forms.Panel()
-        Me.txtDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.btnNeueAbfertigungNrVergeben = New System.Windows.Forms.Button()
        Me.Label2 = New System.Windows.Forms.Label()
-        Me.txtAbfertigungsnummer = New VERAG_PROG_ALLGEMEIN.MyTextBox()
-        Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.Label16 = New System.Windows.Forms.Label()
        Me.lblAbfertigungsdatum = New System.Windows.Forms.Label()
@@ -49,14 +46,16 @@ Partial Class frmNacherfassungLeihgeld
        Me.Label11 = New System.Windows.Forms.Label()
        Me.cbxProvisionAuftraggeber = New System.Windows.Forms.CheckBox()
        Me.Panel1 = New System.Windows.Forms.Panel()
+        Me.Panel2 = New System.Windows.Forms.Panel()
+        Me.Label44 = New System.Windows.Forms.Label()
+        Me.txtOpLeihgeld = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.cboPrinter = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.cboPrinterProvisionBeleg = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.txtAuftrProvision = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.cboProvisionBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.cboProvisionStaffel = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.txtProvisionProzent = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.cboProvisionStaffelArt = New VERAG_PROG_ALLGEMEIN.MyComboBox()
-        Me.Panel2 = New System.Windows.Forms.Panel()
-        Me.cboPrinter = New VERAG_PROG_ALLGEMEIN.MyComboBox()
-        Me.cboPrinterProvisionBeleg = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.txtKdAuftragsnummer = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.kdFrachtführer = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
        Me.ksFrachtführerKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
@@ -65,9 +64,10 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtBarzahlungsbetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.txtAuftraggeberKdNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.MyTextBoxLKWKz = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.txtDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.txtAbfertigungsnummer = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+        Me.cboFiliale = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.txtFahrer = New VERAG_PROG_ALLGEMEIN.MyTextBox()
-        Me.txtOpLeihgeld = New VERAG_PROG_ALLGEMEIN.MyTextBox()
-        Me.Label44 = New System.Windows.Forms.Label()
        Me.pnl.SuspendLayout()
        Me.Panel1.SuspendLayout()
        Me.Panel2.SuspendLayout()
@@ -91,30 +91,6 @@ Partial Class frmNacherfassungLeihgeld
        Me.pnl.Size = New System.Drawing.Size(441, 94)
        Me.pnl.TabIndex = 0
        '
-        'txtDatum
-        '
-        Me.txtDatum._DateTimeOnly = False
-        Me.txtDatum._numbersOnly = False
-        Me.txtDatum._numbersOnlyKommastellen = ""
-        Me.txtDatum._Prozent = False
-        Me.txtDatum._ShortDateNew = False
-        Me.txtDatum._ShortDateOnly = False
-        Me.txtDatum._TimeOnly = False
-        Me.txtDatum._value = "01.01.2017"
-        Me.txtDatum._Waehrung = False
-        Me.txtDatum.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
-        Me.txtDatum.ForeColor = System.Drawing.Color.Black
-        Me.txtDatum.Location = New System.Drawing.Point(17, 57)
-        Me.txtDatum.MaxLength = 25
-        Me.txtDatum.MaxLineLength = -1
-        Me.txtDatum.MaxLines_Warning = ""
-        Me.txtDatum.MaxLines_Warning_Label = Nothing
-        Me.txtDatum.Name = "txtDatum"
-        Me.txtDatum.ReadOnly = True
-        Me.txtDatum.Size = New System.Drawing.Size(115, 23)
-        Me.txtDatum.TabIndex = 4
-        Me.txtDatum.Text = "01.01.2017"
-        '
        'btnNeueAbfertigungNrVergeben
        '
        Me.btnNeueAbfertigungNrVergeben.BackColor = System.Drawing.Color.Gainsboro
@@ -135,41 +111,6 @@ Partial Class frmNacherfassungLeihgeld
        Me.Label2.TabIndex = 3
        Me.Label2.Text = "Abfertigungsnummer"
        '
-        'txtAbfertigungsnummer
-        '
-        Me.txtAbfertigungsnummer._DateTimeOnly = False
-        Me.txtAbfertigungsnummer._numbersOnly = False
-        Me.txtAbfertigungsnummer._numbersOnlyKommastellen = ""
-        Me.txtAbfertigungsnummer._Prozent = False
-        Me.txtAbfertigungsnummer._ShortDateNew = False
-        Me.txtAbfertigungsnummer._ShortDateOnly = False
-        Me.txtAbfertigungsnummer._TimeOnly = False
-        Me.txtAbfertigungsnummer._value = Nothing
-        Me.txtAbfertigungsnummer._Waehrung = False
-        Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Tai Le", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtAbfertigungsnummer.Location = New System.Drawing.Point(281, 57)
-        Me.txtAbfertigungsnummer.MaxLength = 8
-        Me.txtAbfertigungsnummer.MaxLineLength = -1
-        Me.txtAbfertigungsnummer.MaxLines_Warning = ""
-        Me.txtAbfertigungsnummer.MaxLines_Warning_Label = Nothing
-        Me.txtAbfertigungsnummer.Name = "txtAbfertigungsnummer"
-        Me.txtAbfertigungsnummer.Size = New System.Drawing.Size(145, 24)
-        Me.txtAbfertigungsnummer.TabIndex = 7
-        '
-        'cboFiliale
-        '
-        Me.cboFiliale._allowedValuesFreiText = Nothing
-        Me.cboFiliale._allowFreiText = False
-        Me.cboFiliale._value = ""
-        Me.cboFiliale.DropDownWidth = 280
-        Me.cboFiliale.Enabled = False
-        Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Tai Le", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.cboFiliale.FormattingEnabled = True
-        Me.cboFiliale.Location = New System.Drawing.Point(196, 56)
-        Me.cboFiliale.Name = "cboFiliale"
-        Me.cboFiliale.Size = New System.Drawing.Size(80, 24)
-        Me.cboFiliale.TabIndex = 5
-        '
        'Label1
        '
        Me.Label1.AutoSize = True
@@ -262,7 +203,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.btnPrint.FlatStyle = System.Windows.Forms.FlatStyle.Flat
        Me.btnPrint.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
        Me.btnPrint.ForeColor = System.Drawing.Color.Black
-        Me.btnPrint.Image = Global.SDL.My.Resources.printer2
+        Me.btnPrint.Image = Global.SDL.My.Resources.Resources.printer2
        Me.btnPrint.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
        Me.btnPrint.Location = New System.Drawing.Point(291, 331)
        Me.btnPrint.Name = "btnPrint"
@@ -383,6 +324,78 @@ Partial Class frmNacherfassungLeihgeld
        Me.Panel1.Size = New System.Drawing.Size(441, 122)
        Me.Panel1.TabIndex = 20
        '
+        'Panel2
+        '
+        Me.Panel2.Controls.Add(Me.Label6)
+        Me.Panel2.Controls.Add(Me.Label7)
+        Me.Panel2.Controls.Add(Me.cboPrinter)
+        Me.Panel2.Controls.Add(Me.cboPrinterProvisionBeleg)
+        Me.Panel2.Location = New System.Drawing.Point(213, 467)
+        Me.Panel2.Name = "Panel2"
+        Me.Panel2.Size = New System.Drawing.Size(228, 59)
+        Me.Panel2.TabIndex = 21
+        '
+        'Label44
+        '
+        Me.Label44.AutoSize = True
+        Me.Label44.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label44.Location = New System.Drawing.Point(288, 140)
+        Me.Label44.Name = "Label44"
+        Me.Label44.Size = New System.Drawing.Size(127, 13)
+        Me.Label44.TabIndex = 211
+        Me.Label44.Text = "Offene Posten - Leihgeld:"
+        Me.Label44.Visible = False
+        '
+        'txtOpLeihgeld
+        '
+        Me.txtOpLeihgeld._DateTimeOnly = False
+        Me.txtOpLeihgeld._numbersOnly = False
+        Me.txtOpLeihgeld._numbersOnlyKommastellen = ""
+        Me.txtOpLeihgeld._Prozent = False
+        Me.txtOpLeihgeld._ShortDateNew = False
+        Me.txtOpLeihgeld._ShortDateOnly = False
+        Me.txtOpLeihgeld._TimeOnly = False
+        Me.txtOpLeihgeld._value = Nothing
+        Me.txtOpLeihgeld._Waehrung = False
+        Me.txtOpLeihgeld._WaehrungZeichen = True
+        Me.txtOpLeihgeld.BackColor = System.Drawing.Color.White
+        Me.txtOpLeihgeld.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.txtOpLeihgeld.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtOpLeihgeld.ForeColor = System.Drawing.Color.Black
+        Me.txtOpLeihgeld.Location = New System.Drawing.Point(289, 159)
+        Me.txtOpLeihgeld.MaxLineLength = -1
+        Me.txtOpLeihgeld.MaxLines_Warning = ""
+        Me.txtOpLeihgeld.MaxLines_Warning_Label = Nothing
+        Me.txtOpLeihgeld.Name = "txtOpLeihgeld"
+        Me.txtOpLeihgeld.ReadOnly = True
+        Me.txtOpLeihgeld.Size = New System.Drawing.Size(115, 13)
+        Me.txtOpLeihgeld.TabIndex = 212
+        Me.txtOpLeihgeld.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
+        Me.txtOpLeihgeld.Visible = False
+        '
+        'cboPrinter
+        '
+        Me.cboPrinter._allowedValuesFreiText = Nothing
+        Me.cboPrinter._allowFreiText = False
+        Me.cboPrinter._value = ""
+        Me.cboPrinter.FormattingEnabled = True
+        Me.cboPrinter.Location = New System.Drawing.Point(83, 6)
+        Me.cboPrinter.Name = "cboPrinter"
+        Me.cboPrinter.Size = New System.Drawing.Size(131, 21)
+        Me.cboPrinter.TabIndex = 1
+        '
+        'cboPrinterProvisionBeleg
+        '
+        Me.cboPrinterProvisionBeleg._allowedValuesFreiText = Nothing
+        Me.cboPrinterProvisionBeleg._allowFreiText = False
+        Me.cboPrinterProvisionBeleg._value = ""
+        Me.cboPrinterProvisionBeleg.Enabled = False
+        Me.cboPrinterProvisionBeleg.FormattingEnabled = True
+        Me.cboPrinterProvisionBeleg.Location = New System.Drawing.Point(83, 30)
+        Me.cboPrinterProvisionBeleg.Name = "cboPrinterProvisionBeleg"
+        Me.cboPrinterProvisionBeleg.Size = New System.Drawing.Size(131, 21)
+        Me.cboPrinterProvisionBeleg.TabIndex = 3
+        '
        'txtAuftrProvision
        '
        Me.txtAuftrProvision._DateTimeOnly = False
@@ -394,6 +407,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtAuftrProvision._TimeOnly = False
        Me.txtAuftrProvision._value = Nothing
        Me.txtAuftrProvision._Waehrung = False
+        Me.txtAuftrProvision._WaehrungZeichen = True
        Me.txtAuftrProvision.Enabled = False
        Me.txtAuftrProvision.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
        Me.txtAuftrProvision.Location = New System.Drawing.Point(365, 11)
@@ -415,6 +429,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.cboProvisionBetrag._TimeOnly = False
        Me.cboProvisionBetrag._value = Nothing
        Me.cboProvisionBetrag._Waehrung = True
+        Me.cboProvisionBetrag._WaehrungZeichen = True
        Me.cboProvisionBetrag.Enabled = False
        Me.cboProvisionBetrag.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold)
        Me.cboProvisionBetrag.Location = New System.Drawing.Point(83, 85)
@@ -448,6 +463,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtProvisionProzent._TimeOnly = False
        Me.txtProvisionProzent._value = Nothing
        Me.txtProvisionProzent._Waehrung = False
+        Me.txtProvisionProzent._WaehrungZeichen = True
        Me.txtProvisionProzent.Enabled = False
        Me.txtProvisionProzent.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
        Me.txtProvisionProzent.Location = New System.Drawing.Point(21, 85)
@@ -470,40 +486,6 @@ Partial Class frmNacherfassungLeihgeld
        Me.cboProvisionStaffelArt.Size = New System.Drawing.Size(156, 21)
        Me.cboProvisionStaffelArt.TabIndex = 3
        '
-        'Panel2
-        '
-        Me.Panel2.Controls.Add(Me.Label6)
-        Me.Panel2.Controls.Add(Me.Label7)
-        Me.Panel2.Controls.Add(Me.cboPrinter)
-        Me.Panel2.Controls.Add(Me.cboPrinterProvisionBeleg)
-        Me.Panel2.Location = New System.Drawing.Point(213, 467)
-        Me.Panel2.Name = "Panel2"
-        Me.Panel2.Size = New System.Drawing.Size(228, 59)
-        Me.Panel2.TabIndex = 21
-        '
-        'cboPrinter
-        '
-        Me.cboPrinter._allowedValuesFreiText = Nothing
-        Me.cboPrinter._allowFreiText = False
-        Me.cboPrinter._value = ""
-        Me.cboPrinter.FormattingEnabled = True
-        Me.cboPrinter.Location = New System.Drawing.Point(83, 6)
-        Me.cboPrinter.Name = "cboPrinter"
-        Me.cboPrinter.Size = New System.Drawing.Size(131, 21)
-        Me.cboPrinter.TabIndex = 1
-        '
-        'cboPrinterProvisionBeleg
-        '
-        Me.cboPrinterProvisionBeleg._allowedValuesFreiText = Nothing
-        Me.cboPrinterProvisionBeleg._allowFreiText = False
-        Me.cboPrinterProvisionBeleg._value = ""
-        Me.cboPrinterProvisionBeleg.Enabled = False
-        Me.cboPrinterProvisionBeleg.FormattingEnabled = True
-        Me.cboPrinterProvisionBeleg.Location = New System.Drawing.Point(83, 30)
-        Me.cboPrinterProvisionBeleg.Name = "cboPrinterProvisionBeleg"
-        Me.cboPrinterProvisionBeleg.Size = New System.Drawing.Size(131, 21)
-        Me.cboPrinterProvisionBeleg.TabIndex = 3
-        '
        'txtKdAuftragsnummer
        '
        Me.txtKdAuftragsnummer._DateTimeOnly = False
@@ -515,6 +497,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtKdAuftragsnummer._TimeOnly = False
        Me.txtKdAuftragsnummer._value = Nothing
        Me.txtKdAuftragsnummer._Waehrung = False
+        Me.txtKdAuftragsnummer._WaehrungZeichen = True
        Me.txtKdAuftragsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtKdAuftragsnummer.Location = New System.Drawing.Point(142, 273)
        Me.txtKdAuftragsnummer.MaxLength = 25
@@ -527,6 +510,7 @@ Partial Class frmNacherfassungLeihgeld
        '
        'kdFrachtführer
        '
+        Me.kdFrachtführer._AlleFirmenCLUSTER = False
        Me.kdFrachtführer._AllowSetValue = True
        Me.kdFrachtführer._autoSizeGross = False
        Me.kdFrachtführer._display_Name1 = False
@@ -535,6 +519,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.kdFrachtführer._displayWoelflKd = False
        Me.kdFrachtführer._hideIfListEmpty = True
        Me.kdFrachtführer._loadKdData = False
+        Me.kdFrachtführer._UseFIRMA = ""
        Me.kdFrachtführer._ValueKdAndName = False
        Me.kdFrachtführer.dgvpos = "LEFT"
        Me.kdFrachtführer.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
@@ -562,6 +547,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.ksFrachtführerKdNr._TimeOnly = False
        Me.ksFrachtführerKdNr._value = Nothing
        Me.ksFrachtführerKdNr._Waehrung = False
+        Me.ksFrachtführerKdNr._WaehrungZeichen = True
        Me.ksFrachtführerKdNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.ksFrachtführerKdNr.Location = New System.Drawing.Point(289, 114)
        Me.ksFrachtführerKdNr.MaxLineLength = -1
@@ -583,6 +569,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtPassnummer._TimeOnly = False
        Me.txtPassnummer._value = Nothing
        Me.txtPassnummer._Waehrung = False
+        Me.txtPassnummer._WaehrungZeichen = True
        Me.txtPassnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtPassnummer.Location = New System.Drawing.Point(289, 196)
        Me.txtPassnummer.MaxLength = 15
@@ -595,6 +582,7 @@ Partial Class frmNacherfassungLeihgeld
        '
        'txtAuftraggeber
        '
+        Me.txtAuftraggeber._AlleFirmenCLUSTER = False
        Me.txtAuftraggeber._AllowSetValue = True
        Me.txtAuftraggeber._autoSizeGross = False
        Me.txtAuftraggeber._display_Name1 = False
@@ -603,6 +591,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtAuftraggeber._displayWoelflKd = False
        Me.txtAuftraggeber._hideIfListEmpty = True
        Me.txtAuftraggeber._loadKdData = True
+        Me.txtAuftraggeber._UseFIRMA = ""
        Me.txtAuftraggeber._ValueKdAndName = False
        Me.txtAuftraggeber.dgvpos = "LEFT"
        Me.txtAuftraggeber.Enabled = False
@@ -631,6 +620,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtBarzahlungsbetrag._TimeOnly = False
        Me.txtBarzahlungsbetrag._value = Nothing
        Me.txtBarzahlungsbetrag._Waehrung = True
+        Me.txtBarzahlungsbetrag._WaehrungZeichen = True
        Me.txtBarzahlungsbetrag.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Bold)
        Me.txtBarzahlungsbetrag.Location = New System.Drawing.Point(21, 331)
        Me.txtBarzahlungsbetrag.MaxLineLength = -1
@@ -651,6 +641,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtAuftraggeberKdNr._TimeOnly = False
        Me.txtAuftraggeberKdNr._value = Nothing
        Me.txtAuftraggeberKdNr._Waehrung = False
+        Me.txtAuftraggeberKdNr._WaehrungZeichen = True
        Me.txtAuftraggeberKdNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtAuftraggeberKdNr.Location = New System.Drawing.Point(289, 251)
        Me.txtAuftraggeberKdNr.MaxLineLength = -1
@@ -672,6 +663,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.MyTextBoxLKWKz._TimeOnly = False
        Me.MyTextBoxLKWKz._value = Nothing
        Me.MyTextBoxLKWKz._Waehrung = False
+        Me.MyTextBoxLKWKz._WaehrungZeichen = True
        Me.MyTextBoxLKWKz.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.MyTextBoxLKWKz.Location = New System.Drawing.Point(18, 156)
        Me.MyTextBoxLKWKz.MaxLength = 25
@@ -682,6 +674,67 @@ Partial Class frmNacherfassungLeihgeld
        Me.MyTextBoxLKWKz.Size = New System.Drawing.Size(265, 20)
        Me.MyTextBoxLKWKz.TabIndex = 5
        '
+        'txtDatum
+        '
+        Me.txtDatum._DateTimeOnly = False
+        Me.txtDatum._numbersOnly = False
+        Me.txtDatum._numbersOnlyKommastellen = ""
+        Me.txtDatum._Prozent = False
+        Me.txtDatum._ShortDateNew = False
+        Me.txtDatum._ShortDateOnly = False
+        Me.txtDatum._TimeOnly = False
+        Me.txtDatum._value = "01.01.2017"
+        Me.txtDatum._Waehrung = False
+        Me.txtDatum._WaehrungZeichen = True
+        Me.txtDatum.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+        Me.txtDatum.ForeColor = System.Drawing.Color.Black
+        Me.txtDatum.Location = New System.Drawing.Point(17, 57)
+        Me.txtDatum.MaxLength = 25
+        Me.txtDatum.MaxLineLength = -1
+        Me.txtDatum.MaxLines_Warning = ""
+        Me.txtDatum.MaxLines_Warning_Label = Nothing
+        Me.txtDatum.Name = "txtDatum"
+        Me.txtDatum.ReadOnly = True
+        Me.txtDatum.Size = New System.Drawing.Size(115, 23)
+        Me.txtDatum.TabIndex = 4
+        Me.txtDatum.Text = "01.01.2017"
+        '
+        'txtAbfertigungsnummer
+        '
+        Me.txtAbfertigungsnummer._DateTimeOnly = False
+        Me.txtAbfertigungsnummer._numbersOnly = False
+        Me.txtAbfertigungsnummer._numbersOnlyKommastellen = ""
+        Me.txtAbfertigungsnummer._Prozent = False
+        Me.txtAbfertigungsnummer._ShortDateNew = False
+        Me.txtAbfertigungsnummer._ShortDateOnly = False
+        Me.txtAbfertigungsnummer._TimeOnly = False
+        Me.txtAbfertigungsnummer._value = Nothing
+        Me.txtAbfertigungsnummer._Waehrung = False
+        Me.txtAbfertigungsnummer._WaehrungZeichen = True
+        Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Tai Le", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.txtAbfertigungsnummer.Location = New System.Drawing.Point(281, 57)
+        Me.txtAbfertigungsnummer.MaxLength = 8
+        Me.txtAbfertigungsnummer.MaxLineLength = -1
+        Me.txtAbfertigungsnummer.MaxLines_Warning = ""
+        Me.txtAbfertigungsnummer.MaxLines_Warning_Label = Nothing
+        Me.txtAbfertigungsnummer.Name = "txtAbfertigungsnummer"
+        Me.txtAbfertigungsnummer.Size = New System.Drawing.Size(145, 24)
+        Me.txtAbfertigungsnummer.TabIndex = 7
+        '
+        'cboFiliale
+        '
+        Me.cboFiliale._allowedValuesFreiText = Nothing
+        Me.cboFiliale._allowFreiText = False
+        Me.cboFiliale._value = ""
+        Me.cboFiliale.DropDownWidth = 280
+        Me.cboFiliale.Enabled = False
+        Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Tai Le", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.cboFiliale.FormattingEnabled = True
+        Me.cboFiliale.Location = New System.Drawing.Point(196, 56)
+        Me.cboFiliale.Name = "cboFiliale"
+        Me.cboFiliale.Size = New System.Drawing.Size(80, 24)
+        Me.cboFiliale.TabIndex = 5
+        '
        'txtFahrer
        '
        Me.txtFahrer._DateTimeOnly = False
@@ -693,6 +746,7 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtFahrer._TimeOnly = False
        Me.txtFahrer._value = Nothing
        Me.txtFahrer._Waehrung = False
+        Me.txtFahrer._WaehrungZeichen = True
        Me.txtFahrer.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.txtFahrer.Location = New System.Drawing.Point(18, 196)
        Me.txtFahrer.MaxLength = 25
@@ -703,43 +757,6 @@ Partial Class frmNacherfassungLeihgeld
        Me.txtFahrer.Size = New System.Drawing.Size(265, 20)
        Me.txtFahrer.TabIndex = 8
        '
-        'txtOpLeihgeld
-        '
-        Me.txtOpLeihgeld._DateTimeOnly = False
-        Me.txtOpLeihgeld._numbersOnly = False
-        Me.txtOpLeihgeld._numbersOnlyKommastellen = ""
-        Me.txtOpLeihgeld._Prozent = False
-        Me.txtOpLeihgeld._ShortDateNew = False
-        Me.txtOpLeihgeld._ShortDateOnly = False
-        Me.txtOpLeihgeld._TimeOnly = False
-        Me.txtOpLeihgeld._value = Nothing
-        Me.txtOpLeihgeld._Waehrung = False
-        Me.txtOpLeihgeld.BackColor = System.Drawing.Color.White
-        Me.txtOpLeihgeld.BorderStyle = System.Windows.Forms.BorderStyle.None
-        Me.txtOpLeihgeld.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.txtOpLeihgeld.ForeColor = System.Drawing.Color.Black
-        Me.txtOpLeihgeld.Location = New System.Drawing.Point(289, 159)
-        Me.txtOpLeihgeld.MaxLineLength = -1
-        Me.txtOpLeihgeld.MaxLines_Warning = ""
-        Me.txtOpLeihgeld.MaxLines_Warning_Label = Nothing
-        Me.txtOpLeihgeld.Name = "txtOpLeihgeld"
-        Me.txtOpLeihgeld.ReadOnly = True
-        Me.txtOpLeihgeld.Size = New System.Drawing.Size(115, 13)
-        Me.txtOpLeihgeld.TabIndex = 212
-        Me.txtOpLeihgeld.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
-        Me.txtOpLeihgeld.Visible = False
-        '
-        'Label44
-        '
-        Me.Label44.AutoSize = True
-        Me.Label44.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label44.Location = New System.Drawing.Point(288, 140)
-        Me.Label44.Name = "Label44"
-        Me.Label44.Size = New System.Drawing.Size(127, 13)
-        Me.Label44.TabIndex = 211
-        Me.Label44.Text = "Offene Posten - Leihgeld:"
-        Me.Label44.Visible = False
-        '
        'frmNacherfassungLeihgeld
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)