Änderungen AMBAR

This commit is contained in:
2025-04-04 08:17:02 +02:00
parent 3c0da09315
commit e386fa6655
39 changed files with 1937 additions and 1490 deletions

View File

@@ -28,6 +28,8 @@ Partial Class frmDetails
Me.btnCancel = New System.Windows.Forms.Button()
Me.tabKunde = New System.Windows.Forms.TabControl()
Me.tab1Allg = New System.Windows.Forms.TabPage()
Me.txtTIMOCOM = New System.Windows.Forms.TextBox()
Me.Label16 = New System.Windows.Forms.Label()
Me.btnVERAGKDLaden = New System.Windows.Forms.Button()
Me.Label15 = New System.Windows.Forms.Label()
Me.kdFirma = New VERAG_PROG_ALLGEMEIN.KdSearchBox()
@@ -133,8 +135,7 @@ Partial Class frmDetails
Me.Label14 = New System.Windows.Forms.Label()
Me.btnSave = New System.Windows.Forms.Button()
Me.cboRolle = New DISPO.MyComboBox(Me.components)
Me.Label16 = New System.Windows.Forms.Label()
Me.txtTIMOCOM = New System.Windows.Forms.TextBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.tabKunde.SuspendLayout()
Me.tab1Allg.SuspendLayout()
Me.GroupBox1.SuspendLayout()
@@ -181,6 +182,7 @@ Partial Class frmDetails
'
'tab1Allg
'
Me.tab1Allg.Controls.Add(Me.Button1)
Me.tab1Allg.Controls.Add(Me.txtTIMOCOM)
Me.tab1Allg.Controls.Add(Me.Label16)
Me.tab1Allg.Controls.Add(Me.btnVERAGKDLaden)
@@ -272,27 +274,44 @@ Partial Class frmDetails
Me.tab1Allg.Text = "Allgemein"
Me.tab1Allg.UseVisualStyleBackColor = True
'
'txtTIMOCOM
'
Me.txtTIMOCOM.Location = New System.Drawing.Point(116, 360)
Me.txtTIMOCOM.Name = "txtTIMOCOM"
Me.txtTIMOCOM.Size = New System.Drawing.Size(296, 20)
Me.txtTIMOCOM.TabIndex = 516
'
'Label16
'
Me.Label16.AutoSize = True
Me.Label16.Location = New System.Drawing.Point(12, 366)
Me.Label16.Name = "Label16"
Me.Label16.Size = New System.Drawing.Size(61, 13)
Me.Label16.TabIndex = 515
Me.Label16.Text = "TIMOCOM:"
'
'btnVERAGKDLaden
'
Me.btnVERAGKDLaden.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnVERAGKDLaden.Location = New System.Drawing.Point(287, 342)
Me.btnVERAGKDLaden.Location = New System.Drawing.Point(112, 36)
Me.btnVERAGKDLaden.Name = "btnVERAGKDLaden"
Me.btnVERAGKDLaden.Size = New System.Drawing.Size(125, 23)
Me.btnVERAGKDLaden.TabIndex = 513
Me.btnVERAGKDLaden.Text = "VERAG KD laden"
Me.btnVERAGKDLaden.Text = "AVISO KD laden"
Me.btnVERAGKDLaden.UseVisualStyleBackColor = True
'
'Label15
'
Me.Label15.AutoSize = True
Me.Label15.Location = New System.Drawing.Point(12, 373)
Me.Label15.Location = New System.Drawing.Point(8, 15)
Me.Label15.Name = "Label15"
Me.Label15.Size = New System.Drawing.Size(63, 13)
Me.Label15.Size = New System.Drawing.Size(58, 13)
Me.Label15.TabIndex = 512
Me.Label15.Text = "VERAG-Kd:"
Me.Label15.Text = "AVISO-Kd:"
'
'kdFirma
'
Me.kdFirma._AlleFirmenCLUSTER = False
Me.kdFirma._AllowSetValue = True
Me.kdFirma._autoSizeGross = False
Me.kdFirma._display_Name1 = False
@@ -300,19 +319,22 @@ Partial Class frmDetails
Me.kdFirma._displayFullName = False
Me.kdFirma._displayWoelflKd = False
Me.kdFirma._hideIfListEmpty = True
Me.kdFirma._loadKdData = False
Me.kdFirma._loadKdData = True
Me.kdFirma._searchName1 = True
Me.kdFirma._UseFIRMA = ""
Me.kdFirma._ValueKdAndName = True
Me.kdFirma.dgvpos = "LEFT"
Me.kdFirma.KdName = ""
Me.kdFirma.KdNr = "-1"
Me.kdFirma.kdNrField = Nothing
Me.kdFirma.KdNrNullInt = Nothing
Me.kdFirma.Location = New System.Drawing.Point(116, 371)
Me.kdFirma.Location = New System.Drawing.Point(112, 13)
Me.kdFirma.Name = "kdFirma"
Me.kdFirma.nurAktive = True
Me.kdFirma.searchActive = True
Me.kdFirma.Size = New System.Drawing.Size(296, 20)
Me.kdFirma.TabIndex = 511
Me.kdFirma.TIMER_SEARCH = True
Me.kdFirma.usrcntl = Nothing
'
'GroupBox1
@@ -363,7 +385,7 @@ Partial Class frmDetails
'Label27
'
Me.Label27.AutoSize = True
Me.Label27.Location = New System.Drawing.Point(303, 99)
Me.Label27.Location = New System.Drawing.Point(305, 152)
Me.Label27.Name = "Label27"
Me.Label27.Size = New System.Drawing.Size(59, 13)
Me.Label27.TabIndex = 124
@@ -372,7 +394,7 @@ Partial Class frmDetails
'Label26
'
Me.Label26.AutoSize = True
Me.Label26.Location = New System.Drawing.Point(154, 99)
Me.Label26.Location = New System.Drawing.Point(156, 152)
Me.Label26.Name = "Label26"
Me.Label26.Size = New System.Drawing.Size(49, 13)
Me.Label26.TabIndex = 123
@@ -380,14 +402,14 @@ Partial Class frmDetails
'
'txtAnspr2_nn
'
Me.txtAnspr2_nn.Location = New System.Drawing.Point(261, 141)
Me.txtAnspr2_nn.Location = New System.Drawing.Point(263, 194)
Me.txtAnspr2_nn.Name = "txtAnspr2_nn"
Me.txtAnspr2_nn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr2_nn.TabIndex = 9
'
'txtAnspr2_vn
'
Me.txtAnspr2_vn.Location = New System.Drawing.Point(110, 141)
Me.txtAnspr2_vn.Location = New System.Drawing.Point(112, 194)
Me.txtAnspr2_vn.Name = "txtAnspr2_vn"
Me.txtAnspr2_vn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr2_vn.TabIndex = 8
@@ -871,7 +893,7 @@ Partial Class frmDetails
'
Me.Label12.AutoSize = True
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label12.Location = New System.Drawing.Point(10, 182)
Me.Label12.Location = New System.Drawing.Point(12, 235)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(51, 13)
Me.Label12.TabIndex = 69
@@ -880,7 +902,7 @@ Partial Class frmDetails
'Label8
'
Me.Label8.AutoSize = True
Me.Label8.Location = New System.Drawing.Point(10, 284)
Me.Label8.Location = New System.Drawing.Point(12, 337)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(62, 13)
Me.Label8.TabIndex = 68
@@ -888,7 +910,7 @@ Partial Class frmDetails
'
'txtHomepage
'
Me.txtHomepage.Location = New System.Drawing.Point(114, 281)
Me.txtHomepage.Location = New System.Drawing.Point(116, 334)
Me.txtHomepage.Name = "txtHomepage"
Me.txtHomepage.Size = New System.Drawing.Size(296, 20)
Me.txtHomepage.TabIndex = 13
@@ -896,7 +918,7 @@ Partial Class frmDetails
'Label11
'
Me.Label11.AutoSize = True
Me.Label11.Location = New System.Drawing.Point(10, 258)
Me.Label11.Location = New System.Drawing.Point(12, 311)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(39, 13)
Me.Label11.TabIndex = 66
@@ -904,7 +926,7 @@ Partial Class frmDetails
'
'txtEmail
'
Me.txtEmail.Location = New System.Drawing.Point(114, 255)
Me.txtEmail.Location = New System.Drawing.Point(116, 308)
Me.txtEmail.Name = "txtEmail"
Me.txtEmail.Size = New System.Drawing.Size(296, 20)
Me.txtEmail.TabIndex = 12
@@ -912,7 +934,7 @@ Partial Class frmDetails
'Label7
'
Me.Label7.AutoSize = True
Me.Label7.Location = New System.Drawing.Point(10, 232)
Me.Label7.Location = New System.Drawing.Point(12, 285)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(27, 13)
Me.Label7.TabIndex = 64
@@ -920,7 +942,7 @@ Partial Class frmDetails
'
'txtFax
'
Me.txtFax.Location = New System.Drawing.Point(114, 229)
Me.txtFax.Location = New System.Drawing.Point(116, 282)
Me.txtFax.Name = "txtFax"
Me.txtFax.Size = New System.Drawing.Size(296, 20)
Me.txtFax.TabIndex = 11
@@ -928,7 +950,7 @@ Partial Class frmDetails
'Label6
'
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(10, 206)
Me.Label6.Location = New System.Drawing.Point(12, 259)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(46, 13)
Me.Label6.TabIndex = 62
@@ -936,14 +958,14 @@ Partial Class frmDetails
'
'txtTel
'
Me.txtTel.Location = New System.Drawing.Point(114, 203)
Me.txtTel.Location = New System.Drawing.Point(116, 256)
Me.txtTel.Name = "txtTel"
Me.txtTel.Size = New System.Drawing.Size(296, 20)
Me.txtTel.TabIndex = 10
'
'txtStrNr
'
Me.txtStrNr.Location = New System.Drawing.Point(351, 39)
Me.txtStrNr.Location = New System.Drawing.Point(353, 92)
Me.txtStrNr.Name = "txtStrNr"
Me.txtStrNr.Size = New System.Drawing.Size(55, 20)
Me.txtStrNr.TabIndex = 2
@@ -951,7 +973,7 @@ Partial Class frmDetails
'Label10
'
Me.Label10.AutoSize = True
Me.Label10.Location = New System.Drawing.Point(6, 144)
Me.Label10.Location = New System.Drawing.Point(8, 197)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(103, 13)
Me.Label10.TabIndex = 58
@@ -959,7 +981,7 @@ Partial Class frmDetails
'
'txtAnspr1_nn
'
Me.txtAnspr1_nn.Location = New System.Drawing.Point(261, 115)
Me.txtAnspr1_nn.Location = New System.Drawing.Point(263, 168)
Me.txtAnspr1_nn.Name = "txtAnspr1_nn"
Me.txtAnspr1_nn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr1_nn.TabIndex = 7
@@ -967,7 +989,7 @@ Partial Class frmDetails
'Label5
'
Me.Label5.AutoSize = True
Me.Label5.Location = New System.Drawing.Point(6, 118)
Me.Label5.Location = New System.Drawing.Point(8, 171)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(97, 13)
Me.Label5.TabIndex = 55
@@ -975,7 +997,7 @@ Partial Class frmDetails
'
'txtAnspr1_vn
'
Me.txtAnspr1_vn.Location = New System.Drawing.Point(110, 115)
Me.txtAnspr1_vn.Location = New System.Drawing.Point(112, 168)
Me.txtAnspr1_vn.Name = "txtAnspr1_vn"
Me.txtAnspr1_vn.Size = New System.Drawing.Size(145, 20)
Me.txtAnspr1_vn.TabIndex = 6
@@ -984,14 +1006,14 @@ Partial Class frmDetails
'
Me.cbxLand.FormattingEnabled = True
Me.cbxLand.Items.AddRange(New Object() {"AT", "DE", "HR", "IT", "RO", "SRB", "TR"})
Me.cbxLand.Location = New System.Drawing.Point(110, 64)
Me.cbxLand.Location = New System.Drawing.Point(112, 117)
Me.cbxLand.Name = "cbxLand"
Me.cbxLand.Size = New System.Drawing.Size(55, 21)
Me.cbxLand.TabIndex = 5
'
'txtOrt
'
Me.txtOrt.Location = New System.Drawing.Point(232, 65)
Me.txtOrt.Location = New System.Drawing.Point(234, 118)
Me.txtOrt.Name = "txtOrt"
Me.txtOrt.Size = New System.Drawing.Size(174, 20)
Me.txtOrt.TabIndex = 4
@@ -999,7 +1021,7 @@ Partial Class frmDetails
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(6, 68)
Me.Label3.Location = New System.Drawing.Point(8, 121)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(90, 13)
Me.Label3.TabIndex = 41
@@ -1007,7 +1029,7 @@ Partial Class frmDetails
'
'txtPlz
'
Me.txtPlz.Location = New System.Drawing.Point(171, 65)
Me.txtPlz.Location = New System.Drawing.Point(173, 118)
Me.txtPlz.Name = "txtPlz"
Me.txtPlz.Size = New System.Drawing.Size(55, 20)
Me.txtPlz.TabIndex = 3
@@ -1015,7 +1037,7 @@ Partial Class frmDetails
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(6, 42)
Me.Label2.Location = New System.Drawing.Point(8, 95)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(63, 13)
Me.Label2.TabIndex = 39
@@ -1023,7 +1045,7 @@ Partial Class frmDetails
'
'txtStr
'
Me.txtStr.Location = New System.Drawing.Point(110, 39)
Me.txtStr.Location = New System.Drawing.Point(112, 92)
Me.txtStr.Name = "txtStr"
Me.txtStr.Size = New System.Drawing.Size(235, 20)
Me.txtStr.TabIndex = 1
@@ -1032,7 +1054,7 @@ Partial Class frmDetails
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(6, 16)
Me.Label1.Location = New System.Drawing.Point(8, 69)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(41, 13)
Me.Label1.TabIndex = 37
@@ -1041,7 +1063,7 @@ Partial Class frmDetails
'txtFirma
'
Me.txtFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtFirma.Location = New System.Drawing.Point(110, 13)
Me.txtFirma.Location = New System.Drawing.Point(112, 66)
Me.txtFirma.Name = "txtFirma"
Me.txtFirma.Size = New System.Drawing.Size(296, 20)
Me.txtFirma.TabIndex = 0
@@ -1202,21 +1224,15 @@ Partial Class frmDetails
Me.cboRolle.Size = New System.Drawing.Size(295, 21)
Me.cboRolle.TabIndex = 511
'
'Label16
'Button1
'
Me.Label16.AutoSize = True
Me.Label16.Location = New System.Drawing.Point(10, 313)
Me.Label16.Name = "Label16"
Me.Label16.Size = New System.Drawing.Size(61, 13)
Me.Label16.TabIndex = 515
Me.Label16.Text = "TIMOCOM:"
'
'txtTIMOCOM
'
Me.txtTIMOCOM.Location = New System.Drawing.Point(114, 307)
Me.txtTIMOCOM.Name = "txtTIMOCOM"
Me.txtTIMOCOM.Size = New System.Drawing.Size(296, 20)
Me.txtTIMOCOM.TabIndex = 516
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button1.Location = New System.Drawing.Point(283, 36)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(125, 23)
Me.Button1.TabIndex = 517
Me.Button1.Text = "AVISO KD öffnen >>"
Me.Button1.UseVisualStyleBackColor = True
'
'frmDetails
'
@@ -1368,4 +1384,5 @@ Partial Class frmDetails
Friend WithEvents btnVERAGKDLaden As System.Windows.Forms.Button
Friend WithEvents txtTIMOCOM As TextBox
Friend WithEvents Label16 As Label
Friend WithEvents Button1 As Button
End Class