Maut, QU-Kontrolle, MAhnlauf, Kundebearbeiten, etc.

2024-09-06 15:40:58 +02:00
parent ad7fa10999
commit a9228921e0
32 changed files with 6225 additions and 1100 deletions
--- a/SDL/frmdynMailvorlage.Designer.vb
+++ b/SDL/frmdynMailvorlage.Designer.vb
@@ -24,6 +24,11 @@ Partial Class frmdynMailvorlagen
    Private Sub InitializeComponent()
        Me.components = New System.ComponentModel.Container()
        Me.mainPanel = New System.Windows.Forms.Panel()
+        Me.cbxTyp = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+        Me.Label13 = New System.Windows.Forms.Label()
+        Me.TextBox1 = New System.Windows.Forms.TextBox()
+        Me.txtfixeEmail = New System.Windows.Forms.TextBox()
+        Me.Label12 = New System.Windows.Forms.Label()
        Me.Label11 = New System.Windows.Forms.Label()
        Me.rtb_txthtml = New System.Windows.Forms.RichTextBox()
        Me.cbxSendungsvermerk = New VERAG_PROG_ALLGEMEIN.MyComboBox()
@@ -31,7 +36,7 @@ Partial Class frmdynMailvorlagen
        Me.txtSendungsvermerk = New System.Windows.Forms.TextBox()
        Me.Label9 = New System.Windows.Forms.Label()
        Me.cbSendungsvermerk = New System.Windows.Forms.CheckBox()
-        Me.TextBox2 = New System.Windows.Forms.TextBox()
+        Me.txtVariablen = New System.Windows.Forms.TextBox()
        Me.btn = New System.Windows.Forms.Button()
        Me.lblWordcount = New System.Windows.Forms.Label()
        Me.cboFirmensignatur = New VERAG_PROG_ALLGEMEIN.MyComboBox()
@@ -60,9 +65,6 @@ Partial Class frmdynMailvorlagen
        Me.Label3 = New System.Windows.Forms.Label()
        Me.cbxFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.dgvMailvorlagen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
-        Me.txtfixeEmail = New System.Windows.Forms.TextBox()
-        Me.Label12 = New System.Windows.Forms.Label()
-        Me.TextBox1 = New System.Windows.Forms.TextBox()
        Me.mainPanel.SuspendLayout()
        Me.pnlTop.SuspendLayout()
        CType(Me.dgvMailvorlagen, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -73,6 +75,8 @@ Partial Class frmdynMailvorlagen
        Me.mainPanel.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
            Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+        Me.mainPanel.Controls.Add(Me.cbxTyp)
+        Me.mainPanel.Controls.Add(Me.Label13)
        Me.mainPanel.Controls.Add(Me.TextBox1)
        Me.mainPanel.Controls.Add(Me.txtfixeEmail)
        Me.mainPanel.Controls.Add(Me.Label12)
@@ -83,7 +87,7 @@ Partial Class frmdynMailvorlagen
        Me.mainPanel.Controls.Add(Me.txtSendungsvermerk)
        Me.mainPanel.Controls.Add(Me.Label9)
        Me.mainPanel.Controls.Add(Me.cbSendungsvermerk)
-        Me.mainPanel.Controls.Add(Me.TextBox2)
+        Me.mainPanel.Controls.Add(Me.txtVariablen)
        Me.mainPanel.Controls.Add(Me.btn)
        Me.mainPanel.Controls.Add(Me.lblWordcount)
        Me.mainPanel.Controls.Add(Me.cboFirmensignatur)
@@ -105,6 +109,54 @@ Partial Class frmdynMailvorlagen
        Me.mainPanel.Size = New System.Drawing.Size(1283, 457)
        Me.mainPanel.TabIndex = 101
        '
+        'cbxTyp
+        '
+        Me.cbxTyp._allowedValuesFreiText = Nothing
+        Me.cbxTyp._allowFreiText = False
+        Me.cbxTyp._value = ""
+        Me.cbxTyp.DropDownWidth = 120
+        Me.cbxTyp.FormattingEnabled = True
+        Me.cbxTyp.Location = New System.Drawing.Point(887, 20)
+        Me.cbxTyp.Name = "cbxTyp"
+        Me.cbxTyp.Size = New System.Drawing.Size(92, 21)
+        Me.cbxTyp.TabIndex = 46
+        '
+        'Label13
+        '
+        Me.Label13.AutoSize = True
+        Me.Label13.Location = New System.Drawing.Point(884, 4)
+        Me.Label13.Name = "Label13"
+        Me.Label13.Size = New System.Drawing.Size(28, 13)
+        Me.Label13.TabIndex = 45
+        Me.Label13.Text = "Typ:"
+        '
+        'TextBox1
+        '
+        Me.TextBox1.BackColor = System.Drawing.SystemColors.Control
+        Me.TextBox1.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.TextBox1.Location = New System.Drawing.Point(10, 395)
+        Me.TextBox1.Multiline = True
+        Me.TextBox1.Name = "TextBox1"
+        Me.TextBox1.Size = New System.Drawing.Size(109, 18)
+        Me.TextBox1.TabIndex = 44
+        Me.TextBox1.Text = "* Text-Variablen:"
+        '
+        'txtfixeEmail
+        '
+        Me.txtfixeEmail.Location = New System.Drawing.Point(136, 61)
+        Me.txtfixeEmail.Name = "txtfixeEmail"
+        Me.txtfixeEmail.Size = New System.Drawing.Size(324, 20)
+        Me.txtfixeEmail.TabIndex = 43
+        '
+        'Label12
+        '
+        Me.Label12.AutoSize = True
+        Me.Label12.Location = New System.Drawing.Point(133, 45)
+        Me.Label12.Name = "Label12"
+        Me.Label12.Size = New System.Drawing.Size(194, 13)
+        Me.Label12.TabIndex = 42
+        Me.Label12.Text = "fixer Empfänger (mehrere mit ; getrennt):"
+        '
        'Label11
        '
        Me.Label11.AutoSize = True
@@ -176,16 +228,16 @@ Partial Class frmdynMailvorlagen
        Me.cbSendungsvermerk.Text = "Sendungsvermerk beim Senden setzen"
        Me.cbSendungsvermerk.UseVisualStyleBackColor = True
        '
-        'TextBox2
+        'txtVariablen
        '
-        Me.TextBox2.BackColor = System.Drawing.SystemColors.Control
-        Me.TextBox2.BorderStyle = System.Windows.Forms.BorderStyle.None
-        Me.TextBox2.Location = New System.Drawing.Point(10, 414)
-        Me.TextBox2.Multiline = True
-        Me.TextBox2.Name = "TextBox2"
-        Me.TextBox2.Size = New System.Drawing.Size(576, 31)
-        Me.TextBox2.TabIndex = 34
-        Me.TextBox2.Text = "%VAR-GRENZE%, %LKW%, %LKWKennzeichen%, %Empfaenger%, %voraus-Eintreffen%, %Filial" &
+        Me.txtVariablen.BackColor = System.Drawing.SystemColors.Control
+        Me.txtVariablen.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.txtVariablen.Location = New System.Drawing.Point(10, 414)
+        Me.txtVariablen.Multiline = True
+        Me.txtVariablen.Name = "txtVariablen"
+        Me.txtVariablen.Size = New System.Drawing.Size(576, 31)
+        Me.txtVariablen.TabIndex = 34
+        Me.txtVariablen.Text = "%VAR-GRENZE%, %LKW%, %LKWKennzeichen%, %Empfaenger%, %voraus-Eintreffen%, %Filial" &
    "enNr%, %AbfertigungsNr%, %Absender%, %Gewicht%, %ImEx%, %Zollstelle%"
        '
        'btn
@@ -497,33 +549,6 @@ Partial Class frmdynMailvorlagen
        Me.dgvMailvorlagen.Size = New System.Drawing.Size(1283, 365)
        Me.dgvMailvorlagen.TabIndex = 104
        '
-        'txtfixeEmail
-        '
-        Me.txtfixeEmail.Location = New System.Drawing.Point(136, 61)
-        Me.txtfixeEmail.Name = "txtfixeEmail"
-        Me.txtfixeEmail.Size = New System.Drawing.Size(324, 20)
-        Me.txtfixeEmail.TabIndex = 43
-        '
-        'Label12
-        '
-        Me.Label12.AutoSize = True
-        Me.Label12.Location = New System.Drawing.Point(133, 45)
-        Me.Label12.Name = "Label12"
-        Me.Label12.Size = New System.Drawing.Size(194, 13)
-        Me.Label12.TabIndex = 42
-        Me.Label12.Text = "fixer Empfänger (mehrere mit ; getrennt):"
-        '
-        'TextBox1
-        '
-        Me.TextBox1.BackColor = System.Drawing.SystemColors.Control
-        Me.TextBox1.BorderStyle = System.Windows.Forms.BorderStyle.None
-        Me.TextBox1.Location = New System.Drawing.Point(10, 395)
-        Me.TextBox1.Multiline = True
-        Me.TextBox1.Name = "TextBox1"
-        Me.TextBox1.Size = New System.Drawing.Size(109, 18)
-        Me.TextBox1.TabIndex = 44
-        Me.TextBox1.Text = "* Text-Variablen:"
-        '
        'frmdynMailvorlagen
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -574,7 +599,7 @@ Partial Class frmdynMailvorlagen
    Friend WithEvents btn As Button
    Friend WithEvents cbxSpracheSelected As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents Label8 As Label
-    Friend WithEvents TextBox2 As TextBox
+    Friend WithEvents txtVariablen As TextBox
    Friend WithEvents cbxSendungsvermerk As VERAG_PROG_ALLGEMEIN.MyComboBox
    Friend WithEvents Label10 As Label
    Friend WithEvents txtSendungsvermerk As TextBox
@@ -585,4 +610,6 @@ Partial Class frmdynMailvorlagen
    Friend WithEvents txtfixeEmail As TextBox
    Friend WithEvents Label12 As Label
    Friend WithEvents TextBox1 As TextBox
+    Friend WithEvents cbxTyp As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Friend WithEvents Label13 As Label
 End Class