Druckerermittlung, Spedistionsbuchübersetzung, Kunendatenblatt für Verag360

2024-08-28 16:46:57 +02:00
parent 71b8a93063
commit 6c662876da
7 changed files with 587 additions and 481 deletions
--- a/SDL/kunden/usrcntlKundeBearbeitenFull.Designer.vb
+++ b/SDL/kunden/usrcntlKundeBearbeitenFull.Designer.vb
@@ -258,7 +258,10 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.Label91 = New System.Windows.Forms.Label()
        Me.Label92 = New System.Windows.Forms.Label()
        Me.DataGridView1 = New System.Windows.Forms.DataGridView()
-        Me.Label33 = New System.Windows.Forms.Label()
+        Me.tbZahlungsinfo = New System.Windows.Forms.TabPage()
+        Me.Label102 = New System.Windows.Forms.Label()
+        Me.rtb_Zahlungsinfo = New System.Windows.Forms.RichTextBox()
+        Me.lblEORI = New System.Windows.Forms.Label()
        Me.Label84 = New System.Windows.Forms.Label()
        Me.GroupBox3 = New System.Windows.Forms.GroupBox()
        Me.PictureBox5 = New System.Windows.Forms.PictureBox()
@@ -339,9 +342,8 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.cboFirma = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.cboAuswahl = New VERAG_PROG_ALLGEMEIN.MyComboBox()
        Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
-        Me.tbZahlungsinfo = New System.Windows.Forms.TabPage()
-        Me.rtb_Zahlungsinfo = New System.Windows.Forms.RichTextBox()
-        Me.Label102 = New System.Windows.Forms.Label()
+        Me.lblHandelregisterNr = New System.Windows.Forms.Label()
+        Me.txtHandelsregisterNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
        Me.tbcntrDetails.SuspendLayout()
        Me.tbAbfertigung.SuspendLayout()
        Me.tbcntrAbf.SuspendLayout()
@@ -367,6 +369,7 @@ Partial Class usrcntlKundeBearbeitenFull
        CType(Me.dgvSonst_IDSKunden, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.tbSchnittstellen.SuspendLayout()
        CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).BeginInit()
+        Me.tbZahlungsinfo.SuspendLayout()
        Me.GroupBox3.SuspendLayout()
        CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.GroupBox1.SuspendLayout()
@@ -374,7 +377,6 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.TabPage10.SuspendLayout()
        Me.TabPage11.SuspendLayout()
        Me.pnlNeukunde.SuspendLayout()
-        Me.tbZahlungsinfo.SuspendLayout()
        Me.SuspendLayout()
        '
        'tbcntrDetails
@@ -3590,15 +3592,44 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.DataGridView1.Size = New System.Drawing.Size(657, 358)
        Me.DataGridView1.TabIndex = 22
        '
-        'Label33
+        'tbZahlungsinfo
        '
-        Me.Label33.AutoSize = True
-        Me.Label33.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label33.Location = New System.Drawing.Point(8, 161)
-        Me.Label33.Name = "Label33"
-        Me.Label33.Size = New System.Drawing.Size(78, 13)
-        Me.Label33.TabIndex = 12
-        Me.Label33.Text = "EORI / NL-Nr.:"
+        Me.tbZahlungsinfo.Controls.Add(Me.Label102)
+        Me.tbZahlungsinfo.Controls.Add(Me.rtb_Zahlungsinfo)
+        Me.tbZahlungsinfo.Location = New System.Drawing.Point(4, 22)
+        Me.tbZahlungsinfo.Name = "tbZahlungsinfo"
+        Me.tbZahlungsinfo.Size = New System.Drawing.Size(672, 458)
+        Me.tbZahlungsinfo.TabIndex = 11
+        Me.tbZahlungsinfo.Text = "Zahlungsinfo"
+        Me.tbZahlungsinfo.UseVisualStyleBackColor = True
+        '
+        'Label102
+        '
+        Me.Label102.AutoSize = True
+        Me.Label102.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label102.Location = New System.Drawing.Point(3, 18)
+        Me.Label102.Name = "Label102"
+        Me.Label102.Size = New System.Drawing.Size(66, 13)
+        Me.Label102.TabIndex = 132
+        Me.Label102.Text = "Zahlunginfo:"
+        '
+        'rtb_Zahlungsinfo
+        '
+        Me.rtb_Zahlungsinfo.Location = New System.Drawing.Point(6, 35)
+        Me.rtb_Zahlungsinfo.Name = "rtb_Zahlungsinfo"
+        Me.rtb_Zahlungsinfo.Size = New System.Drawing.Size(660, 412)
+        Me.rtb_Zahlungsinfo.TabIndex = 40
+        Me.rtb_Zahlungsinfo.Text = ""
+        '
+        'lblEORI
+        '
+        Me.lblEORI.AutoSize = True
+        Me.lblEORI.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblEORI.Location = New System.Drawing.Point(8, 161)
+        Me.lblEORI.Name = "lblEORI"
+        Me.lblEORI.Size = New System.Drawing.Size(78, 13)
+        Me.lblEORI.TabIndex = 12
+        Me.lblEORI.Text = "EORI / NL-Nr.:"
        '
        'Label84
        '
@@ -3612,6 +3643,7 @@ Partial Class usrcntlKundeBearbeitenFull
        '
        'GroupBox3
        '
+        Me.GroupBox3.Controls.Add(Me.txtHandelsregisterNr)
        Me.GroupBox3.Controls.Add(Me.PictureBox5)
        Me.GroupBox3.Controls.Add(Me.Label100)
        Me.GroupBox3.Controls.Add(Me.txtAdresseZusatz)
@@ -3622,7 +3654,7 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.GroupBox3.Controls.Add(Me.txtEORINL)
        Me.GroupBox3.Controls.Add(Me.Label5)
        Me.GroupBox3.Controls.Add(Me.txtEORI)
-        Me.GroupBox3.Controls.Add(Me.Label33)
+        Me.GroupBox3.Controls.Add(Me.lblEORI)
        Me.GroupBox3.Controls.Add(Me.txtFirmenname1)
        Me.GroupBox3.Controls.Add(Me.cboUSt_UstIdNrLand)
        Me.GroupBox3.Controls.Add(Me.Label15)
@@ -3634,6 +3666,7 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.GroupBox3.Controls.Add(Me.Label16)
        Me.GroupBox3.Controls.Add(Me.txtUSt_Steuernummer)
        Me.GroupBox3.Controls.Add(Me.Label84)
+        Me.GroupBox3.Controls.Add(Me.lblHandelregisterNr)
        Me.GroupBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.GroupBox3.Location = New System.Drawing.Point(3, 3)
        Me.GroupBox3.Name = "GroupBox3"
@@ -4087,9 +4120,9 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label13.Location = New System.Drawing.Point(3, 123)
        Me.Label13.Name = "Label13"
-        Me.Label13.Size = New System.Drawing.Size(39, 13)
+        Me.Label13.Size = New System.Drawing.Size(48, 13)
        Me.Label13.TabIndex = 8
-        Me.Label13.Text = "E-Mail:"
+        Me.Label13.Text = "E-Mail 2:"
        '
        'Label11
        '
@@ -4563,34 +4596,41 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.DataGridViewTextBoxColumn2.HeaderText = "E-Mail"
        Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
        '
-        'tbZahlungsinfo
+        'lblHandelregisterNr
        '
-        Me.tbZahlungsinfo.Controls.Add(Me.Label102)
-        Me.tbZahlungsinfo.Controls.Add(Me.rtb_Zahlungsinfo)
-        Me.tbZahlungsinfo.Location = New System.Drawing.Point(4, 22)
-        Me.tbZahlungsinfo.Name = "tbZahlungsinfo"
-        Me.tbZahlungsinfo.Size = New System.Drawing.Size(672, 458)
-        Me.tbZahlungsinfo.TabIndex = 11
-        Me.tbZahlungsinfo.Text = "Zahlungsinfo"
-        Me.tbZahlungsinfo.UseVisualStyleBackColor = True
+        Me.lblHandelregisterNr.AutoSize = True
+        Me.lblHandelregisterNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblHandelregisterNr.Location = New System.Drawing.Point(6, 161)
+        Me.lblHandelregisterNr.Name = "lblHandelregisterNr"
+        Me.lblHandelregisterNr.Size = New System.Drawing.Size(100, 13)
+        Me.lblHandelregisterNr.TabIndex = 132
+        Me.lblHandelregisterNr.Text = "Handelsregister-Nr.:"
+        Me.lblHandelregisterNr.Visible = False
        '
-        'rtb_Zahlungsinfo
+        'txtHandelsregisterNr
        '
-        Me.rtb_Zahlungsinfo.Location = New System.Drawing.Point(6, 35)
-        Me.rtb_Zahlungsinfo.Name = "rtb_Zahlungsinfo"
-        Me.rtb_Zahlungsinfo.Size = New System.Drawing.Size(660, 412)
-        Me.rtb_Zahlungsinfo.TabIndex = 40
-        Me.rtb_Zahlungsinfo.Text = ""
-        '
-        'Label102
-        '
-        Me.Label102.AutoSize = True
-        Me.Label102.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
-        Me.Label102.Location = New System.Drawing.Point(3, 18)
-        Me.Label102.Name = "Label102"
-        Me.Label102.Size = New System.Drawing.Size(66, 13)
-        Me.Label102.TabIndex = 132
-        Me.Label102.Text = "Zahlunginfo:"
+        Me.txtHandelsregisterNr._DateTimeOnly = False
+        Me.txtHandelsregisterNr._numbersOnly = False
+        Me.txtHandelsregisterNr._numbersOnlyKommastellen = ""
+        Me.txtHandelsregisterNr._numbersOnlyTrennzeichen = True
+        Me.txtHandelsregisterNr._Prozent = False
+        Me.txtHandelsregisterNr._ShortDateNew = False
+        Me.txtHandelsregisterNr._ShortDateOnly = False
+        Me.txtHandelsregisterNr._TimeOnly = False
+        Me.txtHandelsregisterNr._TimeOnly_Seconds = False
+        Me.txtHandelsregisterNr._value = ""
+        Me.txtHandelsregisterNr._Waehrung = False
+        Me.txtHandelsregisterNr._WaehrungZeichen = True
+        Me.txtHandelsregisterNr.ForeColor = System.Drawing.Color.Black
+        Me.txtHandelsregisterNr.Location = New System.Drawing.Point(111, 158)
+        Me.txtHandelsregisterNr.MaxLength = 17
+        Me.txtHandelsregisterNr.MaxLineLength = -1
+        Me.txtHandelsregisterNr.MaxLines_Warning = ""
+        Me.txtHandelsregisterNr.MaxLines_Warning_Label = Nothing
+        Me.txtHandelsregisterNr.Name = "txtHandelsregisterNr"
+        Me.txtHandelsregisterNr.Size = New System.Drawing.Size(333, 20)
+        Me.txtHandelsregisterNr.TabIndex = 133
+        Me.txtHandelsregisterNr.Visible = False
        '
        'usrcntlKundeBearbeitenFull
        '
@@ -4666,6 +4706,8 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.tbSchnittstellen.ResumeLayout(False)
        Me.tbSchnittstellen.PerformLayout()
        CType(Me.DataGridView1, System.ComponentModel.ISupportInitialize).EndInit()
+        Me.tbZahlungsinfo.ResumeLayout(False)
+        Me.tbZahlungsinfo.PerformLayout()
        Me.GroupBox3.ResumeLayout(False)
        Me.GroupBox3.PerformLayout()
        CType(Me.PictureBox5, System.ComponentModel.ISupportInitialize).EndInit()
@@ -4677,8 +4719,6 @@ Partial Class usrcntlKundeBearbeitenFull
        Me.TabPage11.ResumeLayout(False)
        Me.pnlNeukunde.ResumeLayout(False)
        Me.pnlNeukunde.PerformLayout()
-        Me.tbZahlungsinfo.ResumeLayout(False)
-        Me.tbZahlungsinfo.PerformLayout()
        Me.ResumeLayout(False)
        Me.PerformLayout()

@@ -4889,7 +4929,7 @@ Partial Class usrcntlKundeBearbeitenFull
    Friend WithEvents txtVersUebergebenOPSaldo As VERAG_PROG_ALLGEMEIN.MyTextBox
    Friend WithEvents tbAufschub As System.Windows.Forms.TabPage
    Friend WithEvents txtEORI As VERAG_PROG_ALLGEMEIN.MyTextBox
-    Friend WithEvents Label33 As System.Windows.Forms.Label
+    Friend WithEvents lblEORI As System.Windows.Forms.Label
    Friend WithEvents usrCntlAufschubkonten As SDL.usrCntlAufschubkonten
    Friend WithEvents Button1 As System.Windows.Forms.Button
    Friend WithEvents Label28 As System.Windows.Forms.Label
@@ -4987,4 +5027,6 @@ Partial Class usrcntlKundeBearbeitenFull
    Friend WithEvents tbZahlungsinfo As TabPage
    Friend WithEvents Label102 As Label
    Friend WithEvents rtb_Zahlungsinfo As RichTextBox
+    Friend WithEvents txtHandelsregisterNr As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Friend WithEvents lblHandelregisterNr As Label
 End Class