diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb
index 33a831c9..ce57e740 100644
--- a/SDL/Fakturierung/cFakturierung.vb
+++ b/SDL/Fakturierung/cFakturierung.vb
@@ -1635,12 +1635,14 @@ Public Class cFakturierung
Dim RG_NR As New VERAG_PROG_ALLGEMEIN.cRechnungsnummern(RECHNUNG.Firma_ID, RECHNUNG.Buchungsjahr)
' Prüfung, ob RgNr schon vergeben wurde --> dann +1, bis freie Nr. (sollte EÜGENTLICH nicht vorkommen)
RG_NR.CHECK_RGNR()
- ' Nächste Rechnungsnummer speichern.
RECHNUNG.[RechnungsNr] = RG_NR.LfdRechnungsNr
+ ' Nächste Rechnungsnummer speichern.
+ RG_NR.INCREASE_RGNR() ' SOFORT Speichern, Sonst gibt es wieder eine Doppelvergabe!
+
'RECHNUNG.[LfdRechnungsNr] = RG_NR.LfdRechnungsNr
If RECHNUNG.SAVE Then
- RG_NR.INCREASE_RGNR()
Else
+ RG_NR.DECREASE_RGNR() ' Bei Fehler --> LfdRgNr um eins mindern.
Return False
End If
diff --git a/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb b/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb
index 3dd30e31..2b0cc524 100644
--- a/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb
+++ b/SDL/Fakturierung/usrCntlFaktAbrechnung.Designer.vb
@@ -300,10 +300,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label9.AutoSize = True
Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label9.Location = New System.Drawing.Point(9, 29)
- Me.Label9.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label9.Location = New System.Drawing.Point(6, 19)
Me.Label9.Name = "Label9"
- Me.Label9.Size = New System.Drawing.Size(134, 22)
+ Me.Label9.Size = New System.Drawing.Size(96, 15)
Me.Label9.TabIndex = 0
Me.Label9.Text = "Rechnung an:"
'
@@ -311,10 +310,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label4.AutoSize = True
Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
- Me.Label4.Location = New System.Drawing.Point(4, 9)
- Me.Label4.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label4.Location = New System.Drawing.Point(3, 6)
Me.Label4.Name = "Label4"
- Me.Label4.Size = New System.Drawing.Size(111, 20)
+ Me.Label4.Size = New System.Drawing.Size(79, 13)
Me.Label4.TabIndex = 0
Me.Label4.Text = "1. Absender:"
'
@@ -355,9 +353,8 @@ Partial Class usrCntlFaktAbrechnung
Me.pnlTop.Controls.Add(Me.lblRechnungsNummer)
Me.pnlTop.Dock = System.Windows.Forms.DockStyle.Top
Me.pnlTop.Location = New System.Drawing.Point(0, 0)
- Me.pnlTop.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
Me.pnlTop.Name = "pnlTop"
- Me.pnlTop.Size = New System.Drawing.Size(1245, 128)
+ Me.pnlTop.Size = New System.Drawing.Size(830, 84)
Me.pnlTop.TabIndex = 0
'
'Label53
@@ -366,10 +363,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Label53.BackColor = System.Drawing.Color.Red
Me.Label53.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label53.ForeColor = System.Drawing.Color.White
- Me.Label53.Location = New System.Drawing.Point(727, 3)
- Me.Label53.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label53.Location = New System.Drawing.Point(484, 2)
Me.Label53.Name = "Label53"
- Me.Label53.Size = New System.Drawing.Size(336, 75)
+ Me.Label53.Size = New System.Drawing.Size(224, 49)
Me.Label53.TabIndex = 45
Me.Label53.Text = "ACHTUNG:" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Es wurde bereits eine Rechnung zu dieser Pos-Nr. erstellt!"
Me.Label53.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -379,10 +375,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Button13.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button13.ForeColor = System.Drawing.Color.White
- Me.Button13.Location = New System.Drawing.Point(681, 9)
- Me.Button13.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button13.Location = New System.Drawing.Point(454, 6)
Me.Button13.Name = "Button13"
- Me.Button13.Size = New System.Drawing.Size(48, 37)
+ Me.Button13.Size = New System.Drawing.Size(32, 24)
Me.Button13.TabIndex = 28
Me.Button13.Tag = "+ SpedBuch"
Me.Button13.Text = "+"
@@ -392,10 +387,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button10.ForeColor = System.Drawing.Color.White
- Me.Button10.Location = New System.Drawing.Point(496, 9)
- Me.Button10.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button10.Location = New System.Drawing.Point(331, 6)
Me.Button10.Name = "Button10"
- Me.Button10.Size = New System.Drawing.Size(186, 37)
+ Me.Button10.Size = New System.Drawing.Size(124, 24)
Me.Button10.TabIndex = 15
Me.Button10.Text = "SpedBuch anzeigen"
Me.Button10.UseVisualStyleBackColor = True
@@ -406,10 +400,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Button11.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button11.ForeColor = System.Drawing.Color.White
Me.Button11.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button11.Location = New System.Drawing.Point(328, 9)
- Me.Button11.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button11.Location = New System.Drawing.Point(219, 6)
Me.Button11.Name = "Button11"
- Me.Button11.Size = New System.Drawing.Size(160, 37)
+ Me.Button11.Size = New System.Drawing.Size(107, 24)
Me.Button11.TabIndex = 20
Me.Button11.Text = "Gutschrift aus RG"
Me.Button11.UseVisualStyleBackColor = True
@@ -419,10 +412,9 @@ Partial Class usrCntlFaktAbrechnung
Me.lblDruckaufheben.AutoSize = True
Me.lblDruckaufheben.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblDruckaufheben.LinkColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
- Me.lblDruckaufheben.Location = New System.Drawing.Point(744, 74)
- Me.lblDruckaufheben.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblDruckaufheben.Location = New System.Drawing.Point(496, 48)
Me.lblDruckaufheben.Name = "lblDruckaufheben"
- Me.lblDruckaufheben.Size = New System.Drawing.Size(127, 20)
+ Me.lblDruckaufheben.Size = New System.Drawing.Size(84, 13)
Me.lblDruckaufheben.TabIndex = 27
Me.lblDruckaufheben.TabStop = True
Me.lblDruckaufheben.Text = "Druck aufheben"
@@ -439,10 +431,9 @@ Partial Class usrCntlFaktAbrechnung
Me.cboRgGS.ForeColor = System.Drawing.Color.White
Me.cboRgGS.FormattingEnabled = True
Me.cboRgGS.Items.AddRange(New Object() {"Rechnung", "Gutschrift"})
- Me.cboRgGS.Location = New System.Drawing.Point(4, -2)
- Me.cboRgGS.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboRgGS.Location = New System.Drawing.Point(3, -1)
Me.cboRgGS.Name = "cboRgGS"
- Me.cboRgGS.Size = New System.Drawing.Size(314, 45)
+ Me.cboRgGS.Size = New System.Drawing.Size(211, 33)
Me.cboRgGS.TabIndex = 26
Me.cboRgGS.Text = "Rechnung"
'
@@ -452,10 +443,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Panel3.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
Me.Panel3.Controls.Add(Me.lblSendungen)
Me.Panel3.Controls.Add(Me.Label44)
- Me.Panel3.Location = New System.Drawing.Point(1069, -3)
- Me.Panel3.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Panel3.Location = New System.Drawing.Point(712, -2)
Me.Panel3.Name = "Panel3"
- Me.Panel3.Size = New System.Drawing.Size(176, 85)
+ Me.Panel3.Size = New System.Drawing.Size(117, 55)
Me.Panel3.TabIndex = 22
Me.Panel3.TabStop = True
'
@@ -465,10 +455,9 @@ Partial Class usrCntlFaktAbrechnung
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.lblSendungen.Font = New System.Drawing.Font("Microsoft Sans Serif", 20.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.lblSendungen.Location = New System.Drawing.Point(0, 6)
- Me.lblSendungen.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblSendungen.Location = New System.Drawing.Point(0, 4)
Me.lblSendungen.Name = "lblSendungen"
- Me.lblSendungen.Size = New System.Drawing.Size(176, 48)
+ Me.lblSendungen.Size = New System.Drawing.Size(117, 31)
Me.lblSendungen.TabIndex = 0
Me.lblSendungen.Text = "-"
Me.lblSendungen.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
@@ -478,10 +467,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Label44.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.Label44.Location = New System.Drawing.Point(0, 60)
- Me.Label44.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label44.Location = New System.Drawing.Point(0, 39)
Me.Label44.Name = "Label44"
- Me.Label44.Size = New System.Drawing.Size(176, 20)
+ Me.Label44.Size = New System.Drawing.Size(117, 13)
Me.Label44.TabIndex = 1
Me.Label44.Text = "Rechnung Pos."
Me.Label44.TextAlign = System.Drawing.ContentAlignment.TopCenter
@@ -493,10 +481,10 @@ Partial Class usrCntlFaktAbrechnung
Me.btnNext.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
Me.btnNext.ForeColor = System.Drawing.Color.White
Me.btnNext.ImageAlign = System.Drawing.ContentAlignment.TopCenter
- Me.btnNext.Location = New System.Drawing.Point(1132, 83)
- Me.btnNext.Margin = New System.Windows.Forms.Padding(15, 5, 4, 5)
+ Me.btnNext.Location = New System.Drawing.Point(754, 54)
+ Me.btnNext.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
Me.btnNext.Name = "btnNext"
- Me.btnNext.Size = New System.Drawing.Size(62, 42)
+ Me.btnNext.Size = New System.Drawing.Size(41, 27)
Me.btnNext.TabIndex = 24
Me.btnNext.Text = ">>"
Me.btnNext.UseVisualStyleBackColor = True
@@ -508,10 +496,10 @@ Partial Class usrCntlFaktAbrechnung
Me.btnPrev.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
Me.btnPrev.ForeColor = System.Drawing.Color.White
Me.btnPrev.ImageAlign = System.Drawing.ContentAlignment.TopCenter
- Me.btnPrev.Location = New System.Drawing.Point(1067, 83)
- Me.btnPrev.Margin = New System.Windows.Forms.Padding(15, 5, 4, 5)
+ Me.btnPrev.Location = New System.Drawing.Point(710, 54)
+ Me.btnPrev.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
Me.btnPrev.Name = "btnPrev"
- Me.btnPrev.Size = New System.Drawing.Size(62, 42)
+ Me.btnPrev.Size = New System.Drawing.Size(41, 27)
Me.btnPrev.TabIndex = 23
Me.btnPrev.Text = "<<"
Me.btnPrev.UseVisualStyleBackColor = True
@@ -523,10 +511,10 @@ Partial Class usrCntlFaktAbrechnung
Me.btnNeueUnterNR.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
Me.btnNeueUnterNR.ForeColor = System.Drawing.Color.White
Me.btnNeueUnterNR.ImageAlign = System.Drawing.ContentAlignment.TopCenter
- Me.btnNeueUnterNR.Location = New System.Drawing.Point(1197, 83)
- Me.btnNeueUnterNR.Margin = New System.Windows.Forms.Padding(15, 5, 4, 5)
+ Me.btnNeueUnterNR.Location = New System.Drawing.Point(797, 54)
+ Me.btnNeueUnterNR.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
Me.btnNeueUnterNR.Name = "btnNeueUnterNR"
- Me.btnNeueUnterNR.Size = New System.Drawing.Size(45, 42)
+ Me.btnNeueUnterNR.Size = New System.Drawing.Size(30, 27)
Me.btnNeueUnterNR.TabIndex = 25
Me.btnNeueUnterNR.Text = "+"
Me.btnNeueUnterNR.UseVisualStyleBackColor = True
@@ -534,10 +522,9 @@ Partial Class usrCntlFaktAbrechnung
'Label45
'
Me.Label45.ForeColor = System.Drawing.Color.White
- Me.Label45.Location = New System.Drawing.Point(712, 94)
- Me.Label45.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label45.Location = New System.Drawing.Point(475, 61)
Me.Label45.Name = "Label45"
- Me.Label45.Size = New System.Drawing.Size(158, 20)
+ Me.Label45.Size = New System.Drawing.Size(105, 13)
Me.Label45.TabIndex = 20
Me.Label45.Text = "Sachbearbeiter:"
Me.Label45.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -547,10 +534,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Label42.AutoSize = True
Me.Label42.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
Me.Label42.ForeColor = System.Drawing.Color.White
- Me.Label42.Location = New System.Drawing.Point(621, 49)
- Me.Label42.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label42.Location = New System.Drawing.Point(414, 32)
Me.Label42.Name = "Label42"
- Me.Label42.Size = New System.Drawing.Size(94, 20)
+ Me.Label42.Size = New System.Drawing.Size(64, 13)
Me.Label42.TabIndex = 19
Me.Label42.Text = "UnterNr Rg."
'
@@ -559,10 +545,9 @@ Partial Class usrCntlFaktAbrechnung
Me.btnDatenLaden.BackColor = System.Drawing.Color.Transparent
Me.btnDatenLaden.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnDatenLaden.ForeColor = System.Drawing.Color.White
- Me.btnDatenLaden.Location = New System.Drawing.Point(496, 55)
- Me.btnDatenLaden.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.btnDatenLaden.Location = New System.Drawing.Point(331, 36)
Me.btnDatenLaden.Name = "btnDatenLaden"
- Me.btnDatenLaden.Size = New System.Drawing.Size(124, 52)
+ Me.btnDatenLaden.Size = New System.Drawing.Size(83, 34)
Me.btnDatenLaden.TabIndex = 6
Me.btnDatenLaden.Text = "Daten laden"
Me.btnDatenLaden.UseVisualStyleBackColor = False
@@ -574,9 +559,10 @@ Partial Class usrCntlFaktAbrechnung
Me.cboSpedBuchUnterNr._value = ""
Me.cboSpedBuchUnterNr.DropDownWidth = 350
Me.cboSpedBuchUnterNr.FormattingEnabled = True
- Me.cboSpedBuchUnterNr.Location = New System.Drawing.Point(382, 74)
+ Me.cboSpedBuchUnterNr.Location = New System.Drawing.Point(255, 48)
+ Me.cboSpedBuchUnterNr.Margin = New System.Windows.Forms.Padding(2)
Me.cboSpedBuchUnterNr.Name = "cboSpedBuchUnterNr"
- Me.cboSpedBuchUnterNr.Size = New System.Drawing.Size(104, 28)
+ Me.cboSpedBuchUnterNr.Size = New System.Drawing.Size(71, 21)
Me.cboSpedBuchUnterNr.TabIndex = 5
'
'lblErrFiliale
@@ -584,10 +570,9 @@ Partial Class usrCntlFaktAbrechnung
Me.lblErrFiliale.AutoSize = True
Me.lblErrFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
Me.lblErrFiliale.ForeColor = System.Drawing.Color.Red
- Me.lblErrFiliale.Location = New System.Drawing.Point(10, 106)
- Me.lblErrFiliale.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblErrFiliale.Location = New System.Drawing.Point(7, 69)
Me.lblErrFiliale.Name = "lblErrFiliale"
- Me.lblErrFiliale.Size = New System.Drawing.Size(136, 20)
+ Me.lblErrFiliale.Size = New System.Drawing.Size(97, 13)
Me.lblErrFiliale.TabIndex = 12
Me.lblErrFiliale.Text = "Filiale angeben!"
Me.lblErrFiliale.Visible = False
@@ -597,10 +582,9 @@ Partial Class usrCntlFaktAbrechnung
Me.lblErrUnterNr.AutoSize = True
Me.lblErrUnterNr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
Me.lblErrUnterNr.ForeColor = System.Drawing.Color.Red
- Me.lblErrUnterNr.Location = New System.Drawing.Point(240, 106)
- Me.lblErrUnterNr.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblErrUnterNr.Location = New System.Drawing.Point(160, 69)
Me.lblErrUnterNr.Name = "lblErrUnterNr"
- Me.lblErrUnterNr.Size = New System.Drawing.Size(235, 20)
+ Me.lblErrUnterNr.Size = New System.Drawing.Size(165, 13)
Me.lblErrUnterNr.TabIndex = 16
Me.lblErrUnterNr.Text = "UnterNr im falschen Format!"
Me.lblErrUnterNr.Visible = False
@@ -610,10 +594,9 @@ Partial Class usrCntlFaktAbrechnung
Me.lblAbfNrExists.AutoSize = True
Me.lblAbfNrExists.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
Me.lblAbfNrExists.ForeColor = System.Drawing.Color.Red
- Me.lblAbfNrExists.Location = New System.Drawing.Point(124, 106)
- Me.lblAbfNrExists.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblAbfNrExists.Location = New System.Drawing.Point(83, 69)
Me.lblAbfNrExists.Name = "lblAbfNrExists"
- Me.lblAbfNrExists.Size = New System.Drawing.Size(306, 20)
+ Me.lblAbfNrExists.Size = New System.Drawing.Size(217, 13)
Me.lblAbfNrExists.TabIndex = 18
Me.lblAbfNrExists.Text = "Speditionsbucheintrag existiert nicht!"
Me.lblAbfNrExists.Visible = False
@@ -623,10 +606,9 @@ Partial Class usrCntlFaktAbrechnung
Me.lblAbfNr_Err.AutoSize = True
Me.lblAbfNr_Err.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
Me.lblAbfNr_Err.ForeColor = System.Drawing.Color.Red
- Me.lblAbfNr_Err.Location = New System.Drawing.Point(128, 106)
- Me.lblAbfNr_Err.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblAbfNr_Err.Location = New System.Drawing.Point(85, 69)
Me.lblAbfNr_Err.Name = "lblAbfNr_Err"
- Me.lblAbfNr_Err.Size = New System.Drawing.Size(339, 20)
+ Me.lblAbfNr_Err.Size = New System.Drawing.Size(235, 13)
Me.lblAbfNr_Err.TabIndex = 13
Me.lblAbfNr_Err.Text = "Abfertigungsnummer im falschen Format!"
Me.lblAbfNr_Err.Visible = False
@@ -636,20 +618,18 @@ Partial Class usrCntlFaktAbrechnung
Me.Label8.AutoSize = True
Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
Me.Label8.ForeColor = System.Drawing.Color.White
- Me.Label8.Location = New System.Drawing.Point(8, 51)
- Me.Label8.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label8.Location = New System.Drawing.Point(5, 33)
Me.Label8.Name = "Label8"
- Me.Label8.Size = New System.Drawing.Size(98, 20)
+ Me.Label8.Size = New System.Drawing.Size(69, 13)
Me.Label8.TabIndex = 1
Me.Label8.Text = "Filiale / Scan"
'
'Label41
'
Me.Label41.ForeColor = System.Drawing.Color.White
- Me.Label41.Location = New System.Drawing.Point(712, 54)
- Me.Label41.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label41.Location = New System.Drawing.Point(475, 35)
Me.Label41.Name = "Label41"
- Me.Label41.Size = New System.Drawing.Size(158, 20)
+ Me.Label41.Size = New System.Drawing.Size(105, 13)
Me.Label41.TabIndex = 14
Me.Label41.Text = "Druck-Datum:"
Me.Label41.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -659,6 +639,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtUnterNr._DateTimeOnly = False
Me.txtUnterNr._numbersOnly = False
Me.txtUnterNr._numbersOnlyKommastellen = ""
+ Me.txtUnterNr._numbersOnlyTrennzeichen = True
Me.txtUnterNr._Prozent = False
Me.txtUnterNr._ShortDateNew = False
Me.txtUnterNr._ShortDateOnly = False
@@ -668,14 +649,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtUnterNr._Waehrung = False
Me.txtUnterNr._WaehrungZeichen = True
Me.txtUnterNr.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!)
- Me.txtUnterNr.Location = New System.Drawing.Point(626, 74)
- Me.txtUnterNr.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtUnterNr.Location = New System.Drawing.Point(417, 48)
Me.txtUnterNr.MaxLineLength = -1
Me.txtUnterNr.MaxLines_Warning = ""
Me.txtUnterNr.MaxLines_Warning_Label = Nothing
Me.txtUnterNr.Name = "txtUnterNr"
Me.txtUnterNr.ReadOnly = True
- Me.txtUnterNr.Size = New System.Drawing.Size(80, 28)
+ Me.txtUnterNr.Size = New System.Drawing.Size(55, 21)
Me.txtUnterNr.TabIndex = 7
'
'Label11
@@ -683,10 +663,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Label11.AutoSize = True
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
Me.Label11.ForeColor = System.Drawing.Color.White
- Me.Label11.Location = New System.Drawing.Point(124, 49)
- Me.Label11.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label11.Location = New System.Drawing.Point(83, 32)
Me.Label11.Name = "Label11"
- Me.Label11.Size = New System.Drawing.Size(158, 20)
+ Me.Label11.Size = New System.Drawing.Size(103, 13)
Me.Label11.TabIndex = 0
Me.Label11.Text = "Abfertigungsnummer"
'
@@ -695,10 +674,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Label12.AutoSize = True
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
Me.Label12.ForeColor = System.Drawing.Color.White
- Me.Label12.Location = New System.Drawing.Point(378, 51)
- Me.Label12.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label12.Location = New System.Drawing.Point(252, 33)
Me.Label12.Name = "Label12"
- Me.Label12.Size = New System.Drawing.Size(65, 20)
+ Me.Label12.Size = New System.Drawing.Size(44, 13)
Me.Label12.TabIndex = 2
Me.Label12.Text = "UnterNr"
'
@@ -710,10 +688,9 @@ Partial Class usrCntlFaktAbrechnung
Me.cboFiliale.DropDownWidth = 280
Me.cboFiliale.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.cboFiliale.FormattingEnabled = True
- Me.cboFiliale.Location = New System.Drawing.Point(12, 74)
- Me.cboFiliale.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboFiliale.Location = New System.Drawing.Point(8, 48)
Me.cboFiliale.Name = "cboFiliale"
- Me.cboFiliale.Size = New System.Drawing.Size(118, 28)
+ Me.cboFiliale.Size = New System.Drawing.Size(80, 21)
Me.cboFiliale.TabIndex = 3
'
'txtAbfertigungsnummer
@@ -721,6 +698,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbfertigungsnummer._DateTimeOnly = False
Me.txtAbfertigungsnummer._numbersOnly = True
Me.txtAbfertigungsnummer._numbersOnlyKommastellen = ""
+ Me.txtAbfertigungsnummer._numbersOnlyTrennzeichen = True
Me.txtAbfertigungsnummer._Prozent = False
Me.txtAbfertigungsnummer._ShortDateNew = False
Me.txtAbfertigungsnummer._ShortDateOnly = False
@@ -730,23 +708,21 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbfertigungsnummer._Waehrung = False
Me.txtAbfertigungsnummer._WaehrungZeichen = True
Me.txtAbfertigungsnummer.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!)
- Me.txtAbfertigungsnummer.Location = New System.Drawing.Point(130, 74)
- Me.txtAbfertigungsnummer.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAbfertigungsnummer.Location = New System.Drawing.Point(87, 48)
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(252, 28)
+ Me.txtAbfertigungsnummer.Size = New System.Drawing.Size(169, 21)
Me.txtAbfertigungsnummer.TabIndex = 4
'
'Label39
'
Me.Label39.ForeColor = System.Drawing.Color.White
- Me.Label39.Location = New System.Drawing.Point(712, 34)
- Me.Label39.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label39.Location = New System.Drawing.Point(475, 22)
Me.Label39.Name = "Label39"
- Me.Label39.Size = New System.Drawing.Size(158, 20)
+ Me.Label39.Size = New System.Drawing.Size(105, 13)
Me.Label39.TabIndex = 10
Me.Label39.Text = "Rechnungs-Datum:"
Me.Label39.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -754,10 +730,9 @@ Partial Class usrCntlFaktAbrechnung
'Label38
'
Me.Label38.ForeColor = System.Drawing.Color.White
- Me.Label38.Location = New System.Drawing.Point(712, 12)
- Me.Label38.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label38.Location = New System.Drawing.Point(475, 8)
Me.Label38.Name = "Label38"
- Me.Label38.Size = New System.Drawing.Size(158, 20)
+ Me.Label38.Size = New System.Drawing.Size(105, 13)
Me.Label38.TabIndex = 8
Me.Label38.Text = "Rechnungs-Nr.:"
Me.Label38.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -766,10 +741,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.lblSB.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblSB.ForeColor = System.Drawing.Color.White
- Me.lblSB.Location = New System.Drawing.Point(855, 94)
- Me.lblSB.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblSB.Location = New System.Drawing.Point(570, 61)
Me.lblSB.Name = "lblSB"
- Me.lblSB.Size = New System.Drawing.Size(207, 20)
+ Me.lblSB.Size = New System.Drawing.Size(138, 13)
Me.lblSB.TabIndex = 21
Me.lblSB.Text = "-"
Me.lblSB.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -778,10 +752,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.lblDruckDatum.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblDruckDatum.ForeColor = System.Drawing.Color.White
- Me.lblDruckDatum.Location = New System.Drawing.Point(855, 54)
- Me.lblDruckDatum.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblDruckDatum.Location = New System.Drawing.Point(570, 35)
Me.lblDruckDatum.Name = "lblDruckDatum"
- Me.lblDruckDatum.Size = New System.Drawing.Size(207, 20)
+ Me.lblDruckDatum.Size = New System.Drawing.Size(138, 13)
Me.lblDruckDatum.TabIndex = 17
Me.lblDruckDatum.Text = "000"
Me.lblDruckDatum.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -790,10 +763,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.lblRechnungsDatum.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblRechnungsDatum.ForeColor = System.Drawing.Color.White
- Me.lblRechnungsDatum.Location = New System.Drawing.Point(855, 34)
- Me.lblRechnungsDatum.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblRechnungsDatum.Location = New System.Drawing.Point(570, 22)
Me.lblRechnungsDatum.Name = "lblRechnungsDatum"
- Me.lblRechnungsDatum.Size = New System.Drawing.Size(207, 20)
+ Me.lblRechnungsDatum.Size = New System.Drawing.Size(138, 13)
Me.lblRechnungsDatum.TabIndex = 11
Me.lblRechnungsDatum.Text = "000"
Me.lblRechnungsDatum.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -802,10 +774,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.lblRechnungsNummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblRechnungsNummer.ForeColor = System.Drawing.Color.White
- Me.lblRechnungsNummer.Location = New System.Drawing.Point(855, 12)
- Me.lblRechnungsNummer.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblRechnungsNummer.Location = New System.Drawing.Point(570, 8)
Me.lblRechnungsNummer.Name = "lblRechnungsNummer"
- Me.lblRechnungsNummer.Size = New System.Drawing.Size(207, 20)
+ Me.lblRechnungsNummer.Size = New System.Drawing.Size(138, 13)
Me.lblRechnungsNummer.TabIndex = 9
Me.lblRechnungsNummer.Text = "000"
Me.lblRechnungsNummer.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -862,22 +833,20 @@ Partial Class usrCntlFaktAbrechnung
Me.Panel1.Controls.Add(Me.cboWaehrungUmrechnung)
Me.Panel1.Controls.Add(Me.pnlEmpfaenger)
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
- Me.Panel1.Location = New System.Drawing.Point(0, 128)
- Me.Panel1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Panel1.Location = New System.Drawing.Point(0, 84)
Me.Panel1.Name = "Panel1"
- Me.Panel1.Size = New System.Drawing.Size(1245, 1765)
+ Me.Panel1.Size = New System.Drawing.Size(830, 1142)
Me.Panel1.TabIndex = 1
'
'txtTextZZ
'
- Me.txtTextZZ.Location = New System.Drawing.Point(96, 1632)
- Me.txtTextZZ.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtTextZZ.Location = New System.Drawing.Point(64, 1061)
Me.txtTextZZ.MaxLineLength = -1
Me.txtTextZZ.MaxLines_Warning = ""
Me.txtTextZZ.MaxLines_Warning_Label = Nothing
Me.txtTextZZ.Name = "txtTextZZ"
Me.txtTextZZ.ReadOnly = True
- Me.txtTextZZ.Size = New System.Drawing.Size(632, 33)
+ Me.txtTextZZ.Size = New System.Drawing.Size(423, 23)
Me.txtTextZZ.TabIndex = 91
Me.txtTextZZ.Text = ""
'
@@ -907,8 +876,7 @@ Partial Class usrCntlFaktAbrechnung
DataGridViewCellStyle4.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvAnhaenge.DefaultCellStyle = DataGridViewCellStyle4
- Me.dgvAnhaenge.Location = New System.Drawing.Point(740, 1402)
- Me.dgvAnhaenge.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.dgvAnhaenge.Location = New System.Drawing.Point(493, 911)
Me.dgvAnhaenge.MultiSelect = False
Me.dgvAnhaenge.Name = "dgvAnhaenge"
Me.dgvAnhaenge.ReadOnly = True
@@ -923,7 +891,7 @@ Partial Class usrCntlFaktAbrechnung
Me.dgvAnhaenge.RowHeadersVisible = False
Me.dgvAnhaenge.RowHeadersWidth = 62
Me.dgvAnhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
- Me.dgvAnhaenge.Size = New System.Drawing.Size(494, 337)
+ Me.dgvAnhaenge.Size = New System.Drawing.Size(329, 219)
Me.dgvAnhaenge.TabIndex = 90
Me.dgvAnhaenge.TabStop = False
'
@@ -985,10 +953,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label36.AutoSize = True
Me.Label36.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label36.Location = New System.Drawing.Point(735, 1378)
- Me.Label36.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label36.Location = New System.Drawing.Point(490, 896)
Me.Label36.Name = "Label36"
- Me.Label36.Size = New System.Drawing.Size(82, 20)
+ Me.Label36.Size = New System.Drawing.Size(57, 13)
Me.Label36.TabIndex = 89
Me.Label36.Text = "Anlagen:"
Me.Label36.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -996,10 +963,9 @@ Partial Class usrCntlFaktAbrechnung
'Label54
'
Me.Label54.AutoSize = True
- Me.Label54.Location = New System.Drawing.Point(884, 183)
- Me.Label54.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label54.Location = New System.Drawing.Point(589, 119)
Me.Label54.Name = "Label54"
- Me.Label54.Size = New System.Drawing.Size(151, 20)
+ Me.Label54.Size = New System.Drawing.Size(103, 13)
Me.Label54.TabIndex = 88
Me.Label54.Text = "Sprache Rechnung:"
Me.Label54.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1010,21 +976,21 @@ Partial Class usrCntlFaktAbrechnung
Me.cboRechnungSprache._allowFreiText = False
Me.cboRechnungSprache._value = ""
Me.cboRechnungSprache.FormattingEnabled = True
- Me.cboRechnungSprache.Location = New System.Drawing.Point(1046, 178)
+ Me.cboRechnungSprache.Location = New System.Drawing.Point(697, 116)
+ Me.cboRechnungSprache.Margin = New System.Windows.Forms.Padding(2)
Me.cboRechnungSprache.Name = "cboRechnungSprache"
- Me.cboRechnungSprache.Size = New System.Drawing.Size(182, 28)
+ Me.cboRechnungSprache.Size = New System.Drawing.Size(123, 21)
Me.cboRechnungSprache.TabIndex = 45
Me.cboRechnungSprache.TabStop = False
'
'rtbHandling
'
- Me.rtbHandling.Location = New System.Drawing.Point(420, 1402)
- Me.rtbHandling.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.rtbHandling.Location = New System.Drawing.Point(280, 911)
Me.rtbHandling.MaxLineLength = -1
Me.rtbHandling.MaxLines_Warning = ""
Me.rtbHandling.MaxLines_Warning_Label = Nothing
Me.rtbHandling.Name = "rtbHandling"
- Me.rtbHandling.Size = New System.Drawing.Size(308, 184)
+ Me.rtbHandling.Size = New System.Drawing.Size(207, 121)
Me.rtbHandling.TabIndex = 44
Me.rtbHandling.Text = ""
'
@@ -1032,10 +998,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label52.AutoSize = True
Me.Label52.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label52.Location = New System.Drawing.Point(416, 1377)
- Me.Label52.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label52.Location = New System.Drawing.Point(277, 895)
Me.Label52.Name = "Label52"
- Me.Label52.Size = New System.Drawing.Size(82, 20)
+ Me.Label52.Size = New System.Drawing.Size(56, 13)
Me.Label52.TabIndex = 43
Me.Label52.Text = "ATA-Nr.:"
Me.Label52.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1050,10 +1015,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Panel2.Controls.Add(Me.txtAbfertigungsart)
Me.Panel2.Controls.Add(Me.Label47)
Me.Panel2.ForeColor = System.Drawing.Color.Black
- Me.Panel2.Location = New System.Drawing.Point(628, 608)
- Me.Panel2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Panel2.Location = New System.Drawing.Point(419, 395)
Me.Panel2.Name = "Panel2"
- Me.Panel2.Size = New System.Drawing.Size(616, 69)
+ Me.Panel2.Size = New System.Drawing.Size(411, 45)
Me.Panel2.TabIndex = 41
'
'txtPositionAnzahl
@@ -1061,6 +1025,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtPositionAnzahl._DateTimeOnly = False
Me.txtPositionAnzahl._numbersOnly = False
Me.txtPositionAnzahl._numbersOnlyKommastellen = ""
+ Me.txtPositionAnzahl._numbersOnlyTrennzeichen = True
Me.txtPositionAnzahl._Prozent = False
Me.txtPositionAnzahl._ShortDateNew = False
Me.txtPositionAnzahl._ShortDateOnly = False
@@ -1070,24 +1035,22 @@ Partial Class usrCntlFaktAbrechnung
Me.txtPositionAnzahl._Waehrung = False
Me.txtPositionAnzahl._WaehrungZeichen = True
Me.txtPositionAnzahl.ForeColor = System.Drawing.Color.Black
- Me.txtPositionAnzahl.Location = New System.Drawing.Point(537, 32)
- Me.txtPositionAnzahl.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtPositionAnzahl.Location = New System.Drawing.Point(358, 21)
Me.txtPositionAnzahl.MaxLength = 35
Me.txtPositionAnzahl.MaxLineLength = -1
Me.txtPositionAnzahl.MaxLines_Warning = ""
Me.txtPositionAnzahl.MaxLines_Warning_Label = Nothing
Me.txtPositionAnzahl.Name = "txtPositionAnzahl"
Me.txtPositionAnzahl.ReadOnly = True
- Me.txtPositionAnzahl.Size = New System.Drawing.Size(62, 26)
+ Me.txtPositionAnzahl.Size = New System.Drawing.Size(43, 20)
Me.txtPositionAnzahl.TabIndex = 46
'
'Label49
'
Me.Label49.AutoSize = True
- Me.Label49.Location = New System.Drawing.Point(453, 37)
- Me.Label49.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label49.Location = New System.Drawing.Point(302, 24)
Me.Label49.Name = "Label49"
- Me.Label49.Size = New System.Drawing.Size(76, 20)
+ Me.Label49.Size = New System.Drawing.Size(52, 13)
Me.Label49.TabIndex = 45
Me.Label49.Text = "Pos.Anz.:"
Me.Label49.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1097,6 +1060,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbfertigungsanzahl._DateTimeOnly = False
Me.txtAbfertigungsanzahl._numbersOnly = False
Me.txtAbfertigungsanzahl._numbersOnlyKommastellen = ""
+ Me.txtAbfertigungsanzahl._numbersOnlyTrennzeichen = True
Me.txtAbfertigungsanzahl._Prozent = False
Me.txtAbfertigungsanzahl._ShortDateNew = False
Me.txtAbfertigungsanzahl._ShortDateOnly = False
@@ -1106,24 +1070,22 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbfertigungsanzahl._Waehrung = False
Me.txtAbfertigungsanzahl._WaehrungZeichen = True
Me.txtAbfertigungsanzahl.ForeColor = System.Drawing.Color.Black
- Me.txtAbfertigungsanzahl.Location = New System.Drawing.Point(537, 5)
- Me.txtAbfertigungsanzahl.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAbfertigungsanzahl.Location = New System.Drawing.Point(358, 3)
Me.txtAbfertigungsanzahl.MaxLength = 35
Me.txtAbfertigungsanzahl.MaxLineLength = -1
Me.txtAbfertigungsanzahl.MaxLines_Warning = ""
Me.txtAbfertigungsanzahl.MaxLines_Warning_Label = Nothing
Me.txtAbfertigungsanzahl.Name = "txtAbfertigungsanzahl"
Me.txtAbfertigungsanzahl.ReadOnly = True
- Me.txtAbfertigungsanzahl.Size = New System.Drawing.Size(62, 26)
+ Me.txtAbfertigungsanzahl.Size = New System.Drawing.Size(43, 20)
Me.txtAbfertigungsanzahl.TabIndex = 44
'
'Label48
'
Me.Label48.AutoSize = True
- Me.Label48.Location = New System.Drawing.Point(453, 9)
- Me.Label48.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label48.Location = New System.Drawing.Point(302, 6)
Me.Label48.Name = "Label48"
- Me.Label48.Size = New System.Drawing.Size(62, 20)
+ Me.Label48.Size = New System.Drawing.Size(42, 13)
Me.Label48.TabIndex = 43
Me.Label48.Text = "Anzahl:"
Me.Label48.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1133,6 +1095,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbfertigungsart._DateTimeOnly = False
Me.txtAbfertigungsart._numbersOnly = False
Me.txtAbfertigungsart._numbersOnlyKommastellen = ""
+ Me.txtAbfertigungsart._numbersOnlyTrennzeichen = True
Me.txtAbfertigungsart._Prozent = False
Me.txtAbfertigungsart._ShortDateNew = False
Me.txtAbfertigungsart._ShortDateOnly = False
@@ -1142,24 +1105,22 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbfertigungsart._Waehrung = False
Me.txtAbfertigungsart._WaehrungZeichen = True
Me.txtAbfertigungsart.ForeColor = System.Drawing.Color.Black
- Me.txtAbfertigungsart.Location = New System.Drawing.Point(146, 5)
- Me.txtAbfertigungsart.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAbfertigungsart.Location = New System.Drawing.Point(97, 3)
Me.txtAbfertigungsart.MaxLength = 35
Me.txtAbfertigungsart.MaxLineLength = -1
Me.txtAbfertigungsart.MaxLines_Warning = ""
Me.txtAbfertigungsart.MaxLines_Warning_Label = Nothing
Me.txtAbfertigungsart.Name = "txtAbfertigungsart"
Me.txtAbfertigungsart.ReadOnly = True
- Me.txtAbfertigungsart.Size = New System.Drawing.Size(296, 26)
+ Me.txtAbfertigungsart.Size = New System.Drawing.Size(199, 20)
Me.txtAbfertigungsart.TabIndex = 42
'
'Label47
'
Me.Label47.AutoSize = True
- Me.Label47.Location = New System.Drawing.Point(3, 9)
- Me.Label47.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label47.Location = New System.Drawing.Point(2, 6)
Me.Label47.Name = "Label47"
- Me.Label47.Size = New System.Drawing.Size(123, 20)
+ Me.Label47.Size = New System.Drawing.Size(81, 13)
Me.Label47.TabIndex = 42
Me.Label47.Text = "Abfertigungsart:"
Me.Label47.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1176,10 +1137,9 @@ Partial Class usrCntlFaktAbrechnung
Me.pnlAvisierer.Controls.Add(Me.txtAvisoId)
Me.pnlAvisierer.Controls.Add(Me.kdFirmaAvisierer)
Me.pnlAvisierer.Controls.Add(Me.FlatButton5)
- Me.pnlAvisierer.Location = New System.Drawing.Point(0, 565)
- Me.pnlAvisierer.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.pnlAvisierer.Location = New System.Drawing.Point(0, 367)
Me.pnlAvisierer.Name = "pnlAvisierer"
- Me.pnlAvisierer.Size = New System.Drawing.Size(622, 111)
+ Me.pnlAvisierer.Size = New System.Drawing.Size(415, 73)
Me.pnlAvisierer.TabIndex = 8
'
'txtkdNrAvisierer
@@ -1187,6 +1147,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrAvisierer._DateTimeOnly = False
Me.txtkdNrAvisierer._numbersOnly = False
Me.txtkdNrAvisierer._numbersOnlyKommastellen = ""
+ Me.txtkdNrAvisierer._numbersOnlyTrennzeichen = True
Me.txtkdNrAvisierer._Prozent = False
Me.txtkdNrAvisierer._ShortDateNew = False
Me.txtkdNrAvisierer._ShortDateOnly = False
@@ -1198,15 +1159,14 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrAvisierer.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtkdNrAvisierer.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtkdNrAvisierer.ForeColor = System.Drawing.Color.Black
- Me.txtkdNrAvisierer.Location = New System.Drawing.Point(10, 34)
- Me.txtkdNrAvisierer.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtkdNrAvisierer.Location = New System.Drawing.Point(7, 22)
Me.txtkdNrAvisierer.MaxLength = 35
Me.txtkdNrAvisierer.MaxLineLength = -1
Me.txtkdNrAvisierer.MaxLines_Warning = ""
Me.txtkdNrAvisierer.MaxLines_Warning_Label = Nothing
Me.txtkdNrAvisierer.Name = "txtkdNrAvisierer"
Me.txtkdNrAvisierer.ReadOnly = True
- Me.txtkdNrAvisierer.Size = New System.Drawing.Size(141, 19)
+ Me.txtkdNrAvisierer.Size = New System.Drawing.Size(94, 13)
Me.txtkdNrAvisierer.TabIndex = 1
Me.txtkdNrAvisierer.TabStop = False
'
@@ -1215,10 +1175,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Label27.AutoSize = True
Me.Label27.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
Me.Label27.ForeColor = System.Drawing.Color.Red
- Me.Label27.Location = New System.Drawing.Point(428, 58)
- Me.Label27.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label27.Location = New System.Drawing.Point(285, 38)
Me.Label27.Name = "Label27"
- Me.Label27.Size = New System.Drawing.Size(155, 20)
+ Me.Label27.Size = New System.Drawing.Size(108, 13)
Me.Label27.TabIndex = 7
Me.Label27.Text = "VORAUSKASSE!"""
Me.Label27.Visible = False
@@ -1229,9 +1188,10 @@ Partial Class usrCntlFaktAbrechnung
Me.btnAvisiererEuro.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnAvisiererEuro.Font = New System.Drawing.Font("Arial Black", 18.0!, System.Drawing.FontStyle.Bold)
Me.btnAvisiererEuro.ForeColor = System.Drawing.Color.Silver
- Me.btnAvisiererEuro.Location = New System.Drawing.Point(12, 42)
+ Me.btnAvisiererEuro.Location = New System.Drawing.Point(8, 27)
+ Me.btnAvisiererEuro.Margin = New System.Windows.Forms.Padding(2)
Me.btnAvisiererEuro.Name = "btnAvisiererEuro"
- Me.btnAvisiererEuro.Size = New System.Drawing.Size(140, 57)
+ Me.btnAvisiererEuro.Size = New System.Drawing.Size(93, 37)
Me.btnAvisiererEuro.TabIndex = 4
Me.btnAvisiererEuro.TabStop = False
Me.btnAvisiererEuro.Text = "€"
@@ -1241,10 +1201,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label2.AutoSize = True
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label2.Location = New System.Drawing.Point(148, 57)
- Me.Label2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label2.Location = New System.Drawing.Point(99, 37)
Me.Label2.Name = "Label2"
- Me.Label2.Size = New System.Drawing.Size(74, 20)
+ Me.Label2.Size = New System.Drawing.Size(48, 13)
Me.Label2.TabIndex = 5
Me.Label2.Text = "LKW-ID:"
'
@@ -1252,10 +1211,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label21.AutoSize = True
Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
- Me.Label21.Location = New System.Drawing.Point(4, 9)
- Me.Label21.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label21.Location = New System.Drawing.Point(3, 6)
Me.Label21.Name = "Label21"
- Me.Label21.Size = New System.Drawing.Size(103, 20)
+ Me.Label21.Size = New System.Drawing.Size(75, 13)
Me.Label21.TabIndex = 0
Me.Label21.Text = "4. Avisierer:"
'
@@ -1264,6 +1222,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAvisoId._DateTimeOnly = False
Me.txtAvisoId._numbersOnly = False
Me.txtAvisoId._numbersOnlyKommastellen = ""
+ Me.txtAvisoId._numbersOnlyTrennzeichen = True
Me.txtAvisoId._Prozent = False
Me.txtAvisoId._ShortDateNew = False
Me.txtAvisoId._ShortDateOnly = False
@@ -1273,15 +1232,14 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAvisoId._Waehrung = False
Me.txtAvisoId._WaehrungZeichen = True
Me.txtAvisoId.ForeColor = System.Drawing.Color.Black
- Me.txtAvisoId.Location = New System.Drawing.Point(236, 54)
- Me.txtAvisoId.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAvisoId.Location = New System.Drawing.Point(157, 35)
Me.txtAvisoId.MaxLength = 35
Me.txtAvisoId.MaxLineLength = -1
Me.txtAvisoId.MaxLines_Warning = ""
Me.txtAvisoId.MaxLines_Warning_Label = Nothing
Me.txtAvisoId.Name = "txtAvisoId"
Me.txtAvisoId.ReadOnly = True
- Me.txtAvisoId.Size = New System.Drawing.Size(187, 26)
+ Me.txtAvisoId.Size = New System.Drawing.Size(126, 20)
Me.txtAvisoId.TabIndex = 6
Me.txtAvisoId.TabStop = False
Me.txtAvisoId.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
@@ -1305,13 +1263,12 @@ Partial Class usrCntlFaktAbrechnung
Me.kdFirmaAvisierer.KdNr = "-1"
Me.kdFirmaAvisierer.kdNrField = Nothing
Me.kdFirmaAvisierer.KdNrNullInt = Nothing
- Me.kdFirmaAvisierer.Location = New System.Drawing.Point(152, 3)
- Me.kdFirmaAvisierer.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.kdFirmaAvisierer.Location = New System.Drawing.Point(101, 2)
Me.kdFirmaAvisierer.MaxLength = 35
Me.kdFirmaAvisierer.Name = "kdFirmaAvisierer"
Me.kdFirmaAvisierer.nurAktive = True
Me.kdFirmaAvisierer.searchActive = True
- Me.kdFirmaAvisierer.Size = New System.Drawing.Size(422, 26)
+ Me.kdFirmaAvisierer.Size = New System.Drawing.Size(283, 20)
Me.kdFirmaAvisierer.TabIndex = 3
Me.kdFirmaAvisierer.TabStop = False
Me.kdFirmaAvisierer.TIMER_SEARCH = True
@@ -1324,10 +1281,9 @@ Partial Class usrCntlFaktAbrechnung
Me.FlatButton5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.FlatButton5.ForeColor = System.Drawing.Color.Black
Me.FlatButton5.Image = Global.SDL.My.Resources.Resources.personInaktiv
- Me.FlatButton5.Location = New System.Drawing.Point(573, -2)
- Me.FlatButton5.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.FlatButton5.Location = New System.Drawing.Point(382, -1)
Me.FlatButton5.Name = "FlatButton5"
- Me.FlatButton5.Size = New System.Drawing.Size(36, 38)
+ Me.FlatButton5.Size = New System.Drawing.Size(24, 25)
Me.FlatButton5.TabIndex = 2
Me.FlatButton5.TabStop = False
Me.FlatButton5.UseVisualStyleBackColor = True
@@ -1340,11 +1296,10 @@ Partial Class usrCntlFaktAbrechnung
Me.cboAnlage5.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboAnlage5.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboAnlage5.FormattingEnabled = True
- Me.cboAnlage5.Location = New System.Drawing.Point(15, 1525)
- Me.cboAnlage5.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboAnlage5.Location = New System.Drawing.Point(10, 991)
Me.cboAnlage5.MaxLength = 35
Me.cboAnlage5.Name = "cboAnlage5"
- Me.cboAnlage5.Size = New System.Drawing.Size(397, 28)
+ Me.cboAnlage5.Size = New System.Drawing.Size(266, 21)
Me.cboAnlage5.TabIndex = 32
'
'cboAnlage1
@@ -1355,11 +1310,10 @@ Partial Class usrCntlFaktAbrechnung
Me.cboAnlage1.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboAnlage1.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboAnlage1.FormattingEnabled = True
- Me.cboAnlage1.Location = New System.Drawing.Point(15, 1402)
- Me.cboAnlage1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboAnlage1.Location = New System.Drawing.Point(10, 911)
Me.cboAnlage1.MaxLength = 35
Me.cboAnlage1.Name = "cboAnlage1"
- Me.cboAnlage1.Size = New System.Drawing.Size(397, 28)
+ Me.cboAnlage1.Size = New System.Drawing.Size(266, 21)
Me.cboAnlage1.TabIndex = 28
'
'txtWarenwertUmrechnung
@@ -1367,6 +1321,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtWarenwertUmrechnung._DateTimeOnly = False
Me.txtWarenwertUmrechnung._numbersOnly = False
Me.txtWarenwertUmrechnung._numbersOnlyKommastellen = ""
+ Me.txtWarenwertUmrechnung._numbersOnlyTrennzeichen = True
Me.txtWarenwertUmrechnung._Prozent = False
Me.txtWarenwertUmrechnung._ShortDateNew = False
Me.txtWarenwertUmrechnung._ShortDateOnly = False
@@ -1377,14 +1332,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtWarenwertUmrechnung._WaehrungZeichen = False
Me.txtWarenwertUmrechnung.Enabled = False
Me.txtWarenwertUmrechnung.ForeColor = System.Drawing.Color.Black
- Me.txtWarenwertUmrechnung.Location = New System.Drawing.Point(843, 294)
- Me.txtWarenwertUmrechnung.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtWarenwertUmrechnung.Location = New System.Drawing.Point(562, 191)
Me.txtWarenwertUmrechnung.MaxLength = 35
Me.txtWarenwertUmrechnung.MaxLineLength = -1
Me.txtWarenwertUmrechnung.MaxLines_Warning = ""
Me.txtWarenwertUmrechnung.MaxLines_Warning_Label = Nothing
Me.txtWarenwertUmrechnung.Name = "txtWarenwertUmrechnung"
- Me.txtWarenwertUmrechnung.Size = New System.Drawing.Size(192, 26)
+ Me.txtWarenwertUmrechnung.Size = New System.Drawing.Size(129, 20)
Me.txtWarenwertUmrechnung.TabIndex = 18
Me.txtWarenwertUmrechnung.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
@@ -1392,10 +1346,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label13.AutoSize = True
Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label13.Location = New System.Drawing.Point(10, 1377)
- Me.Label13.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label13.Location = New System.Drawing.Point(7, 895)
Me.Label13.Name = "Label13"
- Me.Label13.Size = New System.Drawing.Size(82, 20)
+ Me.Label13.Size = New System.Drawing.Size(57, 13)
Me.Label13.TabIndex = 26
Me.Label13.Text = "Anlagen:"
Me.Label13.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1408,20 +1361,18 @@ Partial Class usrCntlFaktAbrechnung
Me.cboAnlage2.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboAnlage2.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboAnlage2.FormattingEnabled = True
- Me.cboAnlage2.Location = New System.Drawing.Point(15, 1432)
- Me.cboAnlage2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboAnlage2.Location = New System.Drawing.Point(10, 931)
Me.cboAnlage2.MaxLength = 35
Me.cboAnlage2.Name = "cboAnlage2"
- Me.cboAnlage2.Size = New System.Drawing.Size(397, 28)
+ Me.cboAnlage2.Size = New System.Drawing.Size(266, 21)
Me.cboAnlage2.TabIndex = 29
'
'Label34
'
Me.Label34.AutoSize = True
- Me.Label34.Location = New System.Drawing.Point(633, 298)
- Me.Label34.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label34.Location = New System.Drawing.Point(422, 194)
Me.Label34.Name = "Label34"
- Me.Label34.Size = New System.Drawing.Size(105, 20)
+ Me.Label34.Size = New System.Drawing.Size(71, 13)
Me.Label34.TabIndex = 40
Me.Label34.Text = "Umrechnung:"
Me.Label34.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1434,11 +1385,10 @@ Partial Class usrCntlFaktAbrechnung
Me.cboAnlage3.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboAnlage3.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboAnlage3.FormattingEnabled = True
- Me.cboAnlage3.Location = New System.Drawing.Point(15, 1463)
- Me.cboAnlage3.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboAnlage3.Location = New System.Drawing.Point(10, 951)
Me.cboAnlage3.MaxLength = 35
Me.cboAnlage3.Name = "cboAnlage3"
- Me.cboAnlage3.Size = New System.Drawing.Size(397, 28)
+ Me.cboAnlage3.Size = New System.Drawing.Size(266, 21)
Me.cboAnlage3.TabIndex = 30
'
'txtVermerk
@@ -1446,6 +1396,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtVermerk._DateTimeOnly = False
Me.txtVermerk._numbersOnly = False
Me.txtVermerk._numbersOnlyKommastellen = ""
+ Me.txtVermerk._numbersOnlyTrennzeichen = True
Me.txtVermerk._Prozent = False
Me.txtVermerk._ShortDateNew = False
Me.txtVermerk._ShortDateOnly = False
@@ -1455,14 +1406,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtVermerk._Waehrung = False
Me.txtVermerk._WaehrungZeichen = True
Me.txtVermerk.ForeColor = System.Drawing.Color.Black
- Me.txtVermerk.Location = New System.Drawing.Point(776, 515)
- Me.txtVermerk.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtVermerk.Location = New System.Drawing.Point(517, 335)
Me.txtVermerk.MaxLength = 35
Me.txtVermerk.MaxLineLength = -1
Me.txtVermerk.MaxLines_Warning = ""
Me.txtVermerk.MaxLines_Warning_Label = Nothing
Me.txtVermerk.Name = "txtVermerk"
- Me.txtVermerk.Size = New System.Drawing.Size(456, 26)
+ Me.txtVermerk.Size = New System.Drawing.Size(305, 20)
Me.txtVermerk.TabIndex = 25
'
'cboAnlage6
@@ -1473,20 +1423,18 @@ Partial Class usrCntlFaktAbrechnung
Me.cboAnlage6.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboAnlage6.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboAnlage6.FormattingEnabled = True
- Me.cboAnlage6.Location = New System.Drawing.Point(15, 1555)
- Me.cboAnlage6.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboAnlage6.Location = New System.Drawing.Point(10, 1011)
Me.cboAnlage6.MaxLength = 35
Me.cboAnlage6.Name = "cboAnlage6"
- Me.cboAnlage6.Size = New System.Drawing.Size(397, 28)
+ Me.cboAnlage6.Size = New System.Drawing.Size(266, 21)
Me.cboAnlage6.TabIndex = 33
'
'Label25
'
Me.Label25.AutoSize = True
- Me.Label25.Location = New System.Drawing.Point(633, 520)
- Me.Label25.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label25.Location = New System.Drawing.Point(422, 338)
Me.Label25.Name = "Label25"
- Me.Label25.Size = New System.Drawing.Size(73, 20)
+ Me.Label25.Size = New System.Drawing.Size(49, 13)
Me.Label25.TabIndex = 39
Me.Label25.Text = "Vermerk:"
Me.Label25.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1499,11 +1447,10 @@ Partial Class usrCntlFaktAbrechnung
Me.cboAnlage4.AutoCompleteMode = System.Windows.Forms.AutoCompleteMode.SuggestAppend
Me.cboAnlage4.AutoCompleteSource = System.Windows.Forms.AutoCompleteSource.ListItems
Me.cboAnlage4.FormattingEnabled = True
- Me.cboAnlage4.Location = New System.Drawing.Point(15, 1494)
- Me.cboAnlage4.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboAnlage4.Location = New System.Drawing.Point(10, 971)
Me.cboAnlage4.MaxLength = 35
Me.cboAnlage4.Name = "cboAnlage4"
- Me.cboAnlage4.Size = New System.Drawing.Size(397, 28)
+ Me.cboAnlage4.Size = New System.Drawing.Size(266, 21)
Me.cboAnlage4.TabIndex = 31
'
'txtErfassungsnummer
@@ -1511,6 +1458,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtErfassungsnummer._DateTimeOnly = False
Me.txtErfassungsnummer._numbersOnly = False
Me.txtErfassungsnummer._numbersOnlyKommastellen = ""
+ Me.txtErfassungsnummer._numbersOnlyTrennzeichen = True
Me.txtErfassungsnummer._Prozent = False
Me.txtErfassungsnummer._ShortDateNew = False
Me.txtErfassungsnummer._ShortDateOnly = False
@@ -1520,23 +1468,21 @@ Partial Class usrCntlFaktAbrechnung
Me.txtErfassungsnummer._Waehrung = False
Me.txtErfassungsnummer._WaehrungZeichen = True
Me.txtErfassungsnummer.ForeColor = System.Drawing.Color.Black
- Me.txtErfassungsnummer.Location = New System.Drawing.Point(776, 363)
- Me.txtErfassungsnummer.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtErfassungsnummer.Location = New System.Drawing.Point(517, 236)
Me.txtErfassungsnummer.MaxLength = 35
Me.txtErfassungsnummer.MaxLineLength = -1
Me.txtErfassungsnummer.MaxLines_Warning = ""
Me.txtErfassungsnummer.MaxLines_Warning_Label = Nothing
Me.txtErfassungsnummer.Name = "txtErfassungsnummer"
- Me.txtErfassungsnummer.Size = New System.Drawing.Size(456, 26)
+ Me.txtErfassungsnummer.Size = New System.Drawing.Size(305, 20)
Me.txtErfassungsnummer.TabIndex = 11
'
'Label24
'
Me.Label24.AutoSize = True
- Me.Label24.Location = New System.Drawing.Point(633, 368)
- Me.Label24.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label24.Location = New System.Drawing.Point(422, 239)
Me.Label24.Name = "Label24"
- Me.Label24.Size = New System.Drawing.Size(119, 20)
+ Me.Label24.Size = New System.Drawing.Size(79, 13)
Me.Label24.TabIndex = 38
Me.Label24.Text = "Erfassungs-Nr.:"
Me.Label24.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1544,10 +1490,9 @@ Partial Class usrCntlFaktAbrechnung
'Label22
'
Me.Label22.AutoSize = True
- Me.Label22.Location = New System.Drawing.Point(12, 1603)
- Me.Label22.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label22.Location = New System.Drawing.Point(8, 1042)
Me.Label22.Name = "Label22"
- Me.Label22.Size = New System.Drawing.Size(75, 20)
+ Me.Label22.Size = New System.Drawing.Size(51, 13)
Me.Label22.TabIndex = 37
Me.Label22.Text = "Rg-Notiz:"
Me.Label22.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1558,19 +1503,19 @@ Partial Class usrCntlFaktAbrechnung
Me.cboRechnungNotiz._allowFreiText = True
Me.cboRechnungNotiz._value = ""
Me.cboRechnungNotiz.FormattingEnabled = True
- Me.cboRechnungNotiz.Location = New System.Drawing.Point(96, 1598)
- Me.cboRechnungNotiz.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboRechnungNotiz.Location = New System.Drawing.Point(64, 1039)
Me.cboRechnungNotiz.Name = "cboRechnungNotiz"
- Me.cboRechnungNotiz.Size = New System.Drawing.Size(632, 28)
+ Me.cboRechnungNotiz.Size = New System.Drawing.Size(423, 21)
Me.cboRechnungNotiz.TabIndex = 36
'
'pic
'
Me.pic.BackgroundImage = Global.SDL.My.Resources.Resources.Verag_AG_Logo_med
Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
- Me.pic.Location = New System.Drawing.Point(886, 3)
+ Me.pic.Location = New System.Drawing.Point(591, 2)
+ Me.pic.Margin = New System.Windows.Forms.Padding(2)
Me.pic.Name = "pic"
- Me.pic.Size = New System.Drawing.Size(344, 69)
+ Me.pic.Size = New System.Drawing.Size(229, 45)
Me.pic.TabIndex = 36
Me.pic.TabStop = False
'
@@ -1580,19 +1525,19 @@ Partial Class usrCntlFaktAbrechnung
Me.cboFirma._allowFreiText = False
Me.cboFirma._value = ""
Me.cboFirma.FormattingEnabled = True
- Me.cboFirma.Location = New System.Drawing.Point(888, 78)
+ Me.cboFirma.Location = New System.Drawing.Point(592, 51)
+ Me.cboFirma.Margin = New System.Windows.Forms.Padding(2)
Me.cboFirma.Name = "cboFirma"
- Me.cboFirma.Size = New System.Drawing.Size(342, 28)
+ Me.cboFirma.Size = New System.Drawing.Size(229, 21)
Me.cboFirma.TabIndex = 1
Me.cboFirma.TabStop = False
'
'lblFirma3
'
Me.lblFirma3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.lblFirma3.Location = New System.Drawing.Point(884, 152)
- Me.lblFirma3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblFirma3.Location = New System.Drawing.Point(589, 99)
Me.lblFirma3.Name = "lblFirma3"
- Me.lblFirma3.Size = New System.Drawing.Size(348, 20)
+ Me.lblFirma3.Size = New System.Drawing.Size(232, 13)
Me.lblFirma3.TabIndex = 4
Me.lblFirma3.Text = "A 4975 Suben"
Me.lblFirma3.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1600,10 +1545,9 @@ Partial Class usrCntlFaktAbrechnung
'lblFirma2
'
Me.lblFirma2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.lblFirma2.Location = New System.Drawing.Point(884, 132)
- Me.lblFirma2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblFirma2.Location = New System.Drawing.Point(589, 86)
Me.lblFirma2.Name = "lblFirma2"
- Me.lblFirma2.Size = New System.Drawing.Size(348, 20)
+ Me.lblFirma2.Size = New System.Drawing.Size(232, 13)
Me.lblFirma2.TabIndex = 3
Me.lblFirma2.Text = "Suben 100"
Me.lblFirma2.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1611,10 +1555,9 @@ Partial Class usrCntlFaktAbrechnung
'lblFirma1
'
Me.lblFirma1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.lblFirma1.Location = New System.Drawing.Point(884, 112)
- Me.lblFirma1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblFirma1.Location = New System.Drawing.Point(589, 73)
Me.lblFirma1.Name = "lblFirma1"
- Me.lblFirma1.Size = New System.Drawing.Size(348, 20)
+ Me.lblFirma1.Size = New System.Drawing.Size(232, 13)
Me.lblFirma1.TabIndex = 2
Me.lblFirma1.Text = "VERAG Spedition AG"
Me.lblFirma1.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1622,10 +1565,9 @@ Partial Class usrCntlFaktAbrechnung
'Label32
'
Me.Label32.AutoSize = True
- Me.Label32.Location = New System.Drawing.Point(12, 1632)
- Me.Label32.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label32.Location = New System.Drawing.Point(8, 1061)
Me.Label32.Name = "Label32"
- Me.Label32.Size = New System.Drawing.Size(43, 20)
+ Me.Label32.Size = New System.Drawing.Size(31, 13)
Me.Label32.TabIndex = 34
Me.Label32.Text = "Text:"
Me.Label32.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1642,10 +1584,9 @@ Partial Class usrCntlFaktAbrechnung
Me.pnlAuftraggeber.Controls.Add(Me.txtAuftragggeberOrt)
Me.pnlAuftraggeber.Controls.Add(Me.txtAuftragggeberStrasse)
Me.pnlAuftraggeber.Controls.Add(Me.FlatButton4)
- Me.pnlAuftraggeber.Location = New System.Drawing.Point(0, 454)
- Me.pnlAuftraggeber.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.pnlAuftraggeber.Location = New System.Drawing.Point(0, 295)
Me.pnlAuftraggeber.Name = "pnlAuftraggeber"
- Me.pnlAuftraggeber.Size = New System.Drawing.Size(622, 111)
+ Me.pnlAuftraggeber.Size = New System.Drawing.Size(415, 73)
Me.pnlAuftraggeber.TabIndex = 7
'
'txtkdNrAuftraggeber
@@ -1653,6 +1594,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrAuftraggeber._DateTimeOnly = False
Me.txtkdNrAuftraggeber._numbersOnly = False
Me.txtkdNrAuftraggeber._numbersOnlyKommastellen = ""
+ Me.txtkdNrAuftraggeber._numbersOnlyTrennzeichen = True
Me.txtkdNrAuftraggeber._Prozent = False
Me.txtkdNrAuftraggeber._ShortDateNew = False
Me.txtkdNrAuftraggeber._ShortDateOnly = False
@@ -1664,15 +1606,14 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrAuftraggeber.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtkdNrAuftraggeber.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtkdNrAuftraggeber.ForeColor = System.Drawing.Color.Black
- Me.txtkdNrAuftraggeber.Location = New System.Drawing.Point(10, 38)
- Me.txtkdNrAuftraggeber.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtkdNrAuftraggeber.Location = New System.Drawing.Point(7, 25)
Me.txtkdNrAuftraggeber.MaxLength = 35
Me.txtkdNrAuftraggeber.MaxLineLength = -1
Me.txtkdNrAuftraggeber.MaxLines_Warning = ""
Me.txtkdNrAuftraggeber.MaxLines_Warning_Label = Nothing
Me.txtkdNrAuftraggeber.Name = "txtkdNrAuftraggeber"
Me.txtkdNrAuftraggeber.ReadOnly = True
- Me.txtkdNrAuftraggeber.Size = New System.Drawing.Size(141, 19)
+ Me.txtkdNrAuftraggeber.Size = New System.Drawing.Size(94, 13)
Me.txtkdNrAuftraggeber.TabIndex = 1
Me.txtkdNrAuftraggeber.TabStop = False
'
@@ -1682,9 +1623,10 @@ Partial Class usrCntlFaktAbrechnung
Me.btnAuftraggeberEuro.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnAuftraggeberEuro.Font = New System.Drawing.Font("Arial Black", 18.0!, System.Drawing.FontStyle.Bold)
Me.btnAuftraggeberEuro.ForeColor = System.Drawing.Color.Silver
- Me.btnAuftraggeberEuro.Location = New System.Drawing.Point(10, 49)
+ Me.btnAuftraggeberEuro.Location = New System.Drawing.Point(7, 32)
+ Me.btnAuftraggeberEuro.Margin = New System.Windows.Forms.Padding(2)
Me.btnAuftraggeberEuro.Name = "btnAuftraggeberEuro"
- Me.btnAuftraggeberEuro.Size = New System.Drawing.Size(140, 57)
+ Me.btnAuftraggeberEuro.Size = New System.Drawing.Size(93, 37)
Me.btnAuftraggeberEuro.TabIndex = 5
Me.btnAuftraggeberEuro.TabStop = False
Me.btnAuftraggeberEuro.Text = "€"
@@ -1709,13 +1651,12 @@ Partial Class usrCntlFaktAbrechnung
Me.kdFirmaAuftraggeber.KdNr = "-1"
Me.kdFirmaAuftraggeber.kdNrField = Nothing
Me.kdFirmaAuftraggeber.KdNrNullInt = Nothing
- Me.kdFirmaAuftraggeber.Location = New System.Drawing.Point(152, 5)
- Me.kdFirmaAuftraggeber.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.kdFirmaAuftraggeber.Location = New System.Drawing.Point(101, 3)
Me.kdFirmaAuftraggeber.MaxLength = 35
Me.kdFirmaAuftraggeber.Name = "kdFirmaAuftraggeber"
Me.kdFirmaAuftraggeber.nurAktive = True
Me.kdFirmaAuftraggeber.searchActive = True
- Me.kdFirmaAuftraggeber.Size = New System.Drawing.Size(422, 26)
+ Me.kdFirmaAuftraggeber.Size = New System.Drawing.Size(283, 20)
Me.kdFirmaAuftraggeber.TabIndex = 3
Me.kdFirmaAuftraggeber.TabStop = False
Me.kdFirmaAuftraggeber.TIMER_SEARCH = True
@@ -1726,6 +1667,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAuftraggeberName2._DateTimeOnly = False
Me.txtAuftraggeberName2._numbersOnly = False
Me.txtAuftraggeberName2._numbersOnlyKommastellen = ""
+ Me.txtAuftraggeberName2._numbersOnlyTrennzeichen = True
Me.txtAuftraggeberName2._Prozent = False
Me.txtAuftraggeberName2._ShortDateNew = False
Me.txtAuftraggeberName2._ShortDateOnly = False
@@ -1737,14 +1679,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAuftraggeberName2.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtAuftraggeberName2.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtAuftraggeberName2.ForeColor = System.Drawing.Color.Black
- Me.txtAuftraggeberName2.Location = New System.Drawing.Point(152, 38)
- Me.txtAuftraggeberName2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAuftraggeberName2.Location = New System.Drawing.Point(101, 25)
Me.txtAuftraggeberName2.MaxLength = 35
Me.txtAuftraggeberName2.MaxLineLength = -1
Me.txtAuftraggeberName2.MaxLines_Warning = ""
Me.txtAuftraggeberName2.MaxLines_Warning_Label = Nothing
Me.txtAuftraggeberName2.Name = "txtAuftraggeberName2"
- Me.txtAuftraggeberName2.Size = New System.Drawing.Size(458, 19)
+ Me.txtAuftraggeberName2.Size = New System.Drawing.Size(305, 13)
Me.txtAuftraggeberName2.TabIndex = 4
Me.txtAuftraggeberName2.TabStop = False
'
@@ -1752,10 +1693,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label15.AutoSize = True
Me.Label15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
- Me.Label15.Location = New System.Drawing.Point(4, 9)
- Me.Label15.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label15.Location = New System.Drawing.Point(3, 6)
Me.Label15.Name = "Label15"
- Me.Label15.Size = New System.Drawing.Size(140, 20)
+ Me.Label15.Size = New System.Drawing.Size(99, 13)
Me.Label15.TabIndex = 0
Me.Label15.Text = "3. Auftraggeber:"
'
@@ -1764,6 +1704,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAuftragggeberOrt._DateTimeOnly = False
Me.txtAuftragggeberOrt._numbersOnly = False
Me.txtAuftragggeberOrt._numbersOnlyKommastellen = ""
+ Me.txtAuftragggeberOrt._numbersOnlyTrennzeichen = True
Me.txtAuftragggeberOrt._Prozent = False
Me.txtAuftragggeberOrt._ShortDateNew = False
Me.txtAuftragggeberOrt._ShortDateOnly = False
@@ -1775,14 +1716,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAuftragggeberOrt.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtAuftragggeberOrt.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtAuftragggeberOrt.ForeColor = System.Drawing.Color.Black
- Me.txtAuftragggeberOrt.Location = New System.Drawing.Point(152, 82)
- Me.txtAuftragggeberOrt.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAuftragggeberOrt.Location = New System.Drawing.Point(101, 53)
Me.txtAuftragggeberOrt.MaxLength = 35
Me.txtAuftragggeberOrt.MaxLineLength = -1
Me.txtAuftragggeberOrt.MaxLines_Warning = ""
Me.txtAuftragggeberOrt.MaxLines_Warning_Label = Nothing
Me.txtAuftragggeberOrt.Name = "txtAuftragggeberOrt"
- Me.txtAuftragggeberOrt.Size = New System.Drawing.Size(458, 19)
+ Me.txtAuftragggeberOrt.Size = New System.Drawing.Size(305, 13)
Me.txtAuftragggeberOrt.TabIndex = 7
Me.txtAuftragggeberOrt.TabStop = False
'
@@ -1791,6 +1731,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAuftragggeberStrasse._DateTimeOnly = False
Me.txtAuftragggeberStrasse._numbersOnly = False
Me.txtAuftragggeberStrasse._numbersOnlyKommastellen = ""
+ Me.txtAuftragggeberStrasse._numbersOnlyTrennzeichen = True
Me.txtAuftragggeberStrasse._Prozent = False
Me.txtAuftragggeberStrasse._ShortDateNew = False
Me.txtAuftragggeberStrasse._ShortDateOnly = False
@@ -1802,14 +1743,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAuftragggeberStrasse.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtAuftragggeberStrasse.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtAuftragggeberStrasse.ForeColor = System.Drawing.Color.Black
- Me.txtAuftragggeberStrasse.Location = New System.Drawing.Point(152, 60)
- Me.txtAuftragggeberStrasse.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAuftragggeberStrasse.Location = New System.Drawing.Point(101, 39)
Me.txtAuftragggeberStrasse.MaxLength = 35
Me.txtAuftragggeberStrasse.MaxLineLength = -1
Me.txtAuftragggeberStrasse.MaxLines_Warning = ""
Me.txtAuftragggeberStrasse.MaxLines_Warning_Label = Nothing
Me.txtAuftragggeberStrasse.Name = "txtAuftragggeberStrasse"
- Me.txtAuftragggeberStrasse.Size = New System.Drawing.Size(458, 19)
+ Me.txtAuftragggeberStrasse.Size = New System.Drawing.Size(305, 13)
Me.txtAuftragggeberStrasse.TabIndex = 6
Me.txtAuftragggeberStrasse.TabStop = False
'
@@ -1820,24 +1760,22 @@ Partial Class usrCntlFaktAbrechnung
Me.FlatButton4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.FlatButton4.ForeColor = System.Drawing.Color.Black
Me.FlatButton4.Image = Global.SDL.My.Resources.Resources.personInaktiv
- Me.FlatButton4.Location = New System.Drawing.Point(573, 0)
- Me.FlatButton4.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.FlatButton4.Location = New System.Drawing.Point(382, 0)
Me.FlatButton4.Name = "FlatButton4"
- Me.FlatButton4.Size = New System.Drawing.Size(36, 38)
+ Me.FlatButton4.Size = New System.Drawing.Size(24, 25)
Me.FlatButton4.TabIndex = 2
Me.FlatButton4.TabStop = False
Me.FlatButton4.UseVisualStyleBackColor = True
'
'txtText
'
- Me.txtText.Location = New System.Drawing.Point(96, 1666)
- Me.txtText.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtText.Location = New System.Drawing.Point(64, 1083)
Me.txtText.MaxLineLength = -1
Me.txtText.MaxLines_Warning = ""
Me.txtText.MaxLines_Warning_Label = Nothing
Me.txtText.Name = "txtText"
Me.txtText.ReadOnly = True
- Me.txtText.Size = New System.Drawing.Size(632, 70)
+ Me.txtText.Size = New System.Drawing.Size(423, 47)
Me.txtText.TabIndex = 35
Me.txtText.Text = ""
'
@@ -1846,6 +1784,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtBefoerderungsmittel._DateTimeOnly = False
Me.txtBefoerderungsmittel._numbersOnly = False
Me.txtBefoerderungsmittel._numbersOnlyKommastellen = ""
+ Me.txtBefoerderungsmittel._numbersOnlyTrennzeichen = True
Me.txtBefoerderungsmittel._Prozent = False
Me.txtBefoerderungsmittel._ShortDateNew = False
Me.txtBefoerderungsmittel._ShortDateOnly = False
@@ -1855,14 +1794,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtBefoerderungsmittel._Waehrung = False
Me.txtBefoerderungsmittel._WaehrungZeichen = True
Me.txtBefoerderungsmittel.ForeColor = System.Drawing.Color.Black
- Me.txtBefoerderungsmittel.Location = New System.Drawing.Point(776, 420)
- Me.txtBefoerderungsmittel.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtBefoerderungsmittel.Location = New System.Drawing.Point(517, 273)
Me.txtBefoerderungsmittel.MaxLength = 35
Me.txtBefoerderungsmittel.MaxLineLength = -1
Me.txtBefoerderungsmittel.MaxLines_Warning = ""
Me.txtBefoerderungsmittel.MaxLines_Warning_Label = Nothing
Me.txtBefoerderungsmittel.Name = "txtBefoerderungsmittel"
- Me.txtBefoerderungsmittel.Size = New System.Drawing.Size(456, 26)
+ Me.txtBefoerderungsmittel.Size = New System.Drawing.Size(305, 20)
Me.txtBefoerderungsmittel.TabIndex = 19
'
'txtGrenze
@@ -1870,6 +1808,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtGrenze._DateTimeOnly = False
Me.txtGrenze._numbersOnly = False
Me.txtGrenze._numbersOnlyKommastellen = ""
+ Me.txtGrenze._numbersOnlyTrennzeichen = True
Me.txtGrenze._Prozent = False
Me.txtGrenze._ShortDateNew = False
Me.txtGrenze._ShortDateOnly = False
@@ -1879,23 +1818,21 @@ Partial Class usrCntlFaktAbrechnung
Me.txtGrenze._Waehrung = False
Me.txtGrenze._WaehrungZeichen = True
Me.txtGrenze.ForeColor = System.Drawing.Color.Black
- Me.txtGrenze.Location = New System.Drawing.Point(776, 391)
- Me.txtGrenze.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtGrenze.Location = New System.Drawing.Point(517, 254)
Me.txtGrenze.MaxLength = 35
Me.txtGrenze.MaxLineLength = -1
Me.txtGrenze.MaxLines_Warning = ""
Me.txtGrenze.MaxLines_Warning_Label = Nothing
Me.txtGrenze.Name = "txtGrenze"
- Me.txtGrenze.Size = New System.Drawing.Size(456, 26)
+ Me.txtGrenze.Size = New System.Drawing.Size(305, 20)
Me.txtGrenze.TabIndex = 16
'
'Label20
'
Me.Label20.AutoSize = True
- Me.Label20.Location = New System.Drawing.Point(633, 425)
- Me.Label20.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label20.Location = New System.Drawing.Point(422, 276)
Me.Label20.Name = "Label20"
- Me.Label20.Size = New System.Drawing.Size(148, 20)
+ Me.Label20.Size = New System.Drawing.Size(97, 13)
Me.Label20.TabIndex = 20
Me.Label20.Text = "Beförderungsmittel:"
Me.Label20.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1903,10 +1840,9 @@ Partial Class usrCntlFaktAbrechnung
'Label19
'
Me.Label19.AutoSize = True
- Me.Label19.Location = New System.Drawing.Point(633, 395)
- Me.Label19.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label19.Location = New System.Drawing.Point(422, 257)
Me.Label19.Name = "Label19"
- Me.Label19.Size = New System.Drawing.Size(66, 20)
+ Me.Label19.Size = New System.Drawing.Size(44, 13)
Me.Label19.TabIndex = 12
Me.Label19.Text = "Grenze:"
Me.Label19.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1916,6 +1852,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSendungsdaten._DateTimeOnly = False
Me.txtSendungsdaten._numbersOnly = False
Me.txtSendungsdaten._numbersOnlyKommastellen = ""
+ Me.txtSendungsdaten._numbersOnlyTrennzeichen = True
Me.txtSendungsdaten._Prozent = False
Me.txtSendungsdaten._ShortDateNew = False
Me.txtSendungsdaten._ShortDateOnly = False
@@ -1925,23 +1862,21 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSendungsdaten._Waehrung = False
Me.txtSendungsdaten._WaehrungZeichen = True
Me.txtSendungsdaten.ForeColor = System.Drawing.Color.Black
- Me.txtSendungsdaten.Location = New System.Drawing.Point(776, 488)
- Me.txtSendungsdaten.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtSendungsdaten.Location = New System.Drawing.Point(517, 317)
Me.txtSendungsdaten.MaxLength = 300
Me.txtSendungsdaten.MaxLineLength = -1
Me.txtSendungsdaten.MaxLines_Warning = ""
Me.txtSendungsdaten.MaxLines_Warning_Label = Nothing
Me.txtSendungsdaten.Name = "txtSendungsdaten"
- Me.txtSendungsdaten.Size = New System.Drawing.Size(456, 26)
+ Me.txtSendungsdaten.Size = New System.Drawing.Size(305, 20)
Me.txtSendungsdaten.TabIndex = 22
'
'Label17
'
Me.Label17.AutoSize = True
- Me.Label17.Location = New System.Drawing.Point(633, 492)
- Me.Label17.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label17.Location = New System.Drawing.Point(422, 320)
Me.Label17.Name = "Label17"
- Me.Label17.Size = New System.Drawing.Size(127, 20)
+ Me.Label17.Size = New System.Drawing.Size(85, 13)
Me.Label17.TabIndex = 21
Me.Label17.Text = "Sendungsdaten:"
Me.Label17.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1951,6 +1886,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtWarenwert._DateTimeOnly = False
Me.txtWarenwert._numbersOnly = False
Me.txtWarenwert._numbersOnlyKommastellen = ""
+ Me.txtWarenwert._numbersOnlyTrennzeichen = True
Me.txtWarenwert._Prozent = False
Me.txtWarenwert._ShortDateNew = False
Me.txtWarenwert._ShortDateOnly = False
@@ -1960,24 +1896,22 @@ Partial Class usrCntlFaktAbrechnung
Me.txtWarenwert._Waehrung = True
Me.txtWarenwert._WaehrungZeichen = False
Me.txtWarenwert.ForeColor = System.Drawing.Color.Black
- Me.txtWarenwert.Location = New System.Drawing.Point(843, 265)
- Me.txtWarenwert.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtWarenwert.Location = New System.Drawing.Point(562, 172)
Me.txtWarenwert.MaxLength = 35
Me.txtWarenwert.MaxLineLength = -1
Me.txtWarenwert.MaxLines_Warning = ""
Me.txtWarenwert.MaxLines_Warning_Label = Nothing
Me.txtWarenwert.Name = "txtWarenwert"
- Me.txtWarenwert.Size = New System.Drawing.Size(192, 26)
+ Me.txtWarenwert.Size = New System.Drawing.Size(129, 20)
Me.txtWarenwert.TabIndex = 15
Me.txtWarenwert.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'Label16
'
Me.Label16.AutoSize = True
- Me.Label16.Location = New System.Drawing.Point(633, 269)
- Me.Label16.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label16.Location = New System.Drawing.Point(422, 175)
Me.Label16.Name = "Label16"
- Me.Label16.Size = New System.Drawing.Size(90, 20)
+ Me.Label16.Size = New System.Drawing.Size(62, 13)
Me.Label16.TabIndex = 13
Me.Label16.Text = "Warenwert:"
Me.Label16.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -1987,6 +1921,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtZollbelegNr._DateTimeOnly = False
Me.txtZollbelegNr._numbersOnly = False
Me.txtZollbelegNr._numbersOnlyKommastellen = ""
+ Me.txtZollbelegNr._numbersOnlyTrennzeichen = True
Me.txtZollbelegNr._Prozent = False
Me.txtZollbelegNr._ShortDateNew = False
Me.txtZollbelegNr._ShortDateOnly = False
@@ -1996,23 +1931,21 @@ Partial Class usrCntlFaktAbrechnung
Me.txtZollbelegNr._Waehrung = False
Me.txtZollbelegNr._WaehrungZeichen = True
Me.txtZollbelegNr.ForeColor = System.Drawing.Color.Black
- Me.txtZollbelegNr.Location = New System.Drawing.Point(776, 235)
- Me.txtZollbelegNr.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtZollbelegNr.Location = New System.Drawing.Point(517, 153)
Me.txtZollbelegNr.MaxLength = 35
Me.txtZollbelegNr.MaxLineLength = -1
Me.txtZollbelegNr.MaxLines_Warning = ""
Me.txtZollbelegNr.MaxLines_Warning_Label = Nothing
Me.txtZollbelegNr.Name = "txtZollbelegNr"
- Me.txtZollbelegNr.Size = New System.Drawing.Size(456, 26)
+ Me.txtZollbelegNr.Size = New System.Drawing.Size(305, 20)
Me.txtZollbelegNr.TabIndex = 10
'
'Label10
'
Me.Label10.AutoSize = True
- Me.Label10.Location = New System.Drawing.Point(633, 240)
- Me.Label10.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label10.Location = New System.Drawing.Point(422, 156)
Me.Label10.Name = "Label10"
- Me.Label10.Size = New System.Drawing.Size(102, 20)
+ Me.Label10.Size = New System.Drawing.Size(70, 13)
Me.Label10.TabIndex = 9
Me.Label10.Text = "Zollbeleg-Nr.:"
Me.Label10.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -2049,19 +1982,17 @@ Partial Class usrCntlFaktAbrechnung
Me.pnlRechnungAn.Controls.Add(Me.txtRechnungAnStrasse)
Me.pnlRechnungAn.Controls.Add(Me.Label7)
Me.pnlRechnungAn.Location = New System.Drawing.Point(0, 0)
- Me.pnlRechnungAn.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
Me.pnlRechnungAn.Name = "pnlRechnungAn"
- Me.pnlRechnungAn.Size = New System.Drawing.Size(872, 224)
+ Me.pnlRechnungAn.Size = New System.Drawing.Size(582, 146)
Me.pnlRechnungAn.TabIndex = 0
'
'Button15
'
Me.Button15.Enabled = False
Me.Button15.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.Button15.Location = New System.Drawing.Point(777, 151)
- Me.Button15.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button15.Location = New System.Drawing.Point(518, 98)
Me.Button15.Name = "Button15"
- Me.Button15.Size = New System.Drawing.Size(86, 35)
+ Me.Button15.Size = New System.Drawing.Size(57, 23)
Me.Button15.TabIndex = 241
Me.Button15.Text = "Post"
Me.Button15.UseVisualStyleBackColor = True
@@ -2072,10 +2003,9 @@ Partial Class usrCntlFaktAbrechnung
Me.cboSammelrechnung._allowFreiText = False
Me.cboSammelrechnung._value = ""
Me.cboSammelrechnung.FormattingEnabled = True
- Me.cboSammelrechnung.Location = New System.Drawing.Point(423, 26)
- Me.cboSammelrechnung.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboSammelrechnung.Location = New System.Drawing.Point(282, 17)
Me.cboSammelrechnung.Name = "cboSammelrechnung"
- Me.cboSammelrechnung.Size = New System.Drawing.Size(151, 28)
+ Me.cboSammelrechnung.Size = New System.Drawing.Size(102, 21)
Me.cboSammelrechnung.TabIndex = 2
'
'Button14
@@ -2084,10 +2014,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Button14.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.Button14.FlatAppearance.BorderSize = 0
Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.Button14.Location = New System.Drawing.Point(574, 14)
- Me.Button14.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button14.Location = New System.Drawing.Point(383, 9)
Me.Button14.Name = "Button14"
- Me.Button14.Size = New System.Drawing.Size(38, 38)
+ Me.Button14.Size = New System.Drawing.Size(25, 25)
Me.Button14.TabIndex = 240
Me.Button14.TabStop = False
Me.Button14.Tag = "Kunde hinzufügen"
@@ -2099,10 +2028,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.picKdAuftrInfo.BackgroundImage = Global.SDL.My.Resources.Resources.warning2
Me.picKdAuftrInfo.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
- Me.picKdAuftrInfo.Location = New System.Drawing.Point(10, 178)
- Me.picKdAuftrInfo.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.picKdAuftrInfo.Location = New System.Drawing.Point(7, 116)
Me.picKdAuftrInfo.Name = "picKdAuftrInfo"
- Me.picKdAuftrInfo.Size = New System.Drawing.Size(30, 31)
+ Me.picKdAuftrInfo.Size = New System.Drawing.Size(20, 20)
Me.picKdAuftrInfo.TabIndex = 87
Me.picKdAuftrInfo.TabStop = False
Me.picKdAuftrInfo.Visible = False
@@ -2112,10 +2040,9 @@ Partial Class usrCntlFaktAbrechnung
Me.lblKdInaktiv.AutoSize = True
Me.lblKdInaktiv.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
Me.lblKdInaktiv.ForeColor = System.Drawing.Color.Red
- Me.lblKdInaktiv.Location = New System.Drawing.Point(9, 97)
- Me.lblKdInaktiv.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblKdInaktiv.Location = New System.Drawing.Point(6, 63)
Me.lblKdInaktiv.Name = "lblKdInaktiv"
- Me.lblKdInaktiv.Size = New System.Drawing.Size(88, 20)
+ Me.lblKdInaktiv.Size = New System.Drawing.Size(64, 13)
Me.lblKdInaktiv.TabIndex = 22
Me.lblKdInaktiv.Text = "INAKTIV !"
Me.lblKdInaktiv.Visible = False
@@ -2124,10 +2051,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.picWarnRgAn.BackgroundImage = Global.SDL.My.Resources.Resources.warning2
Me.picWarnRgAn.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
- Me.picWarnRgAn.Location = New System.Drawing.Point(120, 89)
- Me.picWarnRgAn.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.picWarnRgAn.Location = New System.Drawing.Point(80, 58)
Me.picWarnRgAn.Name = "picWarnRgAn"
- Me.picWarnRgAn.Size = New System.Drawing.Size(30, 31)
+ Me.picWarnRgAn.Size = New System.Drawing.Size(20, 20)
Me.picWarnRgAn.TabIndex = 86
Me.picWarnRgAn.TabStop = False
Me.picWarnRgAn.Visible = False
@@ -2137,10 +2063,9 @@ Partial Class usrCntlFaktAbrechnung
Me.lblUIDOK.AutoSize = True
Me.lblUIDOK.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
Me.lblUIDOK.ForeColor = System.Drawing.Color.Green
- Me.lblUIDOK.Location = New System.Drawing.Point(646, 191)
- Me.lblUIDOK.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblUIDOK.Location = New System.Drawing.Point(431, 124)
Me.lblUIDOK.Name = "lblUIDOK"
- Me.lblUIDOK.Size = New System.Drawing.Size(147, 20)
+ Me.lblUIDOK.Size = New System.Drawing.Size(104, 13)
Me.lblUIDOK.TabIndex = 21
Me.lblUIDOK.Text = "UID-Nr. GÜLTIG!"
Me.lblUIDOK.Visible = False
@@ -2150,10 +2075,9 @@ Partial Class usrCntlFaktAbrechnung
Me.lblUIDErr.AutoSize = True
Me.lblUIDErr.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
Me.lblUIDErr.ForeColor = System.Drawing.Color.Red
- Me.lblUIDErr.Location = New System.Drawing.Point(646, 191)
- Me.lblUIDErr.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblUIDErr.Location = New System.Drawing.Point(431, 124)
Me.lblUIDErr.Name = "lblUIDErr"
- Me.lblUIDErr.Size = New System.Drawing.Size(172, 20)
+ Me.lblUIDErr.Size = New System.Drawing.Size(122, 13)
Me.lblUIDErr.TabIndex = 8
Me.lblUIDErr.Text = "UID-Nr. UNGÜLTIG!"
Me.lblUIDErr.Visible = False
@@ -2162,10 +2086,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Button6.Enabled = False
Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.Button6.Location = New System.Drawing.Point(651, 151)
- Me.Button6.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button6.Location = New System.Drawing.Point(434, 98)
Me.Button6.Name = "Button6"
- Me.Button6.Size = New System.Drawing.Size(128, 35)
+ Me.Button6.Size = New System.Drawing.Size(85, 23)
Me.Button6.TabIndex = 15
Me.Button6.Text = "UID prüfen"
Me.Button6.UseVisualStyleBackColor = True
@@ -2175,6 +2098,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnName2._DateTimeOnly = False
Me.txtRechnungAnName2._numbersOnly = False
Me.txtRechnungAnName2._numbersOnlyKommastellen = ""
+ Me.txtRechnungAnName2._numbersOnlyTrennzeichen = True
Me.txtRechnungAnName2._Prozent = False
Me.txtRechnungAnName2._ShortDateNew = False
Me.txtRechnungAnName2._ShortDateOnly = False
@@ -2184,14 +2108,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnName2._Waehrung = False
Me.txtRechnungAnName2._WaehrungZeichen = True
Me.txtRechnungAnName2.ForeColor = System.Drawing.Color.Black
- Me.txtRechnungAnName2.Location = New System.Drawing.Point(152, 86)
- Me.txtRechnungAnName2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtRechnungAnName2.Location = New System.Drawing.Point(101, 56)
Me.txtRechnungAnName2.MaxLength = 40
Me.txtRechnungAnName2.MaxLineLength = -1
Me.txtRechnungAnName2.MaxLines_Warning = ""
Me.txtRechnungAnName2.MaxLines_Warning_Label = Nothing
Me.txtRechnungAnName2.Name = "txtRechnungAnName2"
- Me.txtRechnungAnName2.Size = New System.Drawing.Size(457, 26)
+ Me.txtRechnungAnName2.Size = New System.Drawing.Size(306, 20)
Me.txtRechnungAnName2.TabIndex = 11
Me.txtRechnungAnName2.TabStop = False
'
@@ -2213,13 +2136,12 @@ Partial Class usrCntlFaktAbrechnung
Me.kdFirmaRechnungAn.KdNr = "-1"
Me.kdFirmaRechnungAn.kdNrField = Nothing
Me.kdFirmaRechnungAn.KdNrNullInt = Nothing
- Me.kdFirmaRechnungAn.Location = New System.Drawing.Point(152, 57)
- Me.kdFirmaRechnungAn.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.kdFirmaRechnungAn.Location = New System.Drawing.Point(101, 37)
Me.kdFirmaRechnungAn.MaxLength = 35
Me.kdFirmaRechnungAn.Name = "kdFirmaRechnungAn"
Me.kdFirmaRechnungAn.nurAktive = True
Me.kdFirmaRechnungAn.searchActive = True
- Me.kdFirmaRechnungAn.Size = New System.Drawing.Size(422, 26)
+ Me.kdFirmaRechnungAn.Size = New System.Drawing.Size(283, 20)
Me.kdFirmaRechnungAn.TabIndex = 5
Me.kdFirmaRechnungAn.TabStop = False
Me.kdFirmaRechnungAn.TIMER_SEARCH = True
@@ -2232,10 +2154,9 @@ Partial Class usrCntlFaktAbrechnung
Me.FlatButton3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.FlatButton3.ForeColor = System.Drawing.Color.Black
Me.FlatButton3.Image = Global.SDL.My.Resources.Resources.personInaktiv
- Me.FlatButton3.Location = New System.Drawing.Point(574, 49)
- Me.FlatButton3.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.FlatButton3.Location = New System.Drawing.Point(383, 32)
Me.FlatButton3.Name = "FlatButton3"
- Me.FlatButton3.Size = New System.Drawing.Size(36, 38)
+ Me.FlatButton3.Size = New System.Drawing.Size(24, 25)
Me.FlatButton3.TabIndex = 7
Me.FlatButton3.TabStop = False
Me.FlatButton3.UseVisualStyleBackColor = True
@@ -2245,6 +2166,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtKdAuftragsNr._DateTimeOnly = False
Me.txtKdAuftragsNr._numbersOnly = False
Me.txtKdAuftragsNr._numbersOnlyKommastellen = ""
+ Me.txtKdAuftragsNr._numbersOnlyTrennzeichen = True
Me.txtKdAuftragsNr._Prozent = False
Me.txtKdAuftragsNr._ShortDateNew = False
Me.txtKdAuftragsNr._ShortDateOnly = False
@@ -2254,24 +2176,22 @@ Partial Class usrCntlFaktAbrechnung
Me.txtKdAuftragsNr._Waehrung = False
Me.txtKdAuftragsNr._WaehrungZeichen = True
Me.txtKdAuftragsNr.ForeColor = System.Drawing.Color.Black
- Me.txtKdAuftragsNr.Location = New System.Drawing.Point(152, 178)
- Me.txtKdAuftragsNr.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtKdAuftragsNr.Location = New System.Drawing.Point(101, 116)
Me.txtKdAuftragsNr.MaxLength = 35
Me.txtKdAuftragsNr.MaxLineLength = -1
Me.txtKdAuftragsNr.MaxLines_Warning = ""
Me.txtKdAuftragsNr.MaxLines_Warning_Label = Nothing
Me.txtKdAuftragsNr.Name = "txtKdAuftragsNr"
- Me.txtKdAuftragsNr.Size = New System.Drawing.Size(457, 26)
+ Me.txtKdAuftragsNr.Size = New System.Drawing.Size(306, 20)
Me.txtKdAuftragsNr.TabIndex = 20
'
'Label43
'
Me.Label43.AutoSize = True
Me.Label43.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label43.Location = New System.Drawing.Point(45, 183)
- Me.Label43.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label43.Location = New System.Drawing.Point(30, 119)
Me.Label43.Name = "Label43"
- Me.Label43.Size = New System.Drawing.Size(102, 20)
+ Me.Label43.Size = New System.Drawing.Size(65, 13)
Me.Label43.TabIndex = 19
Me.Label43.Text = "Kd-Auftr.Nr.:"
'
@@ -2280,6 +2200,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnUIDKz._DateTimeOnly = False
Me.txtRechnungAnUIDKz._numbersOnly = False
Me.txtRechnungAnUIDKz._numbersOnlyKommastellen = ""
+ Me.txtRechnungAnUIDKz._numbersOnlyTrennzeichen = True
Me.txtRechnungAnUIDKz._Prozent = False
Me.txtRechnungAnUIDKz._ShortDateNew = False
Me.txtRechnungAnUIDKz._ShortDateOnly = False
@@ -2289,14 +2210,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnUIDKz._Waehrung = False
Me.txtRechnungAnUIDKz._WaehrungZeichen = True
Me.txtRechnungAnUIDKz.ForeColor = System.Drawing.Color.Black
- Me.txtRechnungAnUIDKz.Location = New System.Drawing.Point(722, 86)
- Me.txtRechnungAnUIDKz.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtRechnungAnUIDKz.Location = New System.Drawing.Point(481, 56)
Me.txtRechnungAnUIDKz.MaxLength = 35
Me.txtRechnungAnUIDKz.MaxLineLength = -1
Me.txtRechnungAnUIDKz.MaxLines_Warning = ""
Me.txtRechnungAnUIDKz.MaxLines_Warning_Label = Nothing
Me.txtRechnungAnUIDKz.Name = "txtRechnungAnUIDKz"
- Me.txtRechnungAnUIDKz.Size = New System.Drawing.Size(38, 26)
+ Me.txtRechnungAnUIDKz.Size = New System.Drawing.Size(27, 20)
Me.txtRechnungAnUIDKz.TabIndex = 18
Me.txtRechnungAnUIDKz.TabStop = False
'
@@ -2304,10 +2224,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.lblVorauskasse.AutoSize = True
Me.lblVorauskasse.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.lblVorauskasse.Location = New System.Drawing.Point(806, 31)
- Me.lblVorauskasse.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblVorauskasse.Location = New System.Drawing.Point(537, 20)
Me.lblVorauskasse.Name = "lblVorauskasse"
- Me.lblVorauskasse.Size = New System.Drawing.Size(52, 20)
+ Me.lblVorauskasse.Size = New System.Drawing.Size(37, 13)
Me.lblVorauskasse.TabIndex = 6
Me.lblVorauskasse.Text = "NEIN"
Me.lblVorauskasse.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -2315,10 +2234,9 @@ Partial Class usrCntlFaktAbrechnung
'Label1
'
Me.Label1.AutoSize = True
- Me.Label1.Location = New System.Drawing.Point(646, 31)
- Me.Label1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label1.Location = New System.Drawing.Point(431, 20)
Me.Label1.Name = "Label1"
- Me.Label1.Size = New System.Drawing.Size(106, 20)
+ Me.Label1.Size = New System.Drawing.Size(71, 13)
Me.Label1.TabIndex = 4
Me.Label1.Text = "Vorauskasse:"
Me.Label1.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -2329,10 +2247,9 @@ Partial Class usrCntlFaktAbrechnung
Me.cboRechnungAn._allowFreiText = False
Me.cboRechnungAn._value = ""
Me.cboRechnungAn.FormattingEnabled = True
- Me.cboRechnungAn.Location = New System.Drawing.Point(152, 26)
- Me.cboRechnungAn.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboRechnungAn.Location = New System.Drawing.Point(101, 17)
Me.cboRechnungAn.Name = "cboRechnungAn"
- Me.cboRechnungAn.Size = New System.Drawing.Size(272, 28)
+ Me.cboRechnungAn.Size = New System.Drawing.Size(183, 21)
Me.cboRechnungAn.TabIndex = 1
'
'txtRechnungAnUIDNr
@@ -2340,6 +2257,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnUIDNr._DateTimeOnly = False
Me.txtRechnungAnUIDNr._numbersOnly = False
Me.txtRechnungAnUIDNr._numbersOnlyKommastellen = ""
+ Me.txtRechnungAnUIDNr._numbersOnlyTrennzeichen = True
Me.txtRechnungAnUIDNr._Prozent = False
Me.txtRechnungAnUIDNr._ShortDateNew = False
Me.txtRechnungAnUIDNr._ShortDateOnly = False
@@ -2349,14 +2267,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnUIDNr._Waehrung = False
Me.txtRechnungAnUIDNr._WaehrungZeichen = True
Me.txtRechnungAnUIDNr.ForeColor = System.Drawing.Color.Black
- Me.txtRechnungAnUIDNr.Location = New System.Drawing.Point(759, 86)
- Me.txtRechnungAnUIDNr.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtRechnungAnUIDNr.Location = New System.Drawing.Point(506, 56)
Me.txtRechnungAnUIDNr.MaxLength = 35
Me.txtRechnungAnUIDNr.MaxLineLength = -1
Me.txtRechnungAnUIDNr.MaxLines_Warning = ""
Me.txtRechnungAnUIDNr.MaxLines_Warning_Label = Nothing
Me.txtRechnungAnUIDNr.Name = "txtRechnungAnUIDNr"
- Me.txtRechnungAnUIDNr.Size = New System.Drawing.Size(102, 26)
+ Me.txtRechnungAnUIDNr.Size = New System.Drawing.Size(69, 20)
Me.txtRechnungAnUIDNr.TabIndex = 13
Me.txtRechnungAnUIDNr.TabStop = False
'
@@ -2364,10 +2281,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label6.AutoSize = True
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label6.Location = New System.Drawing.Point(646, 91)
- Me.Label6.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label6.Location = New System.Drawing.Point(431, 59)
Me.Label6.Name = "Label6"
- Me.Label6.Size = New System.Drawing.Size(71, 20)
+ Me.Label6.Size = New System.Drawing.Size(46, 13)
Me.Label6.TabIndex = 12
Me.Label6.Text = "UID-Nr.:"
'
@@ -2376,6 +2292,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnBuKdNr._DateTimeOnly = False
Me.txtRechnungAnBuKdNr._numbersOnly = False
Me.txtRechnungAnBuKdNr._numbersOnlyKommastellen = ""
+ Me.txtRechnungAnBuKdNr._numbersOnlyTrennzeichen = True
Me.txtRechnungAnBuKdNr._Prozent = False
Me.txtRechnungAnBuKdNr._ShortDateNew = False
Me.txtRechnungAnBuKdNr._ShortDateOnly = False
@@ -2385,14 +2302,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnBuKdNr._Waehrung = False
Me.txtRechnungAnBuKdNr._WaehrungZeichen = True
Me.txtRechnungAnBuKdNr.ForeColor = System.Drawing.Color.Black
- Me.txtRechnungAnBuKdNr.Location = New System.Drawing.Point(722, 57)
- Me.txtRechnungAnBuKdNr.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtRechnungAnBuKdNr.Location = New System.Drawing.Point(481, 37)
Me.txtRechnungAnBuKdNr.MaxLength = 35
Me.txtRechnungAnBuKdNr.MaxLineLength = -1
Me.txtRechnungAnBuKdNr.MaxLines_Warning = ""
Me.txtRechnungAnBuKdNr.MaxLines_Warning_Label = Nothing
Me.txtRechnungAnBuKdNr.Name = "txtRechnungAnBuKdNr"
- Me.txtRechnungAnBuKdNr.Size = New System.Drawing.Size(139, 26)
+ Me.txtRechnungAnBuKdNr.Size = New System.Drawing.Size(94, 20)
Me.txtRechnungAnBuKdNr.TabIndex = 10
Me.txtRechnungAnBuKdNr.TabStop = False
'
@@ -2400,10 +2316,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label3.AutoSize = True
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label3.Location = New System.Drawing.Point(646, 62)
- Me.Label3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label3.Location = New System.Drawing.Point(431, 40)
Me.Label3.Name = "Label3"
- Me.Label3.Size = New System.Drawing.Size(73, 20)
+ Me.Label3.Size = New System.Drawing.Size(47, 13)
Me.Label3.TabIndex = 9
Me.Label3.Text = "BuKdNr:"
'
@@ -2412,6 +2327,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrRechnungAn._DateTimeOnly = False
Me.txtkdNrRechnungAn._numbersOnly = False
Me.txtkdNrRechnungAn._numbersOnlyKommastellen = ""
+ Me.txtkdNrRechnungAn._numbersOnlyTrennzeichen = True
Me.txtkdNrRechnungAn._Prozent = False
Me.txtkdNrRechnungAn._ShortDateNew = False
Me.txtkdNrRechnungAn._ShortDateOnly = False
@@ -2421,14 +2337,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrRechnungAn._Waehrung = False
Me.txtkdNrRechnungAn._WaehrungZeichen = True
Me.txtkdNrRechnungAn.ForeColor = System.Drawing.Color.Black
- Me.txtkdNrRechnungAn.Location = New System.Drawing.Point(12, 57)
- Me.txtkdNrRechnungAn.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtkdNrRechnungAn.Location = New System.Drawing.Point(8, 37)
Me.txtkdNrRechnungAn.MaxLength = 35
Me.txtkdNrRechnungAn.MaxLineLength = -1
Me.txtkdNrRechnungAn.MaxLines_Warning = ""
Me.txtkdNrRechnungAn.MaxLines_Warning_Label = Nothing
Me.txtkdNrRechnungAn.Name = "txtkdNrRechnungAn"
- Me.txtkdNrRechnungAn.Size = New System.Drawing.Size(139, 26)
+ Me.txtkdNrRechnungAn.Size = New System.Drawing.Size(94, 20)
Me.txtkdNrRechnungAn.TabIndex = 3
Me.txtkdNrRechnungAn.TabStop = False
'
@@ -2437,6 +2352,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnOrt._DateTimeOnly = False
Me.txtRechnungAnOrt._numbersOnly = False
Me.txtRechnungAnOrt._numbersOnlyKommastellen = ""
+ Me.txtRechnungAnOrt._numbersOnlyTrennzeichen = True
Me.txtRechnungAnOrt._Prozent = False
Me.txtRechnungAnOrt._ShortDateNew = False
Me.txtRechnungAnOrt._ShortDateOnly = False
@@ -2446,14 +2362,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnOrt._Waehrung = False
Me.txtRechnungAnOrt._WaehrungZeichen = True
Me.txtRechnungAnOrt.ForeColor = System.Drawing.Color.Black
- Me.txtRechnungAnOrt.Location = New System.Drawing.Point(152, 145)
- Me.txtRechnungAnOrt.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtRechnungAnOrt.Location = New System.Drawing.Point(101, 94)
Me.txtRechnungAnOrt.MaxLength = 52
Me.txtRechnungAnOrt.MaxLineLength = -1
Me.txtRechnungAnOrt.MaxLines_Warning = ""
Me.txtRechnungAnOrt.MaxLines_Warning_Label = Nothing
Me.txtRechnungAnOrt.Name = "txtRechnungAnOrt"
- Me.txtRechnungAnOrt.Size = New System.Drawing.Size(457, 26)
+ Me.txtRechnungAnOrt.Size = New System.Drawing.Size(306, 20)
Me.txtRechnungAnOrt.TabIndex = 17
Me.txtRechnungAnOrt.TabStop = False
'
@@ -2462,6 +2377,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnStrasse._DateTimeOnly = False
Me.txtRechnungAnStrasse._numbersOnly = False
Me.txtRechnungAnStrasse._numbersOnlyKommastellen = ""
+ Me.txtRechnungAnStrasse._numbersOnlyTrennzeichen = True
Me.txtRechnungAnStrasse._Prozent = False
Me.txtRechnungAnStrasse._ShortDateNew = False
Me.txtRechnungAnStrasse._ShortDateOnly = False
@@ -2471,24 +2387,22 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRechnungAnStrasse._Waehrung = False
Me.txtRechnungAnStrasse._WaehrungZeichen = True
Me.txtRechnungAnStrasse.ForeColor = System.Drawing.Color.Black
- Me.txtRechnungAnStrasse.Location = New System.Drawing.Point(152, 115)
- Me.txtRechnungAnStrasse.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtRechnungAnStrasse.Location = New System.Drawing.Point(101, 75)
Me.txtRechnungAnStrasse.MaxLength = 40
Me.txtRechnungAnStrasse.MaxLineLength = -1
Me.txtRechnungAnStrasse.MaxLines_Warning = ""
Me.txtRechnungAnStrasse.MaxLines_Warning_Label = Nothing
Me.txtRechnungAnStrasse.Name = "txtRechnungAnStrasse"
- Me.txtRechnungAnStrasse.Size = New System.Drawing.Size(457, 26)
+ Me.txtRechnungAnStrasse.Size = New System.Drawing.Size(306, 20)
Me.txtRechnungAnStrasse.TabIndex = 14
Me.txtRechnungAnStrasse.TabStop = False
'
'Label7
'
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label7.Location = New System.Drawing.Point(612, 120)
- Me.Label7.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label7.Location = New System.Drawing.Point(408, 78)
Me.Label7.Name = "Label7"
- Me.Label7.Size = New System.Drawing.Size(250, 20)
+ Me.Label7.Size = New System.Drawing.Size(167, 13)
Me.Label7.TabIndex = 16
Me.Label7.Text = "-"
Me.Label7.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -2505,10 +2419,9 @@ Partial Class usrCntlFaktAbrechnung
Me.pnlAbsender.Controls.Add(Me.txtAbsenderOrt)
Me.pnlAbsender.Controls.Add(Me.txtAbsenderStrasse)
Me.pnlAbsender.Controls.Add(Me.FlatButton1)
- Me.pnlAbsender.Location = New System.Drawing.Point(0, 223)
- Me.pnlAbsender.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.pnlAbsender.Location = New System.Drawing.Point(0, 145)
Me.pnlAbsender.Name = "pnlAbsender"
- Me.pnlAbsender.Size = New System.Drawing.Size(622, 117)
+ Me.pnlAbsender.Size = New System.Drawing.Size(415, 77)
Me.pnlAbsender.TabIndex = 5
'
'txtkdNrAbsender
@@ -2516,6 +2429,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrAbsender._DateTimeOnly = False
Me.txtkdNrAbsender._numbersOnly = False
Me.txtkdNrAbsender._numbersOnlyKommastellen = ""
+ Me.txtkdNrAbsender._numbersOnlyTrennzeichen = True
Me.txtkdNrAbsender._Prozent = False
Me.txtkdNrAbsender._ShortDateNew = False
Me.txtkdNrAbsender._ShortDateOnly = False
@@ -2527,15 +2441,14 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrAbsender.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtkdNrAbsender.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtkdNrAbsender.ForeColor = System.Drawing.Color.Black
- Me.txtkdNrAbsender.Location = New System.Drawing.Point(12, 40)
- Me.txtkdNrAbsender.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtkdNrAbsender.Location = New System.Drawing.Point(8, 26)
Me.txtkdNrAbsender.MaxLength = 35
Me.txtkdNrAbsender.MaxLineLength = -1
Me.txtkdNrAbsender.MaxLines_Warning = ""
Me.txtkdNrAbsender.MaxLines_Warning_Label = Nothing
Me.txtkdNrAbsender.Name = "txtkdNrAbsender"
Me.txtkdNrAbsender.ReadOnly = True
- Me.txtkdNrAbsender.Size = New System.Drawing.Size(141, 19)
+ Me.txtkdNrAbsender.Size = New System.Drawing.Size(94, 13)
Me.txtkdNrAbsender.TabIndex = 1
Me.txtkdNrAbsender.TabStop = False
'
@@ -2545,10 +2458,10 @@ Partial Class usrCntlFaktAbrechnung
Me.btnAbsenderEuro.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnAbsenderEuro.Font = New System.Drawing.Font("Arial Black", 18.0!, System.Drawing.FontStyle.Bold)
Me.btnAbsenderEuro.ForeColor = System.Drawing.Color.Silver
- Me.btnAbsenderEuro.Location = New System.Drawing.Point(10, 46)
+ Me.btnAbsenderEuro.Location = New System.Drawing.Point(7, 30)
Me.btnAbsenderEuro.Margin = New System.Windows.Forms.Padding(0)
Me.btnAbsenderEuro.Name = "btnAbsenderEuro"
- Me.btnAbsenderEuro.Size = New System.Drawing.Size(140, 57)
+ Me.btnAbsenderEuro.Size = New System.Drawing.Size(93, 37)
Me.btnAbsenderEuro.TabIndex = 5
Me.btnAbsenderEuro.TabStop = False
Me.btnAbsenderEuro.Text = "€"
@@ -2573,13 +2486,12 @@ Partial Class usrCntlFaktAbrechnung
Me.kdFirmaAbsender.KdNr = "-1"
Me.kdFirmaAbsender.kdNrField = Nothing
Me.kdFirmaAbsender.KdNrNullInt = Nothing
- Me.kdFirmaAbsender.Location = New System.Drawing.Point(152, 5)
- Me.kdFirmaAbsender.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.kdFirmaAbsender.Location = New System.Drawing.Point(101, 3)
Me.kdFirmaAbsender.MaxLength = 35
Me.kdFirmaAbsender.Name = "kdFirmaAbsender"
Me.kdFirmaAbsender.nurAktive = True
Me.kdFirmaAbsender.searchActive = True
- Me.kdFirmaAbsender.Size = New System.Drawing.Size(422, 26)
+ Me.kdFirmaAbsender.Size = New System.Drawing.Size(283, 20)
Me.kdFirmaAbsender.TabIndex = 3
Me.kdFirmaAbsender.TabStop = False
Me.kdFirmaAbsender.TIMER_SEARCH = True
@@ -2590,6 +2502,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbsenderName2._DateTimeOnly = False
Me.txtAbsenderName2._numbersOnly = False
Me.txtAbsenderName2._numbersOnlyKommastellen = ""
+ Me.txtAbsenderName2._numbersOnlyTrennzeichen = True
Me.txtAbsenderName2._Prozent = False
Me.txtAbsenderName2._ShortDateNew = False
Me.txtAbsenderName2._ShortDateOnly = False
@@ -2601,14 +2514,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbsenderName2.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtAbsenderName2.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtAbsenderName2.ForeColor = System.Drawing.Color.Black
- Me.txtAbsenderName2.Location = New System.Drawing.Point(152, 40)
- Me.txtAbsenderName2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAbsenderName2.Location = New System.Drawing.Point(101, 26)
Me.txtAbsenderName2.MaxLength = 35
Me.txtAbsenderName2.MaxLineLength = -1
Me.txtAbsenderName2.MaxLines_Warning = ""
Me.txtAbsenderName2.MaxLines_Warning_Label = Nothing
Me.txtAbsenderName2.Name = "txtAbsenderName2"
- Me.txtAbsenderName2.Size = New System.Drawing.Size(458, 19)
+ Me.txtAbsenderName2.Size = New System.Drawing.Size(305, 13)
Me.txtAbsenderName2.TabIndex = 4
Me.txtAbsenderName2.TabStop = False
'
@@ -2617,6 +2529,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbsenderOrt._DateTimeOnly = False
Me.txtAbsenderOrt._numbersOnly = False
Me.txtAbsenderOrt._numbersOnlyKommastellen = ""
+ Me.txtAbsenderOrt._numbersOnlyTrennzeichen = True
Me.txtAbsenderOrt._Prozent = False
Me.txtAbsenderOrt._ShortDateNew = False
Me.txtAbsenderOrt._ShortDateOnly = False
@@ -2628,14 +2541,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbsenderOrt.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtAbsenderOrt.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtAbsenderOrt.ForeColor = System.Drawing.Color.Black
- Me.txtAbsenderOrt.Location = New System.Drawing.Point(152, 83)
- Me.txtAbsenderOrt.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAbsenderOrt.Location = New System.Drawing.Point(101, 54)
Me.txtAbsenderOrt.MaxLength = 35
Me.txtAbsenderOrt.MaxLineLength = -1
Me.txtAbsenderOrt.MaxLines_Warning = ""
Me.txtAbsenderOrt.MaxLines_Warning_Label = Nothing
Me.txtAbsenderOrt.Name = "txtAbsenderOrt"
- Me.txtAbsenderOrt.Size = New System.Drawing.Size(458, 19)
+ Me.txtAbsenderOrt.Size = New System.Drawing.Size(305, 13)
Me.txtAbsenderOrt.TabIndex = 7
Me.txtAbsenderOrt.TabStop = False
'
@@ -2644,6 +2556,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbsenderStrasse._DateTimeOnly = False
Me.txtAbsenderStrasse._numbersOnly = False
Me.txtAbsenderStrasse._numbersOnlyKommastellen = ""
+ Me.txtAbsenderStrasse._numbersOnlyTrennzeichen = True
Me.txtAbsenderStrasse._Prozent = False
Me.txtAbsenderStrasse._ShortDateNew = False
Me.txtAbsenderStrasse._ShortDateOnly = False
@@ -2655,14 +2568,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbsenderStrasse.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtAbsenderStrasse.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtAbsenderStrasse.ForeColor = System.Drawing.Color.Black
- Me.txtAbsenderStrasse.Location = New System.Drawing.Point(152, 62)
- Me.txtAbsenderStrasse.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAbsenderStrasse.Location = New System.Drawing.Point(101, 40)
Me.txtAbsenderStrasse.MaxLength = 35
Me.txtAbsenderStrasse.MaxLineLength = -1
Me.txtAbsenderStrasse.MaxLines_Warning = ""
Me.txtAbsenderStrasse.MaxLines_Warning_Label = Nothing
Me.txtAbsenderStrasse.Name = "txtAbsenderStrasse"
- Me.txtAbsenderStrasse.Size = New System.Drawing.Size(458, 19)
+ Me.txtAbsenderStrasse.Size = New System.Drawing.Size(305, 13)
Me.txtAbsenderStrasse.TabIndex = 6
Me.txtAbsenderStrasse.TabStop = False
'
@@ -2673,10 +2585,9 @@ Partial Class usrCntlFaktAbrechnung
Me.FlatButton1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.FlatButton1.ForeColor = System.Drawing.Color.Black
Me.FlatButton1.Image = Global.SDL.My.Resources.Resources.personInaktiv
- Me.FlatButton1.Location = New System.Drawing.Point(573, 0)
- Me.FlatButton1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.FlatButton1.Location = New System.Drawing.Point(382, 0)
Me.FlatButton1.Name = "FlatButton1"
- Me.FlatButton1.Size = New System.Drawing.Size(36, 38)
+ Me.FlatButton1.Size = New System.Drawing.Size(24, 25)
Me.FlatButton1.TabIndex = 2
Me.FlatButton1.TabStop = False
Me.FlatButton1.UseVisualStyleBackColor = True
@@ -2709,19 +2620,19 @@ Partial Class usrCntlFaktAbrechnung
Me.Panel7.Controls.Add(Me.Label18)
Me.Panel7.Controls.Add(Me.lblVK_ZahlungseingangBemerkung)
Me.Panel7.Controls.Add(Me.lblVK_Zahlungseingang)
- Me.Panel7.Location = New System.Drawing.Point(0, 677)
- Me.Panel7.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Panel7.Location = New System.Drawing.Point(0, 440)
Me.Panel7.Name = "Panel7"
- Me.Panel7.Size = New System.Drawing.Size(1242, 697)
+ Me.Panel7.Size = New System.Drawing.Size(828, 453)
Me.Panel7.TabIndex = 27
'
'picVK
'
Me.picVK.BackgroundImage = Global.SDL.My.Resources.Resources.ok
Me.picVK.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
- Me.picVK.Location = New System.Drawing.Point(520, 360)
+ Me.picVK.Location = New System.Drawing.Point(347, 234)
+ Me.picVK.Margin = New System.Windows.Forms.Padding(2)
Me.picVK.Name = "picVK"
- Me.picVK.Size = New System.Drawing.Size(33, 32)
+ Me.picVK.Size = New System.Drawing.Size(22, 21)
Me.picVK.TabIndex = 37
Me.picVK.TabStop = False
Me.picVK.Visible = False
@@ -2729,10 +2640,9 @@ Partial Class usrCntlFaktAbrechnung
'Button1
'
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.Button1.Location = New System.Drawing.Point(684, 5)
- Me.Button1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button1.Location = New System.Drawing.Point(456, 3)
Me.Button1.Name = "Button1"
- Me.Button1.Size = New System.Drawing.Size(291, 35)
+ Me.Button1.Size = New System.Drawing.Size(194, 23)
Me.Button1.TabIndex = 25
Me.Button1.Text = "Alle Leistungen laden (F2)"
Me.Button1.UseVisualStyleBackColor = True
@@ -2743,11 +2653,11 @@ Partial Class usrCntlFaktAbrechnung
Me.Button12.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.Button12.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button12.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button12.Location = New System.Drawing.Point(1174, 357)
- Me.Button12.Margin = New System.Windows.Forms.Padding(15, 5, 4, 5)
+ Me.Button12.Location = New System.Drawing.Point(783, 232)
+ Me.Button12.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
Me.Button12.Name = "Button12"
- Me.Button12.Padding = New System.Windows.Forms.Padding(30, 0, 0, 0)
- Me.Button12.Size = New System.Drawing.Size(57, 31)
+ Me.Button12.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+ Me.Button12.Size = New System.Drawing.Size(38, 20)
Me.Button12.TabIndex = 16
Me.Button12.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button12.UseVisualStyleBackColor = True
@@ -2755,10 +2665,9 @@ Partial Class usrCntlFaktAbrechnung
'Label14
'
Me.Label14.AutoSize = True
- Me.Label14.Location = New System.Drawing.Point(843, 363)
- Me.Label14.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label14.Location = New System.Drawing.Point(562, 236)
Me.Label14.Name = "Label14"
- Me.Label14.Size = New System.Drawing.Size(87, 20)
+ Me.Label14.Size = New System.Drawing.Size(59, 13)
Me.Label14.TabIndex = 15
Me.Label14.Text = "+ Leistung:"
Me.Label14.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -2777,11 +2686,10 @@ Partial Class usrCntlFaktAbrechnung
Me.sbLeistung.INVISIBLE_COLUMNS = Nothing
Me.sbLeistung.key_visible = False
Me.sbLeistung.KEYPARAM = Nothing
- Me.sbLeistung.Location = New System.Drawing.Point(934, 357)
- Me.sbLeistung.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.sbLeistung.Location = New System.Drawing.Point(623, 232)
Me.sbLeistung.Name = "sbLeistung"
Me.sbLeistung.searchActive = True
- Me.sbLeistung.Size = New System.Drawing.Size(240, 26)
+ Me.sbLeistung.Size = New System.Drawing.Size(161, 20)
Me.sbLeistung.SQL_ORDER_BY = Nothing
Me.sbLeistung.SQL_SELECT = Nothing
Me.sbLeistung.SQL_WHERE = Nothing
@@ -2793,10 +2701,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Button7.Enabled = False
Me.Button7.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.Button7.Location = New System.Drawing.Point(420, 5)
- Me.Button7.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button7.Location = New System.Drawing.Point(280, 3)
Me.Button7.Name = "Button7"
- Me.Button7.Size = New System.Drawing.Size(255, 35)
+ Me.Button7.Size = New System.Drawing.Size(170, 23)
Me.Button7.TabIndex = 13
Me.Button7.Text = "Leistungen nach KdNr (F1)"
Me.Button7.UseVisualStyleBackColor = True
@@ -2805,10 +2712,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.btnVorauskasseAnzeigen.Enabled = False
Me.btnVorauskasseAnzeigen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.btnVorauskasseAnzeigen.Location = New System.Drawing.Point(330, 357)
- Me.btnVorauskasseAnzeigen.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.btnVorauskasseAnzeigen.Location = New System.Drawing.Point(220, 232)
Me.btnVorauskasseAnzeigen.Name = "btnVorauskasseAnzeigen"
- Me.btnVorauskasseAnzeigen.Size = New System.Drawing.Size(188, 35)
+ Me.btnVorauskasseAnzeigen.Size = New System.Drawing.Size(125, 23)
Me.btnVorauskasseAnzeigen.TabIndex = 12
Me.btnVorauskasseAnzeigen.Text = "Vorauskasse anzeigen"
Me.btnVorauskasseAnzeigen.UseVisualStyleBackColor = True
@@ -2816,10 +2722,9 @@ Partial Class usrCntlFaktAbrechnung
'Button5
'
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.Button5.Location = New System.Drawing.Point(134, 5)
- Me.Button5.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button5.Location = New System.Drawing.Point(89, 3)
Me.Button5.Name = "Button5"
- Me.Button5.Size = New System.Drawing.Size(189, 35)
+ Me.Button5.Size = New System.Drawing.Size(126, 23)
Me.Button5.TabIndex = 11
Me.Button5.Text = "Offerten bearbeiten"
Me.Button5.UseVisualStyleBackColor = True
@@ -2827,10 +2732,9 @@ Partial Class usrCntlFaktAbrechnung
'btn
'
Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
- Me.btn.Location = New System.Drawing.Point(984, 5)
- Me.btn.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.btn.Location = New System.Drawing.Point(656, 3)
Me.btn.Name = "btn"
- Me.btn.Size = New System.Drawing.Size(248, 35)
+ Me.btn.Size = New System.Drawing.Size(165, 23)
Me.btn.TabIndex = 10
Me.btn.Text = "ZOLL / EUST Daten (F3)"
Me.btn.UseVisualStyleBackColor = True
@@ -2840,6 +2744,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtUnterNrRef._DateTimeOnly = False
Me.txtUnterNrRef._numbersOnly = False
Me.txtUnterNrRef._numbersOnlyKommastellen = ""
+ Me.txtUnterNrRef._numbersOnlyTrennzeichen = True
Me.txtUnterNrRef._Prozent = False
Me.txtUnterNrRef._ShortDateNew = False
Me.txtUnterNrRef._ShortDateOnly = False
@@ -2849,13 +2754,12 @@ Partial Class usrCntlFaktAbrechnung
Me.txtUnterNrRef._Waehrung = False
Me.txtUnterNrRef._WaehrungZeichen = True
Me.txtUnterNrRef.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!)
- Me.txtUnterNrRef.Location = New System.Drawing.Point(804, 106)
- Me.txtUnterNrRef.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtUnterNrRef.Location = New System.Drawing.Point(536, 69)
Me.txtUnterNrRef.MaxLineLength = -1
Me.txtUnterNrRef.MaxLines_Warning = ""
Me.txtUnterNrRef.MaxLines_Warning_Label = Nothing
Me.txtUnterNrRef.Name = "txtUnterNrRef"
- Me.txtUnterNrRef.Size = New System.Drawing.Size(56, 28)
+ Me.txtUnterNrRef.Size = New System.Drawing.Size(39, 21)
Me.txtUnterNrRef.TabIndex = 8
Me.txtUnterNrRef.Visible = False
'
@@ -2867,10 +2771,9 @@ Partial Class usrCntlFaktAbrechnung
Me.cboFilialeRef.DropDownWidth = 280
Me.cboFilialeRef.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!)
Me.cboFilialeRef.FormattingEnabled = True
- Me.cboFilialeRef.Location = New System.Drawing.Point(434, 105)
- Me.cboFilialeRef.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboFilialeRef.Location = New System.Drawing.Point(289, 68)
Me.cboFilialeRef.Name = "cboFilialeRef"
- Me.cboFilialeRef.Size = New System.Drawing.Size(118, 29)
+ Me.cboFilialeRef.Size = New System.Drawing.Size(80, 22)
Me.cboFilialeRef.TabIndex = 6
Me.cboFilialeRef.Visible = False
'
@@ -2879,6 +2782,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbfertigungsnummerRef._DateTimeOnly = False
Me.txtAbfertigungsnummerRef._numbersOnly = False
Me.txtAbfertigungsnummerRef._numbersOnlyKommastellen = ""
+ Me.txtAbfertigungsnummerRef._numbersOnlyTrennzeichen = True
Me.txtAbfertigungsnummerRef._Prozent = False
Me.txtAbfertigungsnummerRef._ShortDateNew = False
Me.txtAbfertigungsnummerRef._ShortDateOnly = False
@@ -2888,13 +2792,12 @@ Partial Class usrCntlFaktAbrechnung
Me.txtAbfertigungsnummerRef._Waehrung = False
Me.txtAbfertigungsnummerRef._WaehrungZeichen = True
Me.txtAbfertigungsnummerRef.Font = New System.Drawing.Font("Microsoft Tai Le", 8.0!)
- Me.txtAbfertigungsnummerRef.Location = New System.Drawing.Point(552, 106)
- Me.txtAbfertigungsnummerRef.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtAbfertigungsnummerRef.Location = New System.Drawing.Point(368, 69)
Me.txtAbfertigungsnummerRef.MaxLineLength = -1
Me.txtAbfertigungsnummerRef.MaxLines_Warning = ""
Me.txtAbfertigungsnummerRef.MaxLines_Warning_Label = Nothing
Me.txtAbfertigungsnummerRef.Name = "txtAbfertigungsnummerRef"
- Me.txtAbfertigungsnummerRef.Size = New System.Drawing.Size(252, 28)
+ Me.txtAbfertigungsnummerRef.Size = New System.Drawing.Size(169, 21)
Me.txtAbfertigungsnummerRef.TabIndex = 7
Me.txtAbfertigungsnummerRef.Visible = False
'
@@ -2903,10 +2806,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Label26.AutoSize = True
Me.Label26.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
Me.Label26.ForeColor = System.Drawing.Color.Black
- Me.Label26.Location = New System.Drawing.Point(432, 86)
- Me.Label26.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label26.Location = New System.Drawing.Point(288, 56)
Me.Label26.Name = "Label26"
- Me.Label26.Size = New System.Drawing.Size(79, 20)
+ Me.Label26.Size = New System.Drawing.Size(53, 13)
Me.Label26.TabIndex = 9
Me.Label26.Text = "Referenz:"
Me.Label26.Visible = False
@@ -2914,10 +2816,9 @@ Partial Class usrCntlFaktAbrechnung
'Label31
'
Me.Label31.AutoSize = True
- Me.Label31.Location = New System.Drawing.Point(10, 372)
- Me.Label31.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label31.Location = New System.Drawing.Point(7, 242)
Me.Label31.Name = "Label31"
- Me.Label31.Size = New System.Drawing.Size(174, 20)
+ Me.Label31.Size = New System.Drawing.Size(117, 13)
Me.Label31.TabIndex = 4
Me.Label31.Text = "Rechnungs-Positionen:"
Me.Label31.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -2925,10 +2826,9 @@ Partial Class usrCntlFaktAbrechnung
'Label29
'
Me.Label29.AutoSize = True
- Me.Label29.Location = New System.Drawing.Point(10, 20)
- Me.Label29.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label29.Location = New System.Drawing.Point(7, 13)
Me.Label29.Name = "Label29"
- Me.Label29.Size = New System.Drawing.Size(114, 20)
+ Me.Label29.Size = New System.Drawing.Size(76, 13)
Me.Label29.TabIndex = 0
Me.Label29.Text = "Kunden-Offert:"
Me.Label29.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -2936,10 +2836,9 @@ Partial Class usrCntlFaktAbrechnung
'Label30
'
Me.Label30.AutoSize = True
- Me.Label30.Location = New System.Drawing.Point(326, 20)
- Me.Label30.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label30.Location = New System.Drawing.Point(217, 13)
Me.Label30.Name = "Label30"
- Me.Label30.Size = New System.Drawing.Size(87, 20)
+ Me.Label30.Size = New System.Drawing.Size(59, 13)
Me.Label30.TabIndex = 1
Me.Label30.Text = "Positionen:"
Me.Label30.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -2970,8 +2869,7 @@ Partial Class usrCntlFaktAbrechnung
DataGridViewCellStyle11.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle11.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvRechnungenPositionen.DefaultCellStyle = DataGridViewCellStyle11
- Me.dgvRechnungenPositionen.Location = New System.Drawing.Point(15, 397)
- Me.dgvRechnungenPositionen.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.dgvRechnungenPositionen.Location = New System.Drawing.Point(10, 258)
Me.dgvRechnungenPositionen.Name = "dgvRechnungenPositionen"
Me.dgvRechnungenPositionen.ReadOnly = True
DataGridViewCellStyle12.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
@@ -2985,7 +2883,7 @@ Partial Class usrCntlFaktAbrechnung
Me.dgvRechnungenPositionen.RowHeadersVisible = False
Me.dgvRechnungenPositionen.RowHeadersWidth = 62
Me.dgvRechnungenPositionen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
- Me.dgvRechnungenPositionen.Size = New System.Drawing.Size(1216, 291)
+ Me.dgvRechnungenPositionen.Size = New System.Drawing.Size(811, 189)
Me.dgvRechnungenPositionen.TabIndex = 5
Me.dgvRechnungenPositionen.TabStop = False
'
@@ -3076,8 +2974,7 @@ Partial Class usrCntlFaktAbrechnung
DataGridViewCellStyle14.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle14.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvOffertenSperrliste.DefaultCellStyle = DataGridViewCellStyle14
- Me.dgvOffertenSperrliste.Location = New System.Drawing.Point(16, 45)
- Me.dgvOffertenSperrliste.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.dgvOffertenSperrliste.Location = New System.Drawing.Point(11, 29)
Me.dgvOffertenSperrliste.MultiSelect = False
Me.dgvOffertenSperrliste.Name = "dgvOffertenSperrliste"
Me.dgvOffertenSperrliste.ReadOnly = True
@@ -3096,7 +2993,7 @@ Partial Class usrCntlFaktAbrechnung
DataGridViewCellStyle16.SelectionForeColor = System.Drawing.Color.Black
Me.dgvOffertenSperrliste.RowsDefaultCellStyle = DataGridViewCellStyle16
Me.dgvOffertenSperrliste.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
- Me.dgvOffertenSperrliste.Size = New System.Drawing.Size(306, 309)
+ Me.dgvOffertenSperrliste.Size = New System.Drawing.Size(204, 201)
Me.dgvOffertenSperrliste.TabIndex = 2
Me.dgvOffertenSperrliste.TabStop = False
'
@@ -3128,8 +3025,7 @@ Partial Class usrCntlFaktAbrechnung
DataGridViewCellStyle19.SelectionForeColor = System.Drawing.SystemColors.HighlightText
DataGridViewCellStyle19.WrapMode = System.Windows.Forms.DataGridViewTriState.[False]
Me.dgvOfferteDetailsUebersicht.DefaultCellStyle = DataGridViewCellStyle19
- Me.dgvOfferteDetailsUebersicht.Location = New System.Drawing.Point(330, 45)
- Me.dgvOfferteDetailsUebersicht.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.dgvOfferteDetailsUebersicht.Location = New System.Drawing.Point(220, 29)
Me.dgvOfferteDetailsUebersicht.MultiSelect = False
Me.dgvOfferteDetailsUebersicht.Name = "dgvOfferteDetailsUebersicht"
DataGridViewCellStyle20.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft
@@ -3147,7 +3043,7 @@ Partial Class usrCntlFaktAbrechnung
DataGridViewCellStyle21.SelectionForeColor = System.Drawing.Color.Black
Me.dgvOfferteDetailsUebersicht.RowsDefaultCellStyle = DataGridViewCellStyle21
Me.dgvOfferteDetailsUebersicht.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
- Me.dgvOfferteDetailsUebersicht.Size = New System.Drawing.Size(902, 309)
+ Me.dgvOfferteDetailsUebersicht.Size = New System.Drawing.Size(601, 201)
Me.dgvOfferteDetailsUebersicht.TabIndex = 3
'
'txtRohmasse
@@ -3155,6 +3051,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRohmasse._DateTimeOnly = False
Me.txtRohmasse._numbersOnly = False
Me.txtRohmasse._numbersOnlyKommastellen = ""
+ Me.txtRohmasse._numbersOnlyTrennzeichen = True
Me.txtRohmasse._Prozent = False
Me.txtRohmasse._ShortDateNew = False
Me.txtRohmasse._ShortDateOnly = False
@@ -3164,24 +3061,22 @@ Partial Class usrCntlFaktAbrechnung
Me.txtRohmasse._Waehrung = False
Me.txtRohmasse._WaehrungZeichen = True
Me.txtRohmasse.ForeColor = System.Drawing.Color.Black
- Me.txtRohmasse.Location = New System.Drawing.Point(555, 177)
- Me.txtRohmasse.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtRohmasse.Location = New System.Drawing.Point(370, 115)
Me.txtRohmasse.MaxLength = 35
Me.txtRohmasse.MaxLineLength = -1
Me.txtRohmasse.MaxLines_Warning = ""
Me.txtRohmasse.MaxLines_Warning_Label = Nothing
Me.txtRohmasse.Name = "txtRohmasse"
- Me.txtRohmasse.Size = New System.Drawing.Size(456, 26)
+ Me.txtRohmasse.Size = New System.Drawing.Size(305, 20)
Me.txtRohmasse.TabIndex = 24
Me.txtRohmasse.Visible = False
'
'Label18
'
Me.Label18.AutoSize = True
- Me.Label18.Location = New System.Drawing.Point(412, 182)
- Me.Label18.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label18.Location = New System.Drawing.Point(275, 118)
Me.Label18.Name = "Label18"
- Me.Label18.Size = New System.Drawing.Size(90, 20)
+ Me.Label18.Size = New System.Drawing.Size(60, 13)
Me.Label18.TabIndex = 23
Me.Label18.Text = "Rohmasse:"
Me.Label18.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3190,10 +3085,9 @@ Partial Class usrCntlFaktAbrechnung
'lblVK_ZahlungseingangBemerkung
'
Me.lblVK_ZahlungseingangBemerkung.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.lblVK_ZahlungseingangBemerkung.Location = New System.Drawing.Point(558, 375)
- Me.lblVK_ZahlungseingangBemerkung.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblVK_ZahlungseingangBemerkung.Location = New System.Drawing.Point(372, 244)
Me.lblVK_ZahlungseingangBemerkung.Name = "lblVK_ZahlungseingangBemerkung"
- Me.lblVK_ZahlungseingangBemerkung.Size = New System.Drawing.Size(304, 23)
+ Me.lblVK_ZahlungseingangBemerkung.Size = New System.Drawing.Size(203, 15)
Me.lblVK_ZahlungseingangBemerkung.TabIndex = 38
Me.lblVK_ZahlungseingangBemerkung.Text = "TEST"
'
@@ -3201,10 +3095,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.lblVK_Zahlungseingang.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblVK_Zahlungseingang.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(0, Byte), Integer))
- Me.lblVK_Zahlungseingang.Location = New System.Drawing.Point(558, 355)
- Me.lblVK_Zahlungseingang.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblVK_Zahlungseingang.Location = New System.Drawing.Point(372, 231)
Me.lblVK_Zahlungseingang.Name = "lblVK_Zahlungseingang"
- Me.lblVK_Zahlungseingang.Size = New System.Drawing.Size(304, 28)
+ Me.lblVK_Zahlungseingang.Size = New System.Drawing.Size(203, 18)
Me.lblVK_Zahlungseingang.TabIndex = 26
Me.lblVK_Zahlungseingang.Text = "TEST"
'
@@ -3214,10 +3107,9 @@ Partial Class usrCntlFaktAbrechnung
Me.cboWaehrung._allowFreiText = False
Me.cboWaehrung._value = ""
Me.cboWaehrung.FormattingEnabled = True
- Me.cboWaehrung.Location = New System.Drawing.Point(776, 263)
- Me.cboWaehrung.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboWaehrung.Location = New System.Drawing.Point(517, 171)
Me.cboWaehrung.Name = "cboWaehrung"
- Me.cboWaehrung.Size = New System.Drawing.Size(68, 28)
+ Me.cboWaehrung.Size = New System.Drawing.Size(47, 21)
Me.cboWaehrung.TabIndex = 14
'
'cboWaehrungUmrechnung
@@ -3227,10 +3119,9 @@ Partial Class usrCntlFaktAbrechnung
Me.cboWaehrungUmrechnung._value = ""
Me.cboWaehrungUmrechnung.Enabled = False
Me.cboWaehrungUmrechnung.FormattingEnabled = True
- Me.cboWaehrungUmrechnung.Location = New System.Drawing.Point(776, 292)
- Me.cboWaehrungUmrechnung.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboWaehrungUmrechnung.Location = New System.Drawing.Point(517, 190)
Me.cboWaehrungUmrechnung.Name = "cboWaehrungUmrechnung"
- Me.cboWaehrungUmrechnung.Size = New System.Drawing.Size(68, 28)
+ Me.cboWaehrungUmrechnung.Size = New System.Drawing.Size(47, 21)
Me.cboWaehrungUmrechnung.TabIndex = 17
'
'pnlEmpfaenger
@@ -3245,10 +3136,9 @@ Partial Class usrCntlFaktAbrechnung
Me.pnlEmpfaenger.Controls.Add(Me.txtEmpfaengerStrasse)
Me.pnlEmpfaenger.Controls.Add(Me.kdFirmaEmpfaenger)
Me.pnlEmpfaenger.Controls.Add(Me.FlatButton2)
- Me.pnlEmpfaenger.Location = New System.Drawing.Point(0, 340)
- Me.pnlEmpfaenger.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.pnlEmpfaenger.Location = New System.Drawing.Point(0, 221)
Me.pnlEmpfaenger.Name = "pnlEmpfaenger"
- Me.pnlEmpfaenger.Size = New System.Drawing.Size(622, 114)
+ Me.pnlEmpfaenger.Size = New System.Drawing.Size(415, 75)
Me.pnlEmpfaenger.TabIndex = 6
'
'txtkdNrEmpfaenger
@@ -3256,6 +3146,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrEmpfaenger._DateTimeOnly = False
Me.txtkdNrEmpfaenger._numbersOnly = False
Me.txtkdNrEmpfaenger._numbersOnlyKommastellen = ""
+ Me.txtkdNrEmpfaenger._numbersOnlyTrennzeichen = True
Me.txtkdNrEmpfaenger._Prozent = False
Me.txtkdNrEmpfaenger._ShortDateNew = False
Me.txtkdNrEmpfaenger._ShortDateOnly = False
@@ -3267,15 +3158,14 @@ Partial Class usrCntlFaktAbrechnung
Me.txtkdNrEmpfaenger.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtkdNrEmpfaenger.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtkdNrEmpfaenger.ForeColor = System.Drawing.Color.Black
- Me.txtkdNrEmpfaenger.Location = New System.Drawing.Point(12, 40)
- Me.txtkdNrEmpfaenger.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtkdNrEmpfaenger.Location = New System.Drawing.Point(8, 26)
Me.txtkdNrEmpfaenger.MaxLength = 35
Me.txtkdNrEmpfaenger.MaxLineLength = -1
Me.txtkdNrEmpfaenger.MaxLines_Warning = ""
Me.txtkdNrEmpfaenger.MaxLines_Warning_Label = Nothing
Me.txtkdNrEmpfaenger.Name = "txtkdNrEmpfaenger"
Me.txtkdNrEmpfaenger.ReadOnly = True
- Me.txtkdNrEmpfaenger.Size = New System.Drawing.Size(141, 19)
+ Me.txtkdNrEmpfaenger.Size = New System.Drawing.Size(94, 13)
Me.txtkdNrEmpfaenger.TabIndex = 1
Me.txtkdNrEmpfaenger.TabStop = False
'
@@ -3285,10 +3175,10 @@ Partial Class usrCntlFaktAbrechnung
Me.btnEmpfaengerEuro.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnEmpfaengerEuro.Font = New System.Drawing.Font("Arial Black", 18.0!, System.Drawing.FontStyle.Bold)
Me.btnEmpfaengerEuro.ForeColor = System.Drawing.Color.Silver
- Me.btnEmpfaengerEuro.Location = New System.Drawing.Point(12, 40)
+ Me.btnEmpfaengerEuro.Location = New System.Drawing.Point(8, 26)
Me.btnEmpfaengerEuro.Margin = New System.Windows.Forms.Padding(0)
Me.btnEmpfaengerEuro.Name = "btnEmpfaengerEuro"
- Me.btnEmpfaengerEuro.Size = New System.Drawing.Size(140, 63)
+ Me.btnEmpfaengerEuro.Size = New System.Drawing.Size(93, 41)
Me.btnEmpfaengerEuro.TabIndex = 5
Me.btnEmpfaengerEuro.TabStop = False
Me.btnEmpfaengerEuro.Text = "€"
@@ -3299,6 +3189,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtEmpfeangerName2._DateTimeOnly = False
Me.txtEmpfeangerName2._numbersOnly = False
Me.txtEmpfeangerName2._numbersOnlyKommastellen = ""
+ Me.txtEmpfeangerName2._numbersOnlyTrennzeichen = True
Me.txtEmpfeangerName2._Prozent = False
Me.txtEmpfeangerName2._ShortDateNew = False
Me.txtEmpfeangerName2._ShortDateOnly = False
@@ -3310,14 +3201,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtEmpfeangerName2.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtEmpfeangerName2.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtEmpfeangerName2.ForeColor = System.Drawing.Color.Black
- Me.txtEmpfeangerName2.Location = New System.Drawing.Point(152, 40)
- Me.txtEmpfeangerName2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtEmpfeangerName2.Location = New System.Drawing.Point(101, 26)
Me.txtEmpfeangerName2.MaxLength = 35
Me.txtEmpfeangerName2.MaxLineLength = -1
Me.txtEmpfeangerName2.MaxLines_Warning = ""
Me.txtEmpfeangerName2.MaxLines_Warning_Label = Nothing
Me.txtEmpfeangerName2.Name = "txtEmpfeangerName2"
- Me.txtEmpfeangerName2.Size = New System.Drawing.Size(458, 19)
+ Me.txtEmpfeangerName2.Size = New System.Drawing.Size(305, 13)
Me.txtEmpfeangerName2.TabIndex = 4
Me.txtEmpfeangerName2.TabStop = False
'
@@ -3325,10 +3215,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label5.AutoSize = True
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
- Me.Label5.Location = New System.Drawing.Point(4, 9)
- Me.Label5.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label5.Location = New System.Drawing.Point(3, 6)
Me.Label5.Name = "Label5"
- Me.Label5.Size = New System.Drawing.Size(122, 20)
+ Me.Label5.Size = New System.Drawing.Size(86, 13)
Me.Label5.TabIndex = 0
Me.Label5.Text = "2. Empfänger:"
'
@@ -3337,6 +3226,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtEmpfaengerOrt._DateTimeOnly = False
Me.txtEmpfaengerOrt._numbersOnly = False
Me.txtEmpfaengerOrt._numbersOnlyKommastellen = ""
+ Me.txtEmpfaengerOrt._numbersOnlyTrennzeichen = True
Me.txtEmpfaengerOrt._Prozent = False
Me.txtEmpfaengerOrt._ShortDateNew = False
Me.txtEmpfaengerOrt._ShortDateOnly = False
@@ -3348,14 +3238,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtEmpfaengerOrt.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtEmpfaengerOrt.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtEmpfaengerOrt.ForeColor = System.Drawing.Color.Black
- Me.txtEmpfaengerOrt.Location = New System.Drawing.Point(152, 83)
- Me.txtEmpfaengerOrt.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtEmpfaengerOrt.Location = New System.Drawing.Point(101, 54)
Me.txtEmpfaengerOrt.MaxLength = 35
Me.txtEmpfaengerOrt.MaxLineLength = -1
Me.txtEmpfaengerOrt.MaxLines_Warning = ""
Me.txtEmpfaengerOrt.MaxLines_Warning_Label = Nothing
Me.txtEmpfaengerOrt.Name = "txtEmpfaengerOrt"
- Me.txtEmpfaengerOrt.Size = New System.Drawing.Size(458, 19)
+ Me.txtEmpfaengerOrt.Size = New System.Drawing.Size(305, 13)
Me.txtEmpfaengerOrt.TabIndex = 7
Me.txtEmpfaengerOrt.TabStop = False
'
@@ -3364,6 +3253,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtEmpfaengerStrasse._DateTimeOnly = False
Me.txtEmpfaengerStrasse._numbersOnly = False
Me.txtEmpfaengerStrasse._numbersOnlyKommastellen = ""
+ Me.txtEmpfaengerStrasse._numbersOnlyTrennzeichen = True
Me.txtEmpfaengerStrasse._Prozent = False
Me.txtEmpfaengerStrasse._ShortDateNew = False
Me.txtEmpfaengerStrasse._ShortDateOnly = False
@@ -3375,14 +3265,13 @@ Partial Class usrCntlFaktAbrechnung
Me.txtEmpfaengerStrasse.BackColor = System.Drawing.Color.WhiteSmoke
Me.txtEmpfaengerStrasse.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.txtEmpfaengerStrasse.ForeColor = System.Drawing.Color.Black
- Me.txtEmpfaengerStrasse.Location = New System.Drawing.Point(152, 62)
- Me.txtEmpfaengerStrasse.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtEmpfaengerStrasse.Location = New System.Drawing.Point(101, 40)
Me.txtEmpfaengerStrasse.MaxLength = 35
Me.txtEmpfaengerStrasse.MaxLineLength = -1
Me.txtEmpfaengerStrasse.MaxLines_Warning = ""
Me.txtEmpfaengerStrasse.MaxLines_Warning_Label = Nothing
Me.txtEmpfaengerStrasse.Name = "txtEmpfaengerStrasse"
- Me.txtEmpfaengerStrasse.Size = New System.Drawing.Size(458, 19)
+ Me.txtEmpfaengerStrasse.Size = New System.Drawing.Size(305, 13)
Me.txtEmpfaengerStrasse.TabIndex = 6
Me.txtEmpfaengerStrasse.TabStop = False
'
@@ -3405,13 +3294,12 @@ Partial Class usrCntlFaktAbrechnung
Me.kdFirmaEmpfaenger.KdNr = "-1"
Me.kdFirmaEmpfaenger.kdNrField = Nothing
Me.kdFirmaEmpfaenger.KdNrNullInt = Nothing
- Me.kdFirmaEmpfaenger.Location = New System.Drawing.Point(152, 5)
- Me.kdFirmaEmpfaenger.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.kdFirmaEmpfaenger.Location = New System.Drawing.Point(101, 3)
Me.kdFirmaEmpfaenger.MaxLength = 35
Me.kdFirmaEmpfaenger.Name = "kdFirmaEmpfaenger"
Me.kdFirmaEmpfaenger.nurAktive = True
Me.kdFirmaEmpfaenger.searchActive = True
- Me.kdFirmaEmpfaenger.Size = New System.Drawing.Size(422, 26)
+ Me.kdFirmaEmpfaenger.Size = New System.Drawing.Size(283, 20)
Me.kdFirmaEmpfaenger.TabIndex = 3
Me.kdFirmaEmpfaenger.TabStop = False
Me.kdFirmaEmpfaenger.TIMER_SEARCH = True
@@ -3424,10 +3312,9 @@ Partial Class usrCntlFaktAbrechnung
Me.FlatButton2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.FlatButton2.ForeColor = System.Drawing.Color.Black
Me.FlatButton2.Image = Global.SDL.My.Resources.Resources.personInaktiv
- Me.FlatButton2.Location = New System.Drawing.Point(573, 0)
- Me.FlatButton2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.FlatButton2.Location = New System.Drawing.Point(382, 0)
Me.FlatButton2.Name = "FlatButton2"
- Me.FlatButton2.Size = New System.Drawing.Size(36, 38)
+ Me.FlatButton2.Size = New System.Drawing.Size(24, 25)
Me.FlatButton2.TabIndex = 2
Me.FlatButton2.TabStop = False
Me.FlatButton2.UseVisualStyleBackColor = True
@@ -3466,19 +3353,17 @@ Partial Class usrCntlFaktAbrechnung
Me.pnl.Controls.Add(Me.pnlDocs)
Me.pnl.Controls.Add(Me.cbxAdmin)
Me.pnl.Dock = System.Windows.Forms.DockStyle.Bottom
- Me.pnl.Location = New System.Drawing.Point(0, 1893)
- Me.pnl.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.pnl.Location = New System.Drawing.Point(0, 1226)
Me.pnl.Name = "pnl"
- Me.pnl.Size = New System.Drawing.Size(1245, 245)
+ Me.pnl.Size = New System.Drawing.Size(830, 164)
Me.pnl.TabIndex = 2
'
'lblEUR_1
'
Me.lblEUR_1.AutoSize = True
- Me.lblEUR_1.Location = New System.Drawing.Point(958, 91)
- Me.lblEUR_1.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblEUR_1.Location = New System.Drawing.Point(639, 59)
Me.lblEUR_1.Name = "lblEUR_1"
- Me.lblEUR_1.Size = New System.Drawing.Size(44, 20)
+ Me.lblEUR_1.Size = New System.Drawing.Size(30, 13)
Me.lblEUR_1.TabIndex = 239
Me.lblEUR_1.Text = "EUR"
Me.lblEUR_1.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3486,10 +3371,9 @@ Partial Class usrCntlFaktAbrechnung
'lblEUR_2
'
Me.lblEUR_2.AutoSize = True
- Me.lblEUR_2.Location = New System.Drawing.Point(958, 118)
- Me.lblEUR_2.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblEUR_2.Location = New System.Drawing.Point(639, 77)
Me.lblEUR_2.Name = "lblEUR_2"
- Me.lblEUR_2.Size = New System.Drawing.Size(44, 20)
+ Me.lblEUR_2.Size = New System.Drawing.Size(30, 13)
Me.lblEUR_2.TabIndex = 238
Me.lblEUR_2.Text = "EUR"
Me.lblEUR_2.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3497,10 +3381,9 @@ Partial Class usrCntlFaktAbrechnung
'lblEUR_4
'
Me.lblEUR_4.AutoSize = True
- Me.lblEUR_4.Location = New System.Drawing.Point(958, 180)
- Me.lblEUR_4.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblEUR_4.Location = New System.Drawing.Point(639, 117)
Me.lblEUR_4.Name = "lblEUR_4"
- Me.lblEUR_4.Size = New System.Drawing.Size(44, 20)
+ Me.lblEUR_4.Size = New System.Drawing.Size(30, 13)
Me.lblEUR_4.TabIndex = 237
Me.lblEUR_4.Text = "EUR"
Me.lblEUR_4.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3508,10 +3391,9 @@ Partial Class usrCntlFaktAbrechnung
'Label55
'
Me.Label55.AutoSize = True
- Me.Label55.Location = New System.Drawing.Point(632, 118)
- Me.Label55.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label55.Location = New System.Drawing.Point(421, 77)
Me.Label55.Name = "Label55"
- Me.Label55.Size = New System.Drawing.Size(149, 20)
+ Me.Label55.Size = New System.Drawing.Size(98, 13)
Me.Label55.TabIndex = 236
Me.Label55.Text = "Steuerfreier Betrag:"
Me.Label55.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3524,30 +3406,28 @@ Partial Class usrCntlFaktAbrechnung
Me.cboSteuerschlüssel.CausesValidation = False
Me.cboSteuerschlüssel.DropDownWidth = 350
Me.cboSteuerschlüssel.FormattingEnabled = True
- Me.cboSteuerschlüssel.Location = New System.Drawing.Point(694, 46)
- Me.cboSteuerschlüssel.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cboSteuerschlüssel.Location = New System.Drawing.Point(463, 30)
Me.cboSteuerschlüssel.Name = "cboSteuerschlüssel"
- Me.cboSteuerschlüssel.Size = New System.Drawing.Size(216, 28)
+ Me.cboSteuerschlüssel.Size = New System.Drawing.Size(145, 21)
Me.cboSteuerschlüssel.TabIndex = 3
'
'rtbAbf_Besonderheiten
'
Me.rtbAbf_Besonderheiten.BackColor = System.Drawing.Color.White
Me.rtbAbf_Besonderheiten.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
- Me.rtbAbf_Besonderheiten.Location = New System.Drawing.Point(15, 29)
- Me.rtbAbf_Besonderheiten.Margin = New System.Windows.Forms.Padding(6, 8, 6, 8)
+ Me.rtbAbf_Besonderheiten.Location = New System.Drawing.Point(10, 19)
+ Me.rtbAbf_Besonderheiten.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
Me.rtbAbf_Besonderheiten.Name = "rtbAbf_Besonderheiten"
- Me.rtbAbf_Besonderheiten.Size = New System.Drawing.Size(160, 204)
+ Me.rtbAbf_Besonderheiten.Size = New System.Drawing.Size(107, 133)
Me.rtbAbf_Besonderheiten.TabIndex = 235
Me.rtbAbf_Besonderheiten.Visible = False
'
'cbxOriginalPrint
'
Me.cbxOriginalPrint.AutoSize = True
- Me.cbxOriginalPrint.Location = New System.Drawing.Point(802, 9)
- Me.cbxOriginalPrint.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cbxOriginalPrint.Location = New System.Drawing.Point(535, 6)
Me.cbxOriginalPrint.Name = "cbxOriginalPrint"
- Me.cbxOriginalPrint.Size = New System.Drawing.Size(194, 24)
+ Me.cbxOriginalPrint.Size = New System.Drawing.Size(134, 17)
Me.cbxOriginalPrint.TabIndex = 28
Me.cbxOriginalPrint.Text = "Original (ohne ""Kopie"")"
Me.cbxOriginalPrint.UseVisualStyleBackColor = True
@@ -3558,10 +3438,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Label46.AutoSize = True
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.ForeColor = System.Drawing.Color.Green
- Me.Label46.Location = New System.Drawing.Point(1080, 183)
- Me.Label46.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label46.Location = New System.Drawing.Point(720, 119)
Me.Label46.Name = "Label46"
- Me.Label46.Size = New System.Drawing.Size(107, 20)
+ Me.Label46.Size = New System.Drawing.Size(73, 13)
Me.Label46.TabIndex = 21
Me.Label46.Text = "gespeichert"
Me.Label46.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3573,11 +3452,11 @@ Partial Class usrCntlFaktAbrechnung
Me.Button9.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.Button9.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button9.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button9.Location = New System.Drawing.Point(1006, 40)
- Me.Button9.Margin = New System.Windows.Forms.Padding(15, 5, 4, 5)
+ Me.Button9.Location = New System.Drawing.Point(671, 26)
+ Me.Button9.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
Me.Button9.Name = "Button9"
- Me.Button9.Padding = New System.Windows.Forms.Padding(30, 0, 0, 0)
- Me.Button9.Size = New System.Drawing.Size(75, 38)
+ Me.Button9.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+ Me.Button9.Size = New System.Drawing.Size(50, 25)
Me.Button9.TabIndex = 19
Me.Button9.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button9.UseVisualStyleBackColor = True
@@ -3588,11 +3467,11 @@ Partial Class usrCntlFaktAbrechnung
Me.Button8.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.Button8.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button8.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button8.Location = New System.Drawing.Point(1080, 40)
- Me.Button8.Margin = New System.Windows.Forms.Padding(15, 5, 4, 5)
+ Me.Button8.Location = New System.Drawing.Point(720, 26)
+ Me.Button8.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
Me.Button8.Name = "Button8"
- Me.Button8.Padding = New System.Windows.Forms.Padding(30, 0, 0, 0)
- Me.Button8.Size = New System.Drawing.Size(75, 38)
+ Me.Button8.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+ Me.Button8.Size = New System.Drawing.Size(50, 25)
Me.Button8.TabIndex = 18
Me.Button8.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button8.UseVisualStyleBackColor = True
@@ -3603,11 +3482,11 @@ Partial Class usrCntlFaktAbrechnung
Me.Button4.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button4.Location = New System.Drawing.Point(1154, 40)
- Me.Button4.Margin = New System.Windows.Forms.Padding(15, 5, 4, 5)
+ Me.Button4.Location = New System.Drawing.Point(769, 26)
+ Me.Button4.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
Me.Button4.Name = "Button4"
- Me.Button4.Padding = New System.Windows.Forms.Padding(30, 0, 0, 0)
- Me.Button4.Size = New System.Drawing.Size(75, 38)
+ Me.Button4.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+ Me.Button4.Size = New System.Drawing.Size(50, 25)
Me.Button4.TabIndex = 15
Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button4.UseVisualStyleBackColor = True
@@ -3617,10 +3496,9 @@ Partial Class usrCntlFaktAbrechnung
Me.Button3.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button3.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button3.Location = New System.Drawing.Point(1006, 5)
- Me.Button3.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.Button3.Location = New System.Drawing.Point(671, 3)
Me.Button3.Name = "Button3"
- Me.Button3.Size = New System.Drawing.Size(222, 38)
+ Me.Button3.Size = New System.Drawing.Size(148, 25)
Me.Button3.TabIndex = 14
Me.Button3.Text = "Vorschau"
Me.Button3.UseVisualStyleBackColor = True
@@ -3629,10 +3507,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label40.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Bold)
Me.Label40.ForeColor = System.Drawing.Color.Red
- Me.Label40.Location = New System.Drawing.Point(626, 207)
- Me.Label40.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label40.Location = New System.Drawing.Point(417, 135)
Me.Label40.Name = "Label40"
- Me.Label40.Size = New System.Drawing.Size(612, 26)
+ Me.Label40.Size = New System.Drawing.Size(408, 17)
Me.Label40.TabIndex = 13
Me.Label40.Text = "ERROR:"
Me.Label40.Visible = False
@@ -3642,11 +3519,11 @@ Partial Class usrCntlFaktAbrechnung
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button2.Image = Global.SDL.My.Resources.Resources.del
Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button2.Location = New System.Drawing.Point(1006, 86)
- Me.Button2.Margin = New System.Windows.Forms.Padding(15, 5, 4, 5)
+ Me.Button2.Location = New System.Drawing.Point(671, 56)
+ Me.Button2.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
Me.Button2.Name = "Button2"
- Me.Button2.Padding = New System.Windows.Forms.Padding(30, 0, 0, 0)
- Me.Button2.Size = New System.Drawing.Size(224, 40)
+ Me.Button2.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+ Me.Button2.Size = New System.Drawing.Size(149, 26)
Me.Button2.TabIndex = 16
Me.Button2.Text = "Löschen"
Me.Button2.UseVisualStyleBackColor = True
@@ -3656,11 +3533,11 @@ Partial Class usrCntlFaktAbrechnung
Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnOK.Image = CType(resources.GetObject("btnOK.Image"), System.Drawing.Image)
Me.btnOK.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.btnOK.Location = New System.Drawing.Point(1006, 125)
- Me.btnOK.Margin = New System.Windows.Forms.Padding(15, 5, 4, 5)
+ Me.btnOK.Location = New System.Drawing.Point(671, 81)
+ Me.btnOK.Margin = New System.Windows.Forms.Padding(10, 3, 3, 3)
Me.btnOK.Name = "btnOK"
- Me.btnOK.Padding = New System.Windows.Forms.Padding(30, 0, 0, 0)
- Me.btnOK.Size = New System.Drawing.Size(224, 82)
+ Me.btnOK.Padding = New System.Windows.Forms.Padding(20, 0, 0, 0)
+ Me.btnOK.Size = New System.Drawing.Size(149, 53)
Me.btnOK.TabIndex = 17
Me.btnOK.Text = "OK" & Global.Microsoft.VisualBasic.ChrW(10) & "(Speichern)"
Me.btnOK.UseVisualStyleBackColor = True
@@ -3669,10 +3546,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label23.AutoSize = True
Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label23.Location = New System.Drawing.Point(630, 49)
- Me.Label23.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label23.Location = New System.Drawing.Point(420, 32)
Me.Label23.Name = "Label23"
- Me.Label23.Size = New System.Drawing.Size(63, 20)
+ Me.Label23.Size = New System.Drawing.Size(41, 13)
Me.Label23.TabIndex = 2
Me.Label23.Text = "Steuer:"
'
@@ -3681,6 +3557,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSteuersatz._DateTimeOnly = False
Me.txtSteuersatz._numbersOnly = False
Me.txtSteuersatz._numbersOnlyKommastellen = ""
+ Me.txtSteuersatz._numbersOnlyTrennzeichen = True
Me.txtSteuersatz._Prozent = True
Me.txtSteuersatz._ShortDateNew = False
Me.txtSteuersatz._ShortDateOnly = False
@@ -3690,15 +3567,14 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSteuersatz._Waehrung = False
Me.txtSteuersatz._WaehrungZeichen = True
Me.txtSteuersatz.ForeColor = System.Drawing.Color.Black
- Me.txtSteuersatz.Location = New System.Drawing.Point(904, 46)
- Me.txtSteuersatz.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtSteuersatz.Location = New System.Drawing.Point(603, 30)
Me.txtSteuersatz.MaxLineLength = -1
Me.txtSteuersatz.MaxLines_Warning = ""
Me.txtSteuersatz.MaxLines_Warning_Label = Nothing
Me.txtSteuersatz.Multiline = True
Me.txtSteuersatz.Name = "txtSteuersatz"
Me.txtSteuersatz.ReadOnly = True
- Me.txtSteuersatz.Size = New System.Drawing.Size(90, 30)
+ Me.txtSteuersatz.Size = New System.Drawing.Size(61, 21)
Me.txtSteuersatz.TabIndex = 4
Me.txtSteuersatz.Text = "0,00 %"
Me.txtSteuersatz.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
@@ -3708,6 +3584,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSteuerFreierBetrag._DateTimeOnly = False
Me.txtSteuerFreierBetrag._numbersOnly = False
Me.txtSteuerFreierBetrag._numbersOnlyKommastellen = ""
+ Me.txtSteuerFreierBetrag._numbersOnlyTrennzeichen = True
Me.txtSteuerFreierBetrag._Prozent = False
Me.txtSteuerFreierBetrag._ShortDateNew = False
Me.txtSteuerFreierBetrag._ShortDateOnly = False
@@ -3717,25 +3594,23 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSteuerFreierBetrag._Waehrung = True
Me.txtSteuerFreierBetrag._WaehrungZeichen = False
Me.txtSteuerFreierBetrag.ForeColor = System.Drawing.Color.Black
- Me.txtSteuerFreierBetrag.Location = New System.Drawing.Point(810, 140)
- Me.txtSteuerFreierBetrag.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtSteuerFreierBetrag.Location = New System.Drawing.Point(540, 91)
Me.txtSteuerFreierBetrag.MaxLength = 35
Me.txtSteuerFreierBetrag.MaxLineLength = -1
Me.txtSteuerFreierBetrag.MaxLines_Warning = ""
Me.txtSteuerFreierBetrag.MaxLines_Warning_Label = Nothing
Me.txtSteuerFreierBetrag.Name = "txtSteuerFreierBetrag"
Me.txtSteuerFreierBetrag.ReadOnly = True
- Me.txtSteuerFreierBetrag.Size = New System.Drawing.Size(145, 26)
+ Me.txtSteuerFreierBetrag.Size = New System.Drawing.Size(98, 20)
Me.txtSteuerFreierBetrag.TabIndex = 10
Me.txtSteuerFreierBetrag.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'Label37
'
Me.Label37.AutoSize = True
- Me.Label37.Location = New System.Drawing.Point(628, 145)
- Me.Label37.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label37.Location = New System.Drawing.Point(419, 94)
Me.Label37.Name = "Label37"
- Me.Label37.Size = New System.Drawing.Size(149, 20)
+ Me.Label37.Size = New System.Drawing.Size(98, 13)
Me.Label37.TabIndex = 9
Me.Label37.Text = "Steuerfreier Betrag:"
Me.Label37.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3743,10 +3618,9 @@ Partial Class usrCntlFaktAbrechnung
'lblEUR_3
'
Me.lblEUR_3.AutoSize = True
- Me.lblEUR_3.Location = New System.Drawing.Point(958, 145)
- Me.lblEUR_3.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.lblEUR_3.Location = New System.Drawing.Point(639, 94)
Me.lblEUR_3.Name = "lblEUR_3"
- Me.lblEUR_3.Size = New System.Drawing.Size(44, 20)
+ Me.lblEUR_3.Size = New System.Drawing.Size(30, 13)
Me.lblEUR_3.TabIndex = 7
Me.lblEUR_3.Text = "EUR"
Me.lblEUR_3.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3756,6 +3630,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtGesamtsumme._DateTimeOnly = False
Me.txtGesamtsumme._numbersOnly = False
Me.txtGesamtsumme._numbersOnlyKommastellen = ""
+ Me.txtGesamtsumme._numbersOnlyTrennzeichen = True
Me.txtGesamtsumme._Prozent = False
Me.txtGesamtsumme._ShortDateNew = False
Me.txtGesamtsumme._ShortDateOnly = False
@@ -3765,15 +3640,14 @@ Partial Class usrCntlFaktAbrechnung
Me.txtGesamtsumme._Waehrung = True
Me.txtGesamtsumme._WaehrungZeichen = False
Me.txtGesamtsumme.ForeColor = System.Drawing.Color.Black
- Me.txtGesamtsumme.Location = New System.Drawing.Point(810, 175)
- Me.txtGesamtsumme.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtGesamtsumme.Location = New System.Drawing.Point(540, 114)
Me.txtGesamtsumme.MaxLength = 35
Me.txtGesamtsumme.MaxLineLength = -1
Me.txtGesamtsumme.MaxLines_Warning = ""
Me.txtGesamtsumme.MaxLines_Warning_Label = Nothing
Me.txtGesamtsumme.Name = "txtGesamtsumme"
Me.txtGesamtsumme.ReadOnly = True
- Me.txtGesamtsumme.Size = New System.Drawing.Size(145, 26)
+ Me.txtGesamtsumme.Size = New System.Drawing.Size(98, 20)
Me.txtGesamtsumme.TabIndex = 12
Me.txtGesamtsumme.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
@@ -3782,6 +3656,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSteuerBetrag._DateTimeOnly = False
Me.txtSteuerBetrag._numbersOnly = False
Me.txtSteuerBetrag._numbersOnlyKommastellen = ""
+ Me.txtSteuerBetrag._numbersOnlyTrennzeichen = True
Me.txtSteuerBetrag._Prozent = False
Me.txtSteuerBetrag._ShortDateNew = False
Me.txtSteuerBetrag._ShortDateOnly = False
@@ -3791,15 +3666,14 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSteuerBetrag._Waehrung = True
Me.txtSteuerBetrag._WaehrungZeichen = False
Me.txtSteuerBetrag.ForeColor = System.Drawing.Color.Black
- Me.txtSteuerBetrag.Location = New System.Drawing.Point(810, 114)
- Me.txtSteuerBetrag.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtSteuerBetrag.Location = New System.Drawing.Point(540, 74)
Me.txtSteuerBetrag.MaxLength = 35
Me.txtSteuerBetrag.MaxLineLength = -1
Me.txtSteuerBetrag.MaxLines_Warning = ""
Me.txtSteuerBetrag.MaxLines_Warning_Label = Nothing
Me.txtSteuerBetrag.Name = "txtSteuerBetrag"
Me.txtSteuerBetrag.ReadOnly = True
- Me.txtSteuerBetrag.Size = New System.Drawing.Size(145, 26)
+ Me.txtSteuerBetrag.Size = New System.Drawing.Size(98, 20)
Me.txtSteuerBetrag.TabIndex = 8
Me.txtSteuerBetrag.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
@@ -3808,6 +3682,7 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSteuerpflichtigerBetrag._DateTimeOnly = False
Me.txtSteuerpflichtigerBetrag._numbersOnly = False
Me.txtSteuerpflichtigerBetrag._numbersOnlyKommastellen = ""
+ Me.txtSteuerpflichtigerBetrag._numbersOnlyTrennzeichen = True
Me.txtSteuerpflichtigerBetrag._Prozent = False
Me.txtSteuerpflichtigerBetrag._ShortDateNew = False
Me.txtSteuerpflichtigerBetrag._ShortDateOnly = False
@@ -3817,25 +3692,23 @@ Partial Class usrCntlFaktAbrechnung
Me.txtSteuerpflichtigerBetrag._Waehrung = True
Me.txtSteuerpflichtigerBetrag._WaehrungZeichen = False
Me.txtSteuerpflichtigerBetrag.ForeColor = System.Drawing.Color.Black
- Me.txtSteuerpflichtigerBetrag.Location = New System.Drawing.Point(810, 86)
- Me.txtSteuerpflichtigerBetrag.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtSteuerpflichtigerBetrag.Location = New System.Drawing.Point(540, 56)
Me.txtSteuerpflichtigerBetrag.MaxLength = 35
Me.txtSteuerpflichtigerBetrag.MaxLineLength = -1
Me.txtSteuerpflichtigerBetrag.MaxLines_Warning = ""
Me.txtSteuerpflichtigerBetrag.MaxLines_Warning_Label = Nothing
Me.txtSteuerpflichtigerBetrag.Name = "txtSteuerpflichtigerBetrag"
Me.txtSteuerpflichtigerBetrag.ReadOnly = True
- Me.txtSteuerpflichtigerBetrag.Size = New System.Drawing.Size(145, 26)
+ Me.txtSteuerpflichtigerBetrag.Size = New System.Drawing.Size(98, 20)
Me.txtSteuerpflichtigerBetrag.TabIndex = 6
Me.txtSteuerpflichtigerBetrag.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'Label33
'
Me.Label33.AutoSize = True
- Me.Label33.Location = New System.Drawing.Point(628, 91)
- Me.Label33.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label33.Location = New System.Drawing.Point(419, 59)
Me.Label33.Name = "Label33"
- Me.Label33.Size = New System.Drawing.Size(181, 20)
+ Me.Label33.Size = New System.Drawing.Size(120, 13)
Me.Label33.TabIndex = 5
Me.Label33.Text = "Steuerpflichtiger Betrag:"
Me.Label33.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3844,10 +3717,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label35.AutoSize = True
Me.Label35.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label35.Location = New System.Drawing.Point(628, 180)
- Me.Label35.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label35.Location = New System.Drawing.Point(419, 117)
Me.Label35.Name = "Label35"
- Me.Label35.Size = New System.Drawing.Size(140, 20)
+ Me.Label35.Size = New System.Drawing.Size(91, 13)
Me.Label35.TabIndex = 11
Me.Label35.Text = "Gesamtsumme:"
Me.Label35.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3855,23 +3727,21 @@ Partial Class usrCntlFaktAbrechnung
'Label28
'
Me.Label28.AutoSize = True
- Me.Label28.Location = New System.Drawing.Point(9, 3)
- Me.Label28.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label28.Location = New System.Drawing.Point(6, 2)
Me.Label28.Name = "Label28"
- Me.Label28.Size = New System.Drawing.Size(236, 20)
+ Me.Label28.Size = New System.Drawing.Size(157, 13)
Me.Label28.TabIndex = 0
Me.Label28.Text = "Besonderheiten für Verrechung:"
Me.Label28.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'txtBesonderheiten
'
- Me.txtBesonderheiten.Location = New System.Drawing.Point(14, 26)
- Me.txtBesonderheiten.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.txtBesonderheiten.Location = New System.Drawing.Point(9, 17)
Me.txtBesonderheiten.MaxLineLength = -1
Me.txtBesonderheiten.MaxLines_Warning = ""
Me.txtBesonderheiten.MaxLines_Warning_Label = Nothing
Me.txtBesonderheiten.Name = "txtBesonderheiten"
- Me.txtBesonderheiten.Size = New System.Drawing.Size(606, 199)
+ Me.txtBesonderheiten.Size = New System.Drawing.Size(405, 131)
Me.txtBesonderheiten.TabIndex = 1
Me.txtBesonderheiten.Text = ""
'
@@ -3881,10 +3751,9 @@ Partial Class usrCntlFaktAbrechnung
Me.pnlDocs.Controls.Add(Me.Label51)
Me.pnlDocs.Controls.Add(Me.PictureBox2)
Me.pnlDocs.Controls.Add(Me.Label50)
- Me.pnlDocs.Location = New System.Drawing.Point(382, -2)
- Me.pnlDocs.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.pnlDocs.Location = New System.Drawing.Point(255, -1)
Me.pnlDocs.Name = "pnlDocs"
- Me.pnlDocs.Size = New System.Drawing.Size(194, 26)
+ Me.pnlDocs.Size = New System.Drawing.Size(129, 17)
Me.pnlDocs.TabIndex = 27
Me.pnlDocs.Visible = False
'
@@ -3892,10 +3761,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.PictureBox1.BackgroundImage = Global.SDL.My.Resources.Resources.ok
Me.PictureBox1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
- Me.PictureBox1.Location = New System.Drawing.Point(28, 2)
- Me.PictureBox1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.PictureBox1.Location = New System.Drawing.Point(19, 1)
Me.PictureBox1.Name = "PictureBox1"
- Me.PictureBox1.Size = New System.Drawing.Size(24, 25)
+ Me.PictureBox1.Size = New System.Drawing.Size(16, 16)
Me.PictureBox1.TabIndex = 23
Me.PictureBox1.TabStop = False
'
@@ -3903,10 +3771,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label51.AutoSize = True
Me.Label51.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!)
- Me.Label51.Location = New System.Drawing.Point(135, 3)
- Me.Label51.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label51.Location = New System.Drawing.Point(90, 2)
Me.Label51.Name = "Label51"
- Me.Label51.Size = New System.Drawing.Size(36, 17)
+ Me.Label51.Size = New System.Drawing.Size(29, 13)
Me.Label51.TabIndex = 26
Me.Label51.Text = "VBD"
Me.Label51.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3915,10 +3782,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.PictureBox2.BackgroundImage = Global.SDL.My.Resources.Resources.ok
Me.PictureBox2.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
- Me.PictureBox2.Location = New System.Drawing.Point(111, 2)
- Me.PictureBox2.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.PictureBox2.Location = New System.Drawing.Point(74, 1)
Me.PictureBox2.Name = "PictureBox2"
- Me.PictureBox2.Size = New System.Drawing.Size(24, 25)
+ Me.PictureBox2.Size = New System.Drawing.Size(16, 16)
Me.PictureBox2.TabIndex = 25
Me.PictureBox2.TabStop = False
'
@@ -3926,10 +3792,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.Label50.AutoSize = True
Me.Label50.Font = New System.Drawing.Font("Microsoft Sans Serif", 7.0!)
- Me.Label50.Location = New System.Drawing.Point(52, 3)
- Me.Label50.Margin = New System.Windows.Forms.Padding(4, 0, 4, 0)
+ Me.Label50.Location = New System.Drawing.Point(35, 2)
Me.Label50.Name = "Label50"
- Me.Label50.Size = New System.Drawing.Size(35, 17)
+ Me.Label50.Size = New System.Drawing.Size(26, 13)
Me.Label50.TabIndex = 24
Me.Label50.Text = "STB"
Me.Label50.TextAlign = System.Drawing.ContentAlignment.TopRight
@@ -3938,10 +3803,9 @@ Partial Class usrCntlFaktAbrechnung
'
Me.cbxAdmin.AutoSize = True
Me.cbxAdmin.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
- Me.cbxAdmin.Location = New System.Drawing.Point(636, 0)
- Me.cbxAdmin.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
+ Me.cbxAdmin.Location = New System.Drawing.Point(424, 0)
Me.cbxAdmin.Name = "cbxAdmin"
- Me.cbxAdmin.Size = New System.Drawing.Size(162, 44)
+ Me.cbxAdmin.Size = New System.Drawing.Size(110, 30)
Me.cbxAdmin.TabIndex = 22
Me.cbxAdmin.Text = "Admin: Änderung " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "nach Druck erl."
Me.cbxAdmin.UseVisualStyleBackColor = True
@@ -3956,12 +3820,12 @@ Partial Class usrCntlFaktAbrechnung
Me.CntxtAbfArt.ImageScalingSize = New System.Drawing.Size(24, 24)
Me.CntxtAbfArt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.SdfToolStripMenuItem})
Me.CntxtAbfArt.Name = "CntxtAbfArt"
- Me.CntxtAbfArt.Size = New System.Drawing.Size(110, 36)
+ Me.CntxtAbfArt.Size = New System.Drawing.Size(91, 26)
'
'SdfToolStripMenuItem
'
Me.SdfToolStripMenuItem.Name = "SdfToolStripMenuItem"
- Me.SdfToolStripMenuItem.Size = New System.Drawing.Size(109, 32)
+ Me.SdfToolStripMenuItem.Size = New System.Drawing.Size(90, 22)
Me.SdfToolStripMenuItem.Text = "sdf"
'
'ContextMenuStrip1
@@ -3969,44 +3833,43 @@ Partial Class usrCntlFaktAbrechnung
Me.ContextMenuStrip1.ImageScalingSize = New System.Drawing.Size(24, 24)
Me.ContextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AbsenderToolStripMenuItem, Me.EmpfängerToolStripMenuItem, Me.AuftraggeberToolStripMenuItem, Me.AvisiererToolStripMenuItem})
Me.ContextMenuStrip1.Name = "ContextMenuStrip1"
- Me.ContextMenuStrip1.Size = New System.Drawing.Size(206, 132)
+ Me.ContextMenuStrip1.Size = New System.Drawing.Size(154, 92)
'
'AbsenderToolStripMenuItem
'
Me.AbsenderToolStripMenuItem.Name = "AbsenderToolStripMenuItem"
- Me.AbsenderToolStripMenuItem.Size = New System.Drawing.Size(205, 32)
+ Me.AbsenderToolStripMenuItem.Size = New System.Drawing.Size(153, 22)
Me.AbsenderToolStripMenuItem.Text = "1 Absender"
'
'EmpfängerToolStripMenuItem
'
Me.EmpfängerToolStripMenuItem.Name = "EmpfängerToolStripMenuItem"
- Me.EmpfängerToolStripMenuItem.Size = New System.Drawing.Size(205, 32)
+ Me.EmpfängerToolStripMenuItem.Size = New System.Drawing.Size(153, 22)
Me.EmpfängerToolStripMenuItem.Text = "2 Empfänger"
'
'AuftraggeberToolStripMenuItem
'
Me.AuftraggeberToolStripMenuItem.Name = "AuftraggeberToolStripMenuItem"
- Me.AuftraggeberToolStripMenuItem.Size = New System.Drawing.Size(205, 32)
+ Me.AuftraggeberToolStripMenuItem.Size = New System.Drawing.Size(153, 22)
Me.AuftraggeberToolStripMenuItem.Text = "3 Auftraggeber"
'
'AvisiererToolStripMenuItem
'
Me.AvisiererToolStripMenuItem.Name = "AvisiererToolStripMenuItem"
- Me.AvisiererToolStripMenuItem.Size = New System.Drawing.Size(205, 32)
+ Me.AvisiererToolStripMenuItem.Size = New System.Drawing.Size(153, 22)
Me.AvisiererToolStripMenuItem.Text = "4 Avisierer"
'
'usrCntlFaktAbrechnung
'
- Me.AutoScaleDimensions = New System.Drawing.SizeF(9.0!, 20.0!)
+ Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.Color.White
Me.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.Controls.Add(Me.Panel1)
Me.Controls.Add(Me.pnl)
Me.Controls.Add(Me.pnlTop)
- Me.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5)
Me.Name = "usrCntlFaktAbrechnung"
- Me.Size = New System.Drawing.Size(1245, 2138)
+ Me.Size = New System.Drawing.Size(830, 1390)
Me.pnlTop.ResumeLayout(False)
Me.pnlTop.PerformLayout()
Me.Panel3.ResumeLayout(False)
diff --git a/SDL/SDL.vbproj b/SDL/SDL.vbproj
index 2a991372..ae6bffba 100644
--- a/SDL/SDL.vbproj
+++ b/SDL/SDL.vbproj
@@ -651,6 +651,7 @@
Component
+
frmMDM_USTVAntrag.vb
@@ -723,6 +724,12 @@
Form
+
+ ustCntlUSTV_AntragPosition.vb
+
+
+ UserControl
+
True
True
@@ -2869,6 +2876,9 @@
frmNacherfassungEndEmpfaenger.vb
+
+ ustCntlUSTV_AntragPosition.vb
+
usrCntlATLAS_AES.vb
diff --git a/SDL/USTV/cUSTVStatus.vb b/SDL/USTV/cUSTVStatus.vb
new file mode 100644
index 00000000..244092d4
--- /dev/null
+++ b/SDL/USTV/cUSTVStatus.vb
@@ -0,0 +1,12 @@
+Public Class cUSTVStatus
+
+ Public Shared STAT_INBEARBEITUNG As Integer = 0
+ Public Shared STAT_UNVOLLSTAENDIG As Integer = 1
+ Public Shared STAT_EINGEREICHT As Integer = 2
+ Public Shared STAT_NACHFORDERUNG As Integer = 3
+ Public Shared STAT_ERSTATTET As Integer = 4
+ Public Shared STAT_TEILERSTATTET As Integer = 5
+ Public Shared STAT_ABGELEHNT As Integer = 6
+ Public Shared STAT_STORNO As Integer = 9
+
+End Class
diff --git a/SDL/USTV/frmMDM_USTVAntrag.Designer.vb b/SDL/USTV/frmMDM_USTVAntrag.Designer.vb
index f02091c6..934f8ce7 100644
--- a/SDL/USTV/frmMDM_USTVAntrag.Designer.vb
+++ b/SDL/USTV/frmMDM_USTVAntrag.Designer.vb
@@ -26,72 +26,124 @@ Partial Class frmMDM_USTVAntrag
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMDM_USTVAntrag))
Me.Panel3 = New System.Windows.Forms.Panel()
- Me.cbxArchivierteEintracheNochmalsEinarbetien = New System.Windows.Forms.CheckBox()
- Me.lblPLOSE_EintrageVerarbetiet = New System.Windows.Forms.Label()
Me.Button14 = New System.Windows.Forms.Button()
+ Me.cbxArchivierteEintracheNochmalsEinarbetien = New System.Windows.Forms.CheckBox()
+ Me.Button1 = New System.Windows.Forms.Button()
+ Me.lblPLOSE_EintrageVerarbetiet = New System.Windows.Forms.Label()
Me.Panel1 = New System.Windows.Forms.Panel()
+ Me.Label6 = New System.Windows.Forms.Label()
+ Me.Panel5 = New System.Windows.Forms.Panel()
+ Me.Label5 = New System.Windows.Forms.Label()
+ Me.cboStatus = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.txtBis = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.txtVon = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.rtbStatusText = New System.Windows.Forms.RichTextBox()
+ Me.lblLand = New System.Windows.Forms.Label()
+ Me.Label2 = New System.Windows.Forms.Label()
+ Me.Label4 = New System.Windows.Forms.Label()
+ Me.Label3 = New System.Windows.Forms.Label()
+ Me.lblZeitraum = New System.Windows.Forms.Label()
Me.lblFirma = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label()
Me.pnlFilter = New System.Windows.Forms.Panel()
Me.dgvUSTVPositionen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
- Me.lblZeitraum = New System.Windows.Forms.Label()
- Me.Label3 = New System.Windows.Forms.Label()
- Me.Label4 = New System.Windows.Forms.Label()
- Me.Label2 = New System.Windows.Forms.Label()
- Me.lblLand = New System.Windows.Forms.Label()
+ Me.pnl = New System.Windows.Forms.Panel()
+ Me.Panel2 = New System.Windows.Forms.Panel()
+ Me.Panel4 = New System.Windows.Forms.Panel()
+ Me.Button3 = New System.Windows.Forms.Button()
+ Me.Button2 = New System.Windows.Forms.Button()
+ Me.btnBearb = New System.Windows.Forms.Button()
+ Me.FlowLayoutPanel = New System.Windows.Forms.FlowLayoutPanel()
+ Me.btnEingereicht = New System.Windows.Forms.Button()
+ Me.btnUnvollst = New System.Windows.Forms.Button()
+ Me.btnNachforderung = New System.Windows.Forms.Button()
+ Me.btnErstettel = New System.Windows.Forms.Button()
+ Me.btnAbgelehnt = New System.Windows.Forms.Button()
+ Me.btnStorno = New System.Windows.Forms.Button()
+ Me.btnTeilerstattung = New System.Windows.Forms.Button()
+ Me.UstCntlUSTV_AntragPosition1 = New SDL.ustCntlUSTV_AntragPosition()
Me.Panel3.SuspendLayout()
Me.Panel1.SuspendLayout()
+ Me.Panel5.SuspendLayout()
Me.pnlFilter.SuspendLayout()
CType(Me.dgvUSTVPositionen, System.ComponentModel.ISupportInitialize).BeginInit()
+ Me.pnl.SuspendLayout()
+ Me.Panel2.SuspendLayout()
+ Me.Panel4.SuspendLayout()
+ Me.FlowLayoutPanel.SuspendLayout()
Me.SuspendLayout()
'
'Panel3
'
- Me.Panel3.Controls.Add(Me.cbxArchivierteEintracheNochmalsEinarbetien)
- Me.Panel3.Controls.Add(Me.lblPLOSE_EintrageVerarbetiet)
+ Me.Panel3.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
+ Me.Panel3.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.Panel3.Controls.Add(Me.Button14)
+ Me.Panel3.Controls.Add(Me.cbxArchivierteEintracheNochmalsEinarbetien)
+ Me.Panel3.Controls.Add(Me.Button1)
+ Me.Panel3.Controls.Add(Me.lblPLOSE_EintrageVerarbetiet)
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Bottom
- Me.Panel3.Location = New System.Drawing.Point(0, 784)
+ Me.Panel3.Location = New System.Drawing.Point(0, 713)
Me.Panel3.Name = "Panel3"
- Me.Panel3.Size = New System.Drawing.Size(1464, 76)
- Me.Panel3.TabIndex = 2
- '
- 'cbxArchivierteEintracheNochmalsEinarbetien
- '
- Me.cbxArchivierteEintracheNochmalsEinarbetien.AutoSize = True
- Me.cbxArchivierteEintracheNochmalsEinarbetien.Location = New System.Drawing.Point(186, 6)
- Me.cbxArchivierteEintracheNochmalsEinarbetien.Name = "cbxArchivierteEintracheNochmalsEinarbetien"
- Me.cbxArchivierteEintracheNochmalsEinarbetien.Size = New System.Drawing.Size(227, 17)
- Me.cbxArchivierteEintracheNochmalsEinarbetien.TabIndex = 5
- Me.cbxArchivierteEintracheNochmalsEinarbetien.Text = "Archivierte Einträche nochmals einarbeiten"
- Me.cbxArchivierteEintracheNochmalsEinarbetien.UseVisualStyleBackColor = True
- '
- 'lblPLOSE_EintrageVerarbetiet
- '
- Me.lblPLOSE_EintrageVerarbetiet.Location = New System.Drawing.Point(12, 48)
- Me.lblPLOSE_EintrageVerarbetiet.Name = "lblPLOSE_EintrageVerarbetiet"
- Me.lblPLOSE_EintrageVerarbetiet.Size = New System.Drawing.Size(168, 19)
- Me.lblPLOSE_EintrageVerarbetiet.TabIndex = 4
- Me.lblPLOSE_EintrageVerarbetiet.Text = "alle Einträge verarbeitet"
- Me.lblPLOSE_EintrageVerarbetiet.TextAlign = System.Drawing.ContentAlignment.TopRight
+ Me.Panel3.Size = New System.Drawing.Size(1454, 100)
+ Me.Panel3.TabIndex = 3
'
'Button14
'
Me.Button14.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.Button14.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!)
Me.Button14.ForeColor = System.Drawing.Color.Black
Me.Button14.Image = Global.SDL.My.Resources.Resources.plus
Me.Button14.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
- Me.Button14.Location = New System.Drawing.Point(12, 6)
+ Me.Button14.Location = New System.Drawing.Point(12, 29)
Me.Button14.Name = "Button14"
- Me.Button14.Size = New System.Drawing.Size(168, 39)
- Me.Button14.TabIndex = 3
+ Me.Button14.Size = New System.Drawing.Size(234, 38)
+ Me.Button14.TabIndex = 1
Me.Button14.Text = "PLOSE übernehmen"
Me.Button14.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button14.UseVisualStyleBackColor = True
'
+ 'cbxArchivierteEintracheNochmalsEinarbetien
+ '
+ Me.cbxArchivierteEintracheNochmalsEinarbetien.AutoSize = True
+ Me.cbxArchivierteEintracheNochmalsEinarbetien.ForeColor = System.Drawing.Color.Black
+ Me.cbxArchivierteEintracheNochmalsEinarbetien.Location = New System.Drawing.Point(12, 8)
+ Me.cbxArchivierteEintracheNochmalsEinarbetien.Name = "cbxArchivierteEintracheNochmalsEinarbetien"
+ Me.cbxArchivierteEintracheNochmalsEinarbetien.Size = New System.Drawing.Size(227, 17)
+ Me.cbxArchivierteEintracheNochmalsEinarbetien.TabIndex = 0
+ Me.cbxArchivierteEintracheNochmalsEinarbetien.Text = "Archivierte Einträche nochmals einarbeiten"
+ Me.cbxArchivierteEintracheNochmalsEinarbetien.UseVisualStyleBackColor = True
+ '
+ 'Button1
+ '
+ Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+ Me.Button1.ForeColor = System.Drawing.Color.Black
+ Me.Button1.Location = New System.Drawing.Point(1252, 13)
+ Me.Button1.Name = "Button1"
+ Me.Button1.Size = New System.Drawing.Size(189, 70)
+ Me.Button1.TabIndex = 2
+ Me.Button1.Text = "OK"
+ Me.Button1.UseVisualStyleBackColor = True
+ '
+ 'lblPLOSE_EintrageVerarbetiet
+ '
+ Me.lblPLOSE_EintrageVerarbetiet.ForeColor = System.Drawing.Color.Black
+ Me.lblPLOSE_EintrageVerarbetiet.Location = New System.Drawing.Point(78, 69)
+ Me.lblPLOSE_EintrageVerarbetiet.Name = "lblPLOSE_EintrageVerarbetiet"
+ Me.lblPLOSE_EintrageVerarbetiet.Size = New System.Drawing.Size(168, 19)
+ Me.lblPLOSE_EintrageVerarbetiet.TabIndex = 3
+ Me.lblPLOSE_EintrageVerarbetiet.Text = "alle Einträge verarbeitet"
+ Me.lblPLOSE_EintrageVerarbetiet.TextAlign = System.Drawing.ContentAlignment.TopRight
+ '
'Panel1
'
- Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
+ Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Panel1.Controls.Add(Me.Label6)
+ Me.Panel1.Controls.Add(Me.Panel5)
+ Me.Panel1.Controls.Add(Me.txtBis)
+ Me.Panel1.Controls.Add(Me.txtVon)
+ Me.Panel1.Controls.Add(Me.rtbStatusText)
Me.Panel1.Controls.Add(Me.lblLand)
Me.Panel1.Controls.Add(Me.Label2)
Me.Panel1.Controls.Add(Me.Label4)
@@ -102,30 +154,205 @@ Partial Class frmMDM_USTVAntrag
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel1.Location = New System.Drawing.Point(0, 0)
Me.Panel1.Name = "Panel1"
- Me.Panel1.Size = New System.Drawing.Size(1464, 75)
- Me.Panel1.TabIndex = 3
+ Me.Panel1.Size = New System.Drawing.Size(1454, 155)
+ Me.Panel1.TabIndex = 0
+ '
+ 'Label6
+ '
+ Me.Label6.AutoSize = True
+ Me.Label6.BackColor = System.Drawing.Color.Transparent
+ Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold)
+ Me.Label6.ForeColor = System.Drawing.Color.White
+ Me.Label6.Location = New System.Drawing.Point(519, 25)
+ Me.Label6.Name = "Label6"
+ Me.Label6.Size = New System.Drawing.Size(86, 17)
+ Me.Label6.TabIndex = 1
+ Me.Label6.Text = "Statusinfo:"
+ '
+ 'Panel5
+ '
+ Me.Panel5.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.Panel5.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
+ Me.Panel5.Controls.Add(Me.FlowLayoutPanel)
+ Me.Panel5.Controls.Add(Me.Label5)
+ Me.Panel5.Controls.Add(Me.cboStatus)
+ Me.Panel5.Location = New System.Drawing.Point(972, 0)
+ Me.Panel5.Name = "Panel5"
+ Me.Panel5.Size = New System.Drawing.Size(481, 105)
+ Me.Panel5.TabIndex = 9
+ '
+ 'Label5
+ '
+ Me.Label5.AutoSize = True
+ Me.Label5.BackColor = System.Drawing.Color.Transparent
+ Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label5.ForeColor = System.Drawing.Color.Black
+ Me.Label5.Location = New System.Drawing.Point(3, 19)
+ Me.Label5.Name = "Label5"
+ Me.Label5.Size = New System.Drawing.Size(67, 20)
+ Me.Label5.TabIndex = 0
+ Me.Label5.Text = "Status:"
+ '
+ 'cboStatus
+ '
+ Me.cboStatus._allowedValuesFreiText = Nothing
+ Me.cboStatus._allowFreiText = False
+ Me.cboStatus._value = ""
+ Me.cboStatus.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
+ Me.cboStatus.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
+ Me.cboStatus.FormattingEnabled = True
+ Me.cboStatus.Location = New System.Drawing.Point(76, 16)
+ Me.cboStatus.Name = "cboStatus"
+ Me.cboStatus.Size = New System.Drawing.Size(394, 28)
+ Me.cboStatus.TabIndex = 1
+ '
+ 'txtBis
+ '
+ Me.txtBis._DateTimeOnly = False
+ Me.txtBis._numbersOnly = False
+ Me.txtBis._numbersOnlyKommastellen = ""
+ Me.txtBis._numbersOnlyTrennzeichen = True
+ Me.txtBis._Prozent = False
+ Me.txtBis._ShortDateNew = True
+ Me.txtBis._ShortDateOnly = False
+ Me.txtBis._TimeOnly = False
+ Me.txtBis._TimeOnly_Seconds = False
+ Me.txtBis._value = ""
+ Me.txtBis._Waehrung = False
+ Me.txtBis._WaehrungZeichen = True
+ Me.txtBis.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+ Me.txtBis.ForeColor = System.Drawing.Color.Black
+ Me.txtBis.Location = New System.Drawing.Point(220, 67)
+ Me.txtBis.MaxLength = 10
+ Me.txtBis.MaxLineLength = -1
+ Me.txtBis.MaxLines_Warning = ""
+ Me.txtBis.MaxLines_Warning_Label = Nothing
+ Me.txtBis.Name = "txtBis"
+ Me.txtBis.Size = New System.Drawing.Size(100, 23)
+ Me.txtBis.TabIndex = 8
+ '
+ 'txtVon
+ '
+ Me.txtVon._DateTimeOnly = False
+ Me.txtVon._numbersOnly = False
+ Me.txtVon._numbersOnlyKommastellen = ""
+ Me.txtVon._numbersOnlyTrennzeichen = True
+ Me.txtVon._Prozent = False
+ Me.txtVon._ShortDateNew = True
+ Me.txtVon._ShortDateOnly = False
+ Me.txtVon._TimeOnly = False
+ Me.txtVon._TimeOnly_Seconds = False
+ Me.txtVon._value = ""
+ Me.txtVon._Waehrung = False
+ Me.txtVon._WaehrungZeichen = True
+ Me.txtVon.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!)
+ Me.txtVon.ForeColor = System.Drawing.Color.Black
+ Me.txtVon.Location = New System.Drawing.Point(94, 67)
+ Me.txtVon.MaxLength = 10
+ Me.txtVon.MaxLineLength = -1
+ Me.txtVon.MaxLines_Warning = ""
+ Me.txtVon.MaxLines_Warning_Label = Nothing
+ Me.txtVon.Name = "txtVon"
+ Me.txtVon.Size = New System.Drawing.Size(100, 23)
+ Me.txtVon.TabIndex = 6
+ '
+ 'rtbStatusText
+ '
+ Me.rtbStatusText.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.rtbStatusText.Location = New System.Drawing.Point(626, 24)
+ Me.rtbStatusText.Name = "rtbStatusText"
+ Me.rtbStatusText.Size = New System.Drawing.Size(340, 61)
+ Me.rtbStatusText.TabIndex = 4
+ Me.rtbStatusText.Text = ""
+ '
+ 'lblLand
+ '
+ Me.lblLand.AutoSize = True
+ Me.lblLand.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.lblLand.Cursor = System.Windows.Forms.Cursors.Hand
+ Me.lblLand.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.lblLand.ForeColor = System.Drawing.Color.White
+ Me.lblLand.Location = New System.Drawing.Point(91, 108)
+ Me.lblLand.Name = "lblLand"
+ Me.lblLand.Size = New System.Drawing.Size(28, 17)
+ Me.lblLand.TabIndex = 11
+ Me.lblLand.Text = "AT"
+ '
+ 'Label2
+ '
+ Me.Label2.AutoSize = True
+ Me.Label2.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Label2.Cursor = System.Windows.Forms.Cursors.Hand
+ Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label2.ForeColor = System.Drawing.Color.White
+ Me.Label2.Location = New System.Drawing.Point(4, 108)
+ Me.Label2.Name = "Label2"
+ Me.Label2.Size = New System.Drawing.Size(44, 17)
+ Me.Label2.TabIndex = 10
+ Me.Label2.Text = "Land:"
+ '
+ 'Label4
+ '
+ Me.Label4.AutoSize = True
+ Me.Label4.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Label4.Cursor = System.Windows.Forms.Cursors.Hand
+ Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label4.ForeColor = System.Drawing.Color.White
+ Me.Label4.Location = New System.Drawing.Point(3, 47)
+ Me.Label4.Name = "Label4"
+ Me.Label4.Size = New System.Drawing.Size(47, 17)
+ Me.Label4.TabIndex = 2
+ Me.Label4.Text = "Firma:"
+ '
+ 'Label3
+ '
+ Me.Label3.AutoSize = True
+ Me.Label3.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Label3.Cursor = System.Windows.Forms.Cursors.Hand
+ Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label3.ForeColor = System.Drawing.Color.White
+ Me.Label3.Location = New System.Drawing.Point(3, 70)
+ Me.Label3.Name = "Label3"
+ Me.Label3.Size = New System.Drawing.Size(68, 17)
+ Me.Label3.TabIndex = 5
+ Me.Label3.Text = "Zeitraum:"
+ '
+ 'lblZeitraum
+ '
+ Me.lblZeitraum.AutoSize = True
+ Me.lblZeitraum.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.lblZeitraum.Cursor = System.Windows.Forms.Cursors.Hand
+ Me.lblZeitraum.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.lblZeitraum.ForeColor = System.Drawing.Color.White
+ Me.lblZeitraum.Location = New System.Drawing.Point(200, 69)
+ Me.lblZeitraum.Name = "lblZeitraum"
+ Me.lblZeitraum.Size = New System.Drawing.Size(14, 17)
+ Me.lblZeitraum.TabIndex = 7
+ Me.lblZeitraum.Text = "-"
'
'lblFirma
'
- Me.lblFirma.AutoSize = True
+ Me.lblFirma.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
Me.lblFirma.Cursor = System.Windows.Forms.Cursors.Hand
Me.lblFirma.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.lblFirma.Location = New System.Drawing.Point(257, 20)
+ Me.lblFirma.ForeColor = System.Drawing.Color.White
+ Me.lblFirma.Location = New System.Drawing.Point(91, 47)
Me.lblFirma.Name = "lblFirma"
- Me.lblFirma.Size = New System.Drawing.Size(161, 17)
- Me.lblFirma.TabIndex = 5
+ Me.lblFirma.Size = New System.Drawing.Size(388, 17)
+ Me.lblFirma.TabIndex = 3
Me.lblFirma.Text = "VERAG Spedition AG"
'
'Label1
'
Me.Label1.AutoSize = True
- Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Label1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label1.ForeColor = System.Drawing.Color.White
Me.Label1.Location = New System.Drawing.Point(3, 6)
Me.Label1.Name = "Label1"
- Me.Label1.Size = New System.Drawing.Size(56, 20)
+ Me.Label1.Size = New System.Drawing.Size(116, 20)
Me.Label1.TabIndex = 0
- Me.Label1.Text = "USTV"
+ Me.Label1.Text = "USTV-Antrag"
'
'pnlFilter
'
@@ -133,10 +360,10 @@ Partial Class frmMDM_USTVAntrag
Me.pnlFilter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.pnlFilter.Controls.Add(Me.dgvUSTVPositionen)
Me.pnlFilter.Dock = System.Windows.Forms.DockStyle.Fill
- Me.pnlFilter.Location = New System.Drawing.Point(0, 75)
+ Me.pnlFilter.Location = New System.Drawing.Point(0, 155)
Me.pnlFilter.Name = "pnlFilter"
- Me.pnlFilter.Size = New System.Drawing.Size(1464, 709)
- Me.pnlFilter.TabIndex = 6
+ Me.pnlFilter.Size = New System.Drawing.Size(1454, 289)
+ Me.pnlFilter.TabIndex = 1
'
'dgvUSTVPositionen
'
@@ -145,80 +372,226 @@ Partial Class frmMDM_USTVAntrag
Me.dgvUSTVPositionen.AllowUserToDeleteRows = False
DataGridViewCellStyle1.BackColor = System.Drawing.Color.FromArgb(CType(CType(240, Byte), Integer), CType(CType(245, Byte), Integer), CType(CType(255, Byte), Integer))
Me.dgvUSTVPositionen.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
+ Me.dgvUSTVPositionen.BackgroundColor = System.Drawing.Color.White
Me.dgvUSTVPositionen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvUSTVPositionen.Dock = System.Windows.Forms.DockStyle.Fill
Me.dgvUSTVPositionen.Location = New System.Drawing.Point(0, 0)
Me.dgvUSTVPositionen.MultiSelect = False
Me.dgvUSTVPositionen.Name = "dgvUSTVPositionen"
Me.dgvUSTVPositionen.ReadOnly = True
+ Me.dgvUSTVPositionen.RowHeadersVisible = False
+ Me.dgvUSTVPositionen.RowHeadersWidth = 62
Me.dgvUSTVPositionen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
- Me.dgvUSTVPositionen.Size = New System.Drawing.Size(1462, 707)
- Me.dgvUSTVPositionen.TabIndex = 4
+ Me.dgvUSTVPositionen.Size = New System.Drawing.Size(1452, 287)
+ Me.dgvUSTVPositionen.TabIndex = 0
'
- 'lblZeitraum
+ 'pnl
'
- Me.lblZeitraum.AutoSize = True
- Me.lblZeitraum.Cursor = System.Windows.Forms.Cursors.Hand
- Me.lblZeitraum.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.lblZeitraum.Location = New System.Drawing.Point(257, 43)
- Me.lblZeitraum.Name = "lblZeitraum"
- Me.lblZeitraum.Size = New System.Drawing.Size(188, 17)
- Me.lblZeitraum.TabIndex = 6
- Me.lblZeitraum.Text = "01.01.2000 - 31.12.2000"
+ Me.pnl.Controls.Add(Me.Panel2)
+ Me.pnl.Controls.Add(Me.Panel4)
+ Me.pnl.Dock = System.Windows.Forms.DockStyle.Bottom
+ Me.pnl.Location = New System.Drawing.Point(0, 444)
+ Me.pnl.Name = "pnl"
+ Me.pnl.Size = New System.Drawing.Size(1454, 269)
+ Me.pnl.TabIndex = 2
'
- 'Label3
+ 'Panel2
'
- Me.Label3.AutoSize = True
- Me.Label3.Cursor = System.Windows.Forms.Cursors.Hand
- Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label3.Location = New System.Drawing.Point(183, 43)
- Me.Label3.Name = "Label3"
- Me.Label3.Size = New System.Drawing.Size(68, 17)
- Me.Label3.TabIndex = 7
- Me.Label3.Text = "Zeitraum:"
+ Me.Panel2.BackColor = System.Drawing.Color.White
+ Me.Panel2.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+ Me.Panel2.Controls.Add(Me.UstCntlUSTV_AntragPosition1)
+ Me.Panel2.Dock = System.Windows.Forms.DockStyle.Fill
+ Me.Panel2.Location = New System.Drawing.Point(154, 0)
+ Me.Panel2.Name = "Panel2"
+ Me.Panel2.Size = New System.Drawing.Size(1300, 269)
+ Me.Panel2.TabIndex = 1
'
- 'Label4
+ 'Panel4
'
- Me.Label4.AutoSize = True
- Me.Label4.Cursor = System.Windows.Forms.Cursors.Hand
- Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label4.Location = New System.Drawing.Point(183, 20)
- Me.Label4.Name = "Label4"
- Me.Label4.Size = New System.Drawing.Size(31, 11)
- Me.Label4.TabIndex = 8
- Me.Label4.Text = "Firma:"
+ Me.Panel4.BackColor = System.Drawing.Color.WhiteSmoke
+ Me.Panel4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+ Me.Panel4.Controls.Add(Me.Button3)
+ Me.Panel4.Controls.Add(Me.Button2)
+ Me.Panel4.Dock = System.Windows.Forms.DockStyle.Left
+ Me.Panel4.Location = New System.Drawing.Point(0, 0)
+ Me.Panel4.Name = "Panel4"
+ Me.Panel4.Size = New System.Drawing.Size(154, 269)
+ Me.Panel4.TabIndex = 0
'
- 'Label2
+ 'Button3
'
- Me.Label2.AutoSize = True
- Me.Label2.Cursor = System.Windows.Forms.Cursors.Hand
- Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.Label2.Location = New System.Drawing.Point(4, 43)
- Me.Label2.Name = "Label2"
- Me.Label2.Size = New System.Drawing.Size(29, 11)
- Me.Label2.TabIndex = 9
- Me.Label2.Text = "Land:"
+ Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.Button3.ForeColor = System.Drawing.Color.Black
+ Me.Button3.Image = Global.SDL.My.Resources.Resources.del
+ Me.Button3.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+ Me.Button3.Location = New System.Drawing.Point(6, 50)
+ Me.Button3.Name = "Button3"
+ Me.Button3.Size = New System.Drawing.Size(135, 39)
+ Me.Button3.TabIndex = 1
+ Me.Button3.Text = "Eintrag löschen"
+ Me.Button3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+ Me.Button3.UseVisualStyleBackColor = True
'
- 'lblLand
+ 'Button2
'
- Me.lblLand.AutoSize = True
- Me.lblLand.Cursor = System.Windows.Forms.Cursors.Hand
- Me.lblLand.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
- Me.lblLand.Location = New System.Drawing.Point(78, 43)
- Me.lblLand.Name = "lblLand"
- Me.lblLand.Size = New System.Drawing.Size(19, 11)
- Me.lblLand.TabIndex = 10
- Me.lblLand.Text = "AT"
+ Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.Button2.ForeColor = System.Drawing.Color.Black
+ Me.Button2.Image = Global.SDL.My.Resources.Resources.plus
+ Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
+ Me.Button2.Location = New System.Drawing.Point(6, 5)
+ Me.Button2.Name = "Button2"
+ Me.Button2.Size = New System.Drawing.Size(135, 39)
+ Me.Button2.TabIndex = 0
+ Me.Button2.Text = "Neuer Eintrag"
+ Me.Button2.TextAlign = System.Drawing.ContentAlignment.MiddleRight
+ Me.Button2.UseVisualStyleBackColor = True
+ '
+ 'btnBearb
+ '
+ Me.btnBearb.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.btnBearb.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
+ Me.btnBearb.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnBearb.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.btnBearb.ForeColor = System.Drawing.Color.Black
+ Me.btnBearb.Location = New System.Drawing.Point(3, 3)
+ Me.btnBearb.Name = "btnBearb"
+ Me.btnBearb.Size = New System.Drawing.Size(86, 36)
+ Me.btnBearb.TabIndex = 0
+ Me.btnBearb.Text = "In Bearbeitung"
+ Me.btnBearb.UseVisualStyleBackColor = False
+ '
+ 'FlowLayoutPanel
+ '
+ Me.FlowLayoutPanel.Controls.Add(Me.btnBearb)
+ Me.FlowLayoutPanel.Controls.Add(Me.btnUnvollst)
+ Me.FlowLayoutPanel.Controls.Add(Me.btnEingereicht)
+ Me.FlowLayoutPanel.Controls.Add(Me.btnAbgelehnt)
+ Me.FlowLayoutPanel.Controls.Add(Me.btnNachforderung)
+ Me.FlowLayoutPanel.Controls.Add(Me.btnErstettel)
+ Me.FlowLayoutPanel.Controls.Add(Me.btnTeilerstattung)
+ Me.FlowLayoutPanel.Controls.Add(Me.btnStorno)
+ Me.FlowLayoutPanel.Location = New System.Drawing.Point(3, 50)
+ Me.FlowLayoutPanel.Name = "FlowLayoutPanel"
+ Me.FlowLayoutPanel.Size = New System.Drawing.Size(479, 52)
+ Me.FlowLayoutPanel.TabIndex = 2
+ '
+ 'btnEingereicht
+ '
+ Me.btnEingereicht.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.btnEingereicht.BackColor = System.Drawing.Color.SteelBlue
+ Me.btnEingereicht.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnEingereicht.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.btnEingereicht.ForeColor = System.Drawing.Color.White
+ Me.btnEingereicht.Location = New System.Drawing.Point(191, 3)
+ Me.btnEingereicht.Name = "btnEingereicht"
+ Me.btnEingereicht.Size = New System.Drawing.Size(87, 36)
+ Me.btnEingereicht.TabIndex = 2
+ Me.btnEingereicht.Text = "Eingereicht"
+ Me.btnEingereicht.UseVisualStyleBackColor = False
+ '
+ 'btnUnvollst
+ '
+ Me.btnUnvollst.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.btnUnvollst.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.btnUnvollst.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnUnvollst.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.btnUnvollst.ForeColor = System.Drawing.Color.Black
+ Me.btnUnvollst.Location = New System.Drawing.Point(95, 3)
+ Me.btnUnvollst.Name = "btnUnvollst"
+ Me.btnUnvollst.Size = New System.Drawing.Size(90, 36)
+ Me.btnUnvollst.TabIndex = 1
+ Me.btnUnvollst.Text = "Unvollständig"
+ Me.btnUnvollst.UseVisualStyleBackColor = False
+ '
+ 'btnNachforderung
+ '
+ Me.btnNachforderung.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.btnNachforderung.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.btnNachforderung.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnNachforderung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.btnNachforderung.ForeColor = System.Drawing.Color.Black
+ Me.btnNachforderung.Location = New System.Drawing.Point(370, 3)
+ Me.btnNachforderung.Name = "btnNachforderung"
+ Me.btnNachforderung.Size = New System.Drawing.Size(98, 36)
+ Me.btnNachforderung.TabIndex = 4
+ Me.btnNachforderung.Text = "Nachforderung/" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Berichtigung"
+ Me.btnNachforderung.UseVisualStyleBackColor = False
+ '
+ 'btnErstettel
+ '
+ Me.btnErstettel.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.btnErstettel.BackColor = System.Drawing.Color.Green
+ Me.btnErstettel.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnErstettel.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.btnErstettel.ForeColor = System.Drawing.Color.White
+ Me.btnErstettel.Location = New System.Drawing.Point(3, 45)
+ Me.btnErstettel.Name = "btnErstettel"
+ Me.btnErstettel.Size = New System.Drawing.Size(86, 36)
+ Me.btnErstettel.TabIndex = 5
+ Me.btnErstettel.Text = "Erstattet"
+ Me.btnErstettel.UseVisualStyleBackColor = False
+ '
+ 'btnAbgelehnt
+ '
+ Me.btnAbgelehnt.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.btnAbgelehnt.BackColor = System.Drawing.Color.FromArgb(CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer), CType(CType(0, Byte), Integer))
+ Me.btnAbgelehnt.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnAbgelehnt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.btnAbgelehnt.ForeColor = System.Drawing.Color.White
+ Me.btnAbgelehnt.Location = New System.Drawing.Point(284, 3)
+ Me.btnAbgelehnt.Name = "btnAbgelehnt"
+ Me.btnAbgelehnt.Size = New System.Drawing.Size(80, 36)
+ Me.btnAbgelehnt.TabIndex = 3
+ Me.btnAbgelehnt.Text = "Abgelehnt"
+ Me.btnAbgelehnt.UseVisualStyleBackColor = False
+ '
+ 'btnStorno
+ '
+ Me.btnStorno.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.btnStorno.BackColor = System.Drawing.Color.Red
+ Me.btnStorno.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnStorno.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.btnStorno.ForeColor = System.Drawing.Color.White
+ Me.btnStorno.Location = New System.Drawing.Point(188, 45)
+ Me.btnStorno.Name = "btnStorno"
+ Me.btnStorno.Size = New System.Drawing.Size(52, 36)
+ Me.btnStorno.TabIndex = 7
+ Me.btnStorno.Text = "Storno"
+ Me.btnStorno.UseVisualStyleBackColor = False
+ '
+ 'btnTeilerstattung
+ '
+ Me.btnTeilerstattung.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
+ Me.btnTeilerstattung.BackColor = System.Drawing.Color.Green
+ Me.btnTeilerstattung.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnTeilerstattung.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!)
+ Me.btnTeilerstattung.ForeColor = System.Drawing.Color.White
+ Me.btnTeilerstattung.Location = New System.Drawing.Point(95, 45)
+ Me.btnTeilerstattung.Name = "btnTeilerstattung"
+ Me.btnTeilerstattung.Size = New System.Drawing.Size(87, 36)
+ Me.btnTeilerstattung.TabIndex = 6
+ Me.btnTeilerstattung.Text = "Teilerstattung"
+ Me.btnTeilerstattung.UseVisualStyleBackColor = False
+ '
+ 'UstCntlUSTV_AntragPosition1
+ '
+ Me.UstCntlUSTV_AntragPosition1.Dock = System.Windows.Forms.DockStyle.Fill
+ Me.UstCntlUSTV_AntragPosition1.Location = New System.Drawing.Point(0, 0)
+ Me.UstCntlUSTV_AntragPosition1.Name = "UstCntlUSTV_AntragPosition1"
+ Me.UstCntlUSTV_AntragPosition1.Size = New System.Drawing.Size(1298, 267)
+ Me.UstCntlUSTV_AntragPosition1.TabIndex = 0
'
'frmMDM_USTVAntrag
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
- Me.ClientSize = New System.Drawing.Size(1464, 860)
+ Me.ClientSize = New System.Drawing.Size(1454, 813)
Me.Controls.Add(Me.pnlFilter)
- Me.Controls.Add(Me.Panel1)
+ Me.Controls.Add(Me.pnl)
Me.Controls.Add(Me.Panel3)
+ Me.Controls.Add(Me.Panel1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
+ Me.KeyPreview = True
Me.Name = "frmMDM_USTVAntrag"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "USTV Antrag"
@@ -226,8 +599,14 @@ Partial Class frmMDM_USTVAntrag
Me.Panel3.PerformLayout()
Me.Panel1.ResumeLayout(False)
Me.Panel1.PerformLayout()
+ Me.Panel5.ResumeLayout(False)
+ Me.Panel5.PerformLayout()
Me.pnlFilter.ResumeLayout(False)
CType(Me.dgvUSTVPositionen, System.ComponentModel.ISupportInitialize).EndInit()
+ Me.pnl.ResumeLayout(False)
+ Me.Panel2.ResumeLayout(False)
+ Me.Panel4.ResumeLayout(False)
+ Me.FlowLayoutPanel.ResumeLayout(False)
Me.ResumeLayout(False)
End Sub
@@ -246,4 +625,27 @@ Partial Class frmMDM_USTVAntrag
Friend WithEvents lblZeitraum As Label
Friend WithEvents lblLand As Label
Friend WithEvents Label2 As Label
+ Friend WithEvents cboStatus As VERAG_PROG_ALLGEMEIN.MyComboBox
+ Friend WithEvents Label5 As Label
+ Friend WithEvents rtbStatusText As RichTextBox
+ Friend WithEvents Button1 As Button
+ Friend WithEvents pnl As Panel
+ Friend WithEvents Panel2 As Panel
+ Friend WithEvents Button2 As Button
+ Friend WithEvents Panel4 As Panel
+ Friend WithEvents Button3 As Button
+ Friend WithEvents txtBis As VERAG_PROG_ALLGEMEIN.MyTextBox
+ Friend WithEvents txtVon As VERAG_PROG_ALLGEMEIN.MyTextBox
+ Friend WithEvents UstCntlUSTV_AntragPosition1 As ustCntlUSTV_AntragPosition
+ Friend WithEvents Panel5 As Panel
+ Friend WithEvents Label6 As Label
+ Friend WithEvents FlowLayoutPanel As FlowLayoutPanel
+ Friend WithEvents btnBearb As Button
+ Friend WithEvents btnEingereicht As Button
+ Friend WithEvents btnUnvollst As Button
+ Friend WithEvents btnNachforderung As Button
+ Friend WithEvents btnErstettel As Button
+ Friend WithEvents btnAbgelehnt As Button
+ Friend WithEvents btnStorno As Button
+ Friend WithEvents btnTeilerstattung As Button
End Class
diff --git a/SDL/USTV/frmMDM_USTVAntrag.vb b/SDL/USTV/frmMDM_USTVAntrag.vb
index 72596eda..c34a0ddc 100644
--- a/SDL/USTV/frmMDM_USTVAntrag.vb
+++ b/SDL/USTV/frmMDM_USTVAntrag.vb
@@ -1,6 +1,7 @@
Public Class frmMDM_USTVAntrag
Dim UStVAn_ID As Integer
+ Dim USTV_ANTRAG As VERAG_PROG_ALLGEMEIN.cUSTVAntrag = Nothing
Dim Antrag_LandKz As String = ""
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
Sub New(UStVAn_ID)
@@ -81,17 +82,11 @@
End With
- Dim USTV_ANTRAG As New VERAG_PROG_ALLGEMEIN.cUSTVAntrag(UStVAn_ID)
Antrag_LandKz = SQL.DLookup("LandKz", "[Länderverzeichnis für die Außenhandelsstatistik]", "Landnr='" & USTV_ANTRAG.UStVAn_LandNr & "'", "FMZOLL")
Dim GET_Antraege = MDM_Worker.cPLOSE.GET_Antraege(USTV_ANTRAG.UStVAn_ReDatVon, USTV_ANTRAG.UStVAn_ReDatBis, USTV_ANTRAG.UStVAn_KuNr, Antrag_LandKz, False)
- lblFirma.Text = USTV_ANTRAG.UStVAn_Name
- lblLand.Text = Antrag_LandKz
- lblZeitraum.Text = CDate(USTV_ANTRAG.UStVAn_ReDatVon).ToString("dd.MM.yyyy") & " - " & CDate(USTV_ANTRAG.UStVAn_ReDatBis).ToString("dd.MM.yyyy")
-
-
If GET_Antraege IsNot Nothing AndAlso GET_Antraege.Count > 0 Then
lblPLOSE_EintrageVerarbetiet.Text = "aussehende Einträge: " & GET_Antraege.Count
Else
@@ -101,8 +96,62 @@
End Sub
+ Sub setValue(USTV_ANTRAG As VERAG_PROG_ALLGEMEIN.cUSTVAntrag)
+
+ lblFirma.Text = USTV_ANTRAG.UStVAn_Name
+ lblLand.Text = Antrag_LandKz
+ txtVon._value = CDate(USTV_ANTRAG.UStVAn_ReDatVon)
+ txtBis._value = CDate(USTV_ANTRAG.UStVAn_ReDatBis)
+ 'lblZeitraum.Text = CDate(USTV_ANTRAG.UStVAn_ReDatVon).ToString("dd.MM.yyyy") & " - " & CDate(USTV_ANTRAG.UStVAn_ReDatBis).ToString("dd.MM.yyyy")
+
+ cboStatus.changeItem(If(USTV_ANTRAG.UStVAn_Status, ""))
+ rtbStatusText.Text = If(USTV_ANTRAG.UStVAn_StatusText, "")
+
+ End Sub
+
+ Sub getValue(ByRef USTV_ANTRAG As VERAG_PROG_ALLGEMEIN.cUSTVAntrag)
+
+ If Me_Validate() Then
+ 'lblFirma.Text = USTV_ANTRAG.UStVAn_Name
+ 'lblLand.Text = Antrag_LandKz
+ If IsDate(txtVon._value) Then USTV_ANTRAG.UStVAn_ReDatVon = CDate(txtVon._value)
+ If IsDate(txtBis._value) Then USTV_ANTRAG.UStVAn_ReDatBis = CDate(txtBis._value)
+
+ 'lblZeitraum.Text = CDate(USTV_ANTRAG.UStVAn_ReDatVon).ToString("dd.MM.yyyy") & " - " & CDate(USTV_ANTRAG.UStVAn_ReDatBis).ToString("dd.MM.yyyy")
+
+ cboStatus.changeItem(If(USTV_ANTRAG.UStVAn_Status, ""))
+ rtbStatusText.Text = If(USTV_ANTRAG.UStVAn_StatusText, "")
+ End If
+ End Sub
+ Function Me_Validate() As Boolean
+ If IsDate(txtVon._value) Then MsgBox("Datumsformat: Von") : Return False
+ If IsDate(txtBis._value) Then MsgBox("Datumsformat: Bis") : Return False
+ Return True
+ End Function
+
+
Private Sub usrCntlVERAGCard_Load(sender As Object, e As EventArgs) Handles MyBase.Load
+
+ cboStatus.Items.Clear()
+ cboStatus.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("-", ""))
+ cboStatus.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("In Bearbeitung", cUSTVStatus.STAT_INBEARBEITUNG))
+ cboStatus.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Unvollständig", cUSTVStatus.STAT_UNVOLLSTAENDIG))
+ cboStatus.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Eingereicht", cUSTVStatus.STAT_EINGEREICHT))
+ cboStatus.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Nachforderung/Berichtigung", cUSTVStatus.STAT_NACHFORDERUNG))
+ cboStatus.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Abgeschlossen/Erstattet", cUSTVStatus.STAT_ERSTATTET))
+ cboStatus.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Abgelehnt", cUSTVStatus.STAT_ABGELEHNT))
+ cboStatus.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Storno", cUSTVStatus.STAT_STORNO))
+ cboStatus.changeItem(cUSTVStatus.STAT_INBEARBEITUNG)
+
+
lblPLOSE_EintrageVerarbetiet.Text = ""
+
+ If UStVAn_ID > 0 Then
+ USTV_ANTRAG = New VERAG_PROG_ALLGEMEIN.cUSTVAntrag(UStVAn_ID)
+ setValue(USTV_ANTRAG)
+
+ End If
+
init()
End Sub
@@ -172,6 +221,161 @@
End Try
End Function
+ Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+
+ getValue(USTV_ANTRAG)
+
+ If USTV_ANTRAG.SAVE Then
+ Me.Close()
+ End If
+ End Sub
+
+ Sub initPosition(UStVPo_ID)
+ If UStVPo_ID > 0 Then
+ Dim ANTR_POS As New VERAG_PROG_ALLGEMEIN.cUStVPositionen(USTV_ANTRAG.UStVAn_ID, UStVPo_ID)
+ UstCntlUSTV_AntragPosition1.Enabled = True
+ UstCntlUSTV_AntragPosition1.setValues(ANTR_POS)
+ Else
+ UstCntlUSTV_AntragPosition1.reset()
+ UstCntlUSTV_AntragPosition1.Enabled = False
+ End If
+
+ End Sub
+
+ Private Sub dgvUSTVPositionen_SelectionChanged(sender As Object, e As EventArgs) Handles dgvUSTVPositionen.SelectionChanged
+ If dgvUSTVPositionen.SelectedRows.Count > 0 Then
+ initPosition(dgvUSTVPositionen.SelectedRows(0).Cells("UStVPo_ID").Value)
+
+ End If
+
+ End Sub
+
+ Private Sub UstCntlUSTV_AntragPosition1_EV_NEXT() Handles UstCntlUSTV_AntragPosition1.EV_NEXT
+
+ If dgvUSTVPositionen.SelectedRows.Count > 0 Then
+ If dgvUSTVPositionen.RowCount > dgvUSTVPositionen.SelectedRows(0).Index + 1 Then
+ UstCntlUSTV_AntragPosition1.Enabled = True
+ Dim selIndex = dgvUSTVPositionen.SelectedRows(0).Index + 1
+ dgvUSTVPositionen.ClearSelection()
+ dgvUSTVPositionen.Rows(selIndex).Selected = True
+ dgvUSTVPositionen.CurrentCell = dgvUSTVPositionen.SelectedRows(0).Cells("UStVPo_ID")
+ End If
+ End If
+
+ End Sub
+ Private Sub UstCntlUSTV_AntragPosition1_EV_PREV() Handles UstCntlUSTV_AntragPosition1.EV_PREV
+ If dgvUSTVPositionen.SelectedRows.Count > 0 Then
+ If dgvUSTVPositionen.SelectedRows(0).Index > 0 Then
+ UstCntlUSTV_AntragPosition1.Enabled = True
+ Dim selIndex = dgvUSTVPositionen.SelectedRows(0).Index - 1
+ dgvUSTVPositionen.ClearSelection()
+ dgvUSTVPositionen.Rows(selIndex).Selected = True
+ dgvUSTVPositionen.CurrentCell = dgvUSTVPositionen.SelectedRows(0).Cells("UStVPo_ID")
+ End If
+ End If
+
+ End Sub
+
+
+ Private Sub ustCntlUSTV_AntragPosition_KeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles Me.PreviewKeyDown
+ If e.KeyValue = Keys.PageDown Then
+ UstCntlUSTV_AntragPosition1_EV_NEXT()
+ End If
+ If e.KeyValue = Keys.PageUp Then
+ UstCntlUSTV_AntragPosition1_EV_PREV()
+ End If
+ End Sub
+
+ Private Sub frmMDM_USTVAntrag_Shown(sender As Object, e As EventArgs) Handles Me.Shown
+ Me.Top = 0
+ Me.Height = Screen.FromRectangle(Me.Bounds).WorkingArea.Size.Height
+ End Sub
+
+ Private Sub cboStatus_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboStatus.SelectedIndexChanged
+ For Each b In FlowLayoutPanel.Controls
+ b.visible = False
+ Next
+ Select Case cboStatus._value
+ Case cUSTVStatus.STAT_INBEARBEITUNG
+ btnEingereicht.Visible = True
+ btnStorno.Visible = True
+ btnUnvollst.Visible = True
+ Case cUSTVStatus.STAT_UNVOLLSTAENDIG
+ btnBearb.Visible = True
+ btnEingereicht.Visible = True
+ btnStorno.Visible = True
+ Case cUSTVStatus.STAT_EINGEREICHT
+ 'btnBearb.Visible = True
+ btnStorno.Visible = True
+ btnTeilerstattung.Visible = True
+ btnErstettel.Visible = True
+ btnAbgelehnt.Visible = True
+ btnNachforderung.Visible = True
+ Case cUSTVStatus.STAT_ABGELEHNT
+ btnBearb.Visible = True
+ btnEingereicht.Visible = True
+ btnUnvollst.Visible = True
+ btnStorno.Visible = True
+ Case cUSTVStatus.STAT_NACHFORDERUNG
+ btnBearb.Visible = True
+ btnEingereicht.Visible = True
+ 'btnUnvollst.Visible = True
+ btnStorno.Visible = True
+ Case cUSTVStatus.STAT_ERSTATTET
+ ' btnStorno.Visible = True
+ Case cUSTVStatus.STAT_TEILERSTATTET
+ btnErstettel.Visible = True
+ ' btnStorno.Visible = True
+ End Select
+
+ End Sub
+
+ Private Sub btnBearb_Click(sender As Object, e As EventArgs) Handles btnBearb.Click
+ cboStatus.changeItem(cUSTVStatus.STAT_INBEARBEITUNG)
+ End Sub
+
+ Private Sub btnTeilerstattung_Click(sender As Object, e As EventArgs) Handles btnTeilerstattung.Click
+ cboStatus.changeItem(cUSTVStatus.STAT_TEILERSTATTET)
+ End Sub
+
+ Private Sub btnUnvollst_Click(sender As Object, e As EventArgs) Handles btnUnvollst.Click
+ cboStatus.changeItem(cUSTVStatus.STAT_UNVOLLSTAENDIG)
+ End Sub
+
+ Private Sub btnEingereicht_Click(sender As Object, e As EventArgs) Handles btnEingereicht.Click
+ cboStatus.changeItem(cUSTVStatus.STAT_EINGEREICHT)
+ End Sub
+
+ Private Sub btnAbgelehnt_Click(sender As Object, e As EventArgs) Handles btnAbgelehnt.Click
+ cboStatus.changeItem(cUSTVStatus.STAT_ABGELEHNT)
+ End Sub
+
+ Private Sub btnNachforderung_Click(sender As Object, e As EventArgs) Handles btnNachforderung.Click
+ cboStatus.changeItem(cUSTVStatus.STAT_NACHFORDERUNG)
+ End Sub
+
+ Private Sub btnErstettel_Click(sender As Object, e As EventArgs) Handles btnErstettel.Click
+ cboStatus.changeItem(cUSTVStatus.STAT_ERSTATTET)
+ End Sub
+
+ Private Sub btnStorno_Click(sender As Object, e As EventArgs) Handles btnStorno.Click
+ cboStatus.changeItem(cUSTVStatus.STAT_STORNO)
+ End Sub
+
+ Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
+ UstCntlUSTV_AntragPosition1.reset()
+ UstCntlUSTV_AntragPosition1.UStV_POS = Nothing
+ UstCntlUSTV_AntragPosition1.Enabled = True
+ End Sub
+
+ Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
+ If vbYes = MsgBox("Möchten Sie den Eintrag wirklich löschen?", vbYesNoCancel) Then
+ UstCntlUSTV_AntragPosition1.UStV_POS.delete()
+ UstCntlUSTV_AntragPosition1.Enabled = False
+
+ End If
+ End Sub
+
' Private Sub cmdITMautÜbernehmen_Click()
' Dim wrk As DAO.Workspace
diff --git a/SDL/USTV/ustCntlUSTV_AntragPosition.Designer.vb b/SDL/USTV/ustCntlUSTV_AntragPosition.Designer.vb
new file mode 100644
index 00000000..292d8c11
--- /dev/null
+++ b/SDL/USTV/ustCntlUSTV_AntragPosition.Designer.vb
@@ -0,0 +1,590 @@
+ _
+Partial Class ustCntlUSTV_AntragPosition
+ Inherits System.Windows.Forms.UserControl
+
+ 'UserControl überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
+ _
+ Protected Overrides Sub Dispose(ByVal disposing As Boolean)
+ Try
+ If disposing AndAlso components IsNot Nothing Then
+ components.Dispose()
+ End If
+ Finally
+ MyBase.Dispose(disposing)
+ End Try
+ End Sub
+
+ 'Wird vom Windows Form-Designer benötigt.
+ Private components As System.ComponentModel.IContainer
+
+ 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
+ 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
+ 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
+ _
+ Private Sub InitializeComponent()
+ Me.components = New System.ComponentModel.Container()
+ Me.scanLieferschein = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScan()
+ Me.TabPage2 = New System.Windows.Forms.TabPage()
+ Me.scanSonstiges = New VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList()
+ Me.tbcntr = New System.Windows.Forms.TabControl()
+ Me.cbxAPI = New VERAG_PROG_ALLGEMEIN.MyCheckBoxValue(Me.components)
+ Me.Label8 = New System.Windows.Forms.Label()
+ Me.txtRgDatum = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.Label7 = New System.Windows.Forms.Label()
+ Me.Panel2 = New System.Windows.Forms.Panel()
+ Me.txtRgNr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.Label9 = New System.Windows.Forms.Label()
+ Me.Label1 = New System.Windows.Forms.Label()
+ Me.btnBildAuf = New System.Windows.Forms.Button()
+ Me.Button1 = New System.Windows.Forms.Button()
+ Me.txtLeistender = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.Label2 = New System.Windows.Forms.Label()
+ Me.Label3 = New System.Windows.Forms.Label()
+ Me.Label6 = New System.Windows.Forms.Label()
+ Me.Label10 = New System.Windows.Forms.Label()
+ Me.txtUSTBetrag = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.Label11 = New System.Windows.Forms.Label()
+ Me.txtUmrechnungskurs = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.Label12 = New System.Windows.Forms.Label()
+ Me.txtUSTBetragEUR = New VERAG_PROG_ALLGEMEIN.MyTextBox()
+ Me.Label13 = New System.Windows.Forms.Label()
+ Me.cboLeistungsbezeichnung = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.Label4 = New System.Windows.Forms.Label()
+ Me.Label5 = New System.Windows.Forms.Label()
+ Me.lblAenderungsdatum = New System.Windows.Forms.Label()
+ Me.lblSachbearbeiter = New System.Windows.Forms.Label()
+ Me.cboSchnittstellennr = New VERAG_PROG_ALLGEMEIN.MyComboBox()
+ Me.pnl = New System.Windows.Forms.Panel()
+ Me.Panel1 = New System.Windows.Forms.Panel()
+ Me.TabPage2.SuspendLayout()
+ Me.tbcntr.SuspendLayout()
+ Me.Panel2.SuspendLayout()
+ Me.pnl.SuspendLayout()
+ Me.Panel1.SuspendLayout()
+ Me.SuspendLayout()
+ '
+ 'scanLieferschein
+ '
+ Me.scanLieferschein._ARCHIV = True
+ Me.scanLieferschein._DATENSERVER_KATEGORIE = "DOKUMENTE"
+ Me.scanLieferschein._DATENSERVER_ORDNER = "MDM"
+ Me.scanLieferschein._DATENSERVER_UOrdner1 = Nothing
+ Me.scanLieferschein._DATENSERVER_UOrdner2 = Nothing
+ Me.scanLieferschein._DATENSERVER_UOrdner3 = Nothing
+ Me.scanLieferschein._MULTI_FILES = True
+ Me.scanLieferschein._TEXT_PDF = "Lieferschein"
+ Me.scanLieferschein.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
+ Me.scanLieferschein.BackColor = System.Drawing.Color.White
+ Me.scanLieferschein.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+ Me.scanLieferschein.Cursor = System.Windows.Forms.Cursors.Default
+ Me.scanLieferschein.Location = New System.Drawing.Point(3, 198)
+ Me.scanLieferschein.Name = "scanLieferschein"
+ Me.scanLieferschein.Size = New System.Drawing.Size(94, 24)
+ Me.scanLieferschein.TabIndex = 2
+ Me.scanLieferschein.Visible = False
+ '
+ 'TabPage2
+ '
+ Me.TabPage2.Controls.Add(Me.scanSonstiges)
+ Me.TabPage2.Location = New System.Drawing.Point(4, 22)
+ Me.TabPage2.Name = "TabPage2"
+ Me.TabPage2.Padding = New System.Windows.Forms.Padding(3)
+ Me.TabPage2.Size = New System.Drawing.Size(270, 213)
+ Me.TabPage2.TabIndex = 1
+ Me.TabPage2.Text = "Dokumente"
+ Me.TabPage2.UseVisualStyleBackColor = True
+ '
+ 'scanSonstiges
+ '
+ Me.scanSonstiges._DATENSERVER_KATEGORIE = "DOKUMENTE"
+ Me.scanSonstiges._DATENSERVER_ORDNER = "MDM"
+ Me.scanSonstiges._DATENSERVER_UOrdner1 = ""
+ Me.scanSonstiges._DATENSERVER_UOrdner2 = ""
+ Me.scanSonstiges._DATENSERVER_UOrdner3 = ""
+ Me.scanSonstiges._OPEN_ORIGINAL = False
+ Me.scanSonstiges._TYPE = "PDF"
+ Me.scanSonstiges.AutoSizeMode = System.Windows.Forms.AutoSizeMode.GrowAndShrink
+ Me.scanSonstiges.BackColor = System.Drawing.Color.White
+ Me.scanSonstiges.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
+ Me.scanSonstiges.Cursor = System.Windows.Forms.Cursors.Hand
+ Me.scanSonstiges.Dock = System.Windows.Forms.DockStyle.Fill
+ Me.scanSonstiges.Location = New System.Drawing.Point(3, 3)
+ Me.scanSonstiges.Margin = New System.Windows.Forms.Padding(0)
+ Me.scanSonstiges.Name = "scanSonstiges"
+ Me.scanSonstiges.Size = New System.Drawing.Size(264, 207)
+ Me.scanSonstiges.TabIndex = 0
+ '
+ 'tbcntr
+ '
+ Me.tbcntr.Controls.Add(Me.TabPage2)
+ Me.tbcntr.Dock = System.Windows.Forms.DockStyle.Right
+ Me.tbcntr.Location = New System.Drawing.Point(1022, 30)
+ Me.tbcntr.Name = "tbcntr"
+ Me.tbcntr.SelectedIndex = 0
+ Me.tbcntr.Size = New System.Drawing.Size(278, 239)
+ Me.tbcntr.TabIndex = 3
+ '
+ 'cbxAPI
+ '
+ Me.cbxAPI._date = Nothing
+ Me.cbxAPI._showdate = True
+ Me.cbxAPI._value = ""
+ Me.cbxAPI.AutoSize = True
+ Me.cbxAPI.Enabled = False
+ Me.cbxAPI.Location = New System.Drawing.Point(634, 132)
+ Me.cbxAPI.Name = "cbxAPI"
+ Me.cbxAPI.Size = New System.Drawing.Size(83, 17)
+ Me.cbxAPI.TabIndex = 17
+ Me.cbxAPI.Text = "Schnittstelle"
+ Me.cbxAPI.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+ Me.cbxAPI.UseVisualStyleBackColor = True
+ '
+ 'Label8
+ '
+ Me.Label8.AutoSize = True
+ Me.Label8.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label8.ForeColor = System.Drawing.Color.White
+ Me.Label8.Location = New System.Drawing.Point(6, 9)
+ Me.Label8.Name = "Label8"
+ Me.Label8.Size = New System.Drawing.Size(46, 13)
+ Me.Label8.TabIndex = 0
+ Me.Label8.Text = "Details"
+ '
+ 'txtRgDatum
+ '
+ Me.txtRgDatum._DateTimeOnly = False
+ Me.txtRgDatum._numbersOnly = False
+ Me.txtRgDatum._numbersOnlyKommastellen = ""
+ Me.txtRgDatum._numbersOnlyTrennzeichen = True
+ Me.txtRgDatum._Prozent = False
+ Me.txtRgDatum._ShortDateNew = False
+ Me.txtRgDatum._ShortDateOnly = False
+ Me.txtRgDatum._TimeOnly = False
+ Me.txtRgDatum._TimeOnly_Seconds = False
+ Me.txtRgDatum._value = ""
+ Me.txtRgDatum._Waehrung = False
+ Me.txtRgDatum._WaehrungZeichen = True
+ Me.txtRgDatum.ForeColor = System.Drawing.Color.Red
+ Me.txtRgDatum.Location = New System.Drawing.Point(17, 49)
+ Me.txtRgDatum.MaxLength = 10
+ Me.txtRgDatum.MaxLineLength = -1
+ Me.txtRgDatum.MaxLines_Warning = ""
+ Me.txtRgDatum.MaxLines_Warning_Label = Nothing
+ Me.txtRgDatum.Name = "txtRgDatum"
+ Me.txtRgDatum.Size = New System.Drawing.Size(154, 20)
+ Me.txtRgDatum.TabIndex = 6
+ '
+ 'Label7
+ '
+ Me.Label7.AutoSize = True
+ Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.Label7.Location = New System.Drawing.Point(14, 31)
+ Me.Label7.Name = "Label7"
+ Me.Label7.Size = New System.Drawing.Size(114, 15)
+ Me.Label7.TabIndex = 2
+ Me.Label7.Text = "Rechnungs-Datum:"
+ '
+ 'Panel2
+ '
+ Me.Panel2.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
+ Me.Panel2.Controls.Add(Me.Label8)
+ Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top
+ Me.Panel2.Location = New System.Drawing.Point(0, 0)
+ Me.Panel2.Name = "Panel2"
+ Me.Panel2.Size = New System.Drawing.Size(1300, 30)
+ Me.Panel2.TabIndex = 0
+ '
+ 'txtRgNr
+ '
+ Me.txtRgNr._DateTimeOnly = False
+ Me.txtRgNr._numbersOnly = False
+ Me.txtRgNr._numbersOnlyKommastellen = ""
+ Me.txtRgNr._numbersOnlyTrennzeichen = True
+ Me.txtRgNr._Prozent = False
+ Me.txtRgNr._ShortDateNew = False
+ Me.txtRgNr._ShortDateOnly = False
+ Me.txtRgNr._TimeOnly = False
+ Me.txtRgNr._TimeOnly_Seconds = False
+ Me.txtRgNr._value = Nothing
+ Me.txtRgNr._Waehrung = False
+ Me.txtRgNr._WaehrungZeichen = True
+ Me.txtRgNr.Location = New System.Drawing.Point(177, 49)
+ Me.txtRgNr.MaxLength = 250
+ Me.txtRgNr.MaxLineLength = -1
+ Me.txtRgNr.MaxLines_Warning = ""
+ Me.txtRgNr.MaxLines_Warning_Label = Nothing
+ Me.txtRgNr.Name = "txtRgNr"
+ Me.txtRgNr.Size = New System.Drawing.Size(183, 20)
+ Me.txtRgNr.TabIndex = 7
+ '
+ 'Label9
+ '
+ Me.Label9.AutoSize = True
+ Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label9.Location = New System.Drawing.Point(174, 33)
+ Me.Label9.Name = "Label9"
+ Me.Label9.Size = New System.Drawing.Size(82, 13)
+ Me.Label9.TabIndex = 3
+ Me.Label9.Text = "Rechnungs-Nr.:"
+ '
+ 'Label1
+ '
+ 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(442, 14)
+ Me.Label1.Name = "Label1"
+ Me.Label1.Size = New System.Drawing.Size(59, 13)
+ Me.Label1.TabIndex = 1
+ Me.Label1.Text = "Leistung:"
+ '
+ 'btnBildAuf
+ '
+ Me.btnBildAuf.BackgroundImage = Global.SDL.My.Resources.Resources.pfeil_oben
+ Me.btnBildAuf.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
+ Me.btnBildAuf.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.btnBildAuf.Location = New System.Drawing.Point(16, 7)
+ Me.btnBildAuf.Name = "btnBildAuf"
+ Me.btnBildAuf.Size = New System.Drawing.Size(71, 77)
+ Me.btnBildAuf.TabIndex = 0
+ Me.btnBildAuf.Text = "Bild auf"
+ Me.btnBildAuf.TextAlign = System.Drawing.ContentAlignment.BottomCenter
+ Me.btnBildAuf.UseVisualStyleBackColor = True
+ '
+ 'Button1
+ '
+ Me.Button1.BackgroundImage = Global.SDL.My.Resources.Resources.pfeil_unten
+ Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
+ Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
+ Me.Button1.Location = New System.Drawing.Point(16, 90)
+ Me.Button1.Name = "Button1"
+ Me.Button1.Size = New System.Drawing.Size(71, 77)
+ Me.Button1.TabIndex = 1
+ Me.Button1.Text = "Bild ab"
+ Me.Button1.TextAlign = System.Drawing.ContentAlignment.TopCenter
+ Me.Button1.UseVisualStyleBackColor = True
+ '
+ 'txtLeistender
+ '
+ Me.txtLeistender._DateTimeOnly = False
+ Me.txtLeistender._numbersOnly = False
+ Me.txtLeistender._numbersOnlyKommastellen = ""
+ Me.txtLeistender._numbersOnlyTrennzeichen = True
+ Me.txtLeistender._Prozent = False
+ Me.txtLeistender._ShortDateNew = False
+ Me.txtLeistender._ShortDateOnly = False
+ Me.txtLeistender._TimeOnly = False
+ Me.txtLeistender._TimeOnly_Seconds = False
+ Me.txtLeistender._value = Nothing
+ Me.txtLeistender._Waehrung = False
+ Me.txtLeistender._WaehrungZeichen = True
+ Me.txtLeistender.Location = New System.Drawing.Point(634, 49)
+ Me.txtLeistender.MaxLength = 22
+ Me.txtLeistender.MaxLineLength = -1
+ Me.txtLeistender.MaxLines_Warning = ""
+ Me.txtLeistender.MaxLines_Warning_Label = Nothing
+ Me.txtLeistender.Name = "txtLeistender"
+ Me.txtLeistender.Size = New System.Drawing.Size(279, 20)
+ Me.txtLeistender.TabIndex = 9
+ '
+ 'Label2
+ '
+ Me.Label2.AutoSize = True
+ Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.Label2.Location = New System.Drawing.Point(442, 31)
+ Me.Label2.Name = "Label2"
+ Me.Label2.Size = New System.Drawing.Size(134, 15)
+ Me.Label2.TabIndex = 4
+ Me.Label2.Text = "Leistungsbezeichnung:"
+ '
+ 'Label3
+ '
+ Me.Label3.AutoSize = True
+ Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.Label3.Location = New System.Drawing.Point(630, 31)
+ Me.Label3.Name = "Label3"
+ Me.Label3.Size = New System.Drawing.Size(82, 15)
+ Me.Label3.TabIndex = 5
+ Me.Label3.Text = "Leistungeber:"
+ '
+ 'Label6
+ '
+ Me.Label6.AutoSize = True
+ Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label6.Location = New System.Drawing.Point(14, 14)
+ Me.Label6.Name = "Label6"
+ Me.Label6.Size = New System.Drawing.Size(65, 13)
+ Me.Label6.TabIndex = 0
+ Me.Label6.Text = "Rechnung"
+ '
+ 'Label10
+ '
+ Me.Label10.AutoSize = True
+ Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+ Me.Label10.Location = New System.Drawing.Point(14, 92)
+ Me.Label10.Name = "Label10"
+ Me.Label10.Size = New System.Drawing.Size(65, 13)
+ Me.Label10.TabIndex = 10
+ Me.Label10.Text = "Rechnung"
+ '
+ 'txtUSTBetrag
+ '
+ Me.txtUSTBetrag._DateTimeOnly = False
+ Me.txtUSTBetrag._numbersOnly = False
+ Me.txtUSTBetrag._numbersOnlyKommastellen = ""
+ Me.txtUSTBetrag._numbersOnlyTrennzeichen = True
+ Me.txtUSTBetrag._Prozent = False
+ Me.txtUSTBetrag._ShortDateNew = False
+ Me.txtUSTBetrag._ShortDateOnly = False
+ Me.txtUSTBetrag._TimeOnly = False
+ Me.txtUSTBetrag._TimeOnly_Seconds = False
+ Me.txtUSTBetrag._value = ""
+ Me.txtUSTBetrag._Waehrung = False
+ Me.txtUSTBetrag._WaehrungZeichen = True
+ Me.txtUSTBetrag.ForeColor = System.Drawing.Color.Red
+ Me.txtUSTBetrag.Location = New System.Drawing.Point(17, 130)
+ Me.txtUSTBetrag.MaxLength = 10
+ Me.txtUSTBetrag.MaxLineLength = -1
+ Me.txtUSTBetrag.MaxLines_Warning = ""
+ Me.txtUSTBetrag.MaxLines_Warning_Label = Nothing
+ Me.txtUSTBetrag.Name = "txtUSTBetrag"
+ Me.txtUSTBetrag.Size = New System.Drawing.Size(154, 20)
+ Me.txtUSTBetrag.TabIndex = 14
+ '
+ 'Label11
+ '
+ Me.Label11.AutoSize = True
+ Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.Label11.Location = New System.Drawing.Point(14, 112)
+ Me.Label11.Name = "Label11"
+ Me.Label11.Size = New System.Drawing.Size(70, 15)
+ Me.Label11.TabIndex = 11
+ Me.Label11.Text = "USt-Betrag:"
+ '
+ 'txtUmrechnungskurs
+ '
+ Me.txtUmrechnungskurs._DateTimeOnly = False
+ Me.txtUmrechnungskurs._numbersOnly = True
+ Me.txtUmrechnungskurs._numbersOnlyKommastellen = ""
+ Me.txtUmrechnungskurs._numbersOnlyTrennzeichen = True
+ Me.txtUmrechnungskurs._Prozent = False
+ Me.txtUmrechnungskurs._ShortDateNew = False
+ Me.txtUmrechnungskurs._ShortDateOnly = False
+ Me.txtUmrechnungskurs._TimeOnly = False
+ Me.txtUmrechnungskurs._TimeOnly_Seconds = False
+ Me.txtUmrechnungskurs._value = ""
+ Me.txtUmrechnungskurs._Waehrung = False
+ Me.txtUmrechnungskurs._WaehrungZeichen = True
+ Me.txtUmrechnungskurs.ForeColor = System.Drawing.Color.Red
+ Me.txtUmrechnungskurs.Location = New System.Drawing.Point(177, 130)
+ Me.txtUmrechnungskurs.MaxLength = 10
+ Me.txtUmrechnungskurs.MaxLineLength = -1
+ Me.txtUmrechnungskurs.MaxLines_Warning = ""
+ Me.txtUmrechnungskurs.MaxLines_Warning_Label = Nothing
+ Me.txtUmrechnungskurs.Name = "txtUmrechnungskurs"
+ Me.txtUmrechnungskurs.Size = New System.Drawing.Size(108, 20)
+ Me.txtUmrechnungskurs.TabIndex = 15
+ '
+ 'Label12
+ '
+ Me.Label12.AutoSize = True
+ Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.Label12.Location = New System.Drawing.Point(174, 112)
+ Me.Label12.Name = "Label12"
+ Me.Label12.Size = New System.Drawing.Size(111, 15)
+ Me.Label12.TabIndex = 12
+ Me.Label12.Text = "Umrechnungskurs:"
+ '
+ 'txtUSTBetragEUR
+ '
+ Me.txtUSTBetragEUR._DateTimeOnly = False
+ Me.txtUSTBetragEUR._numbersOnly = False
+ Me.txtUSTBetragEUR._numbersOnlyKommastellen = ""
+ Me.txtUSTBetragEUR._numbersOnlyTrennzeichen = True
+ Me.txtUSTBetragEUR._Prozent = False
+ Me.txtUSTBetragEUR._ShortDateNew = False
+ Me.txtUSTBetragEUR._ShortDateOnly = False
+ Me.txtUSTBetragEUR._TimeOnly = False
+ Me.txtUSTBetragEUR._TimeOnly_Seconds = False
+ Me.txtUSTBetragEUR._value = ""
+ Me.txtUSTBetragEUR._Waehrung = False
+ Me.txtUSTBetragEUR._WaehrungZeichen = True
+ Me.txtUSTBetragEUR.ForeColor = System.Drawing.Color.Red
+ Me.txtUSTBetragEUR.Location = New System.Drawing.Point(294, 130)
+ Me.txtUSTBetragEUR.MaxLength = 10
+ Me.txtUSTBetragEUR.MaxLineLength = -1
+ Me.txtUSTBetragEUR.MaxLines_Warning = ""
+ Me.txtUSTBetragEUR.MaxLines_Warning_Label = Nothing
+ Me.txtUSTBetragEUR.Name = "txtUSTBetragEUR"
+ Me.txtUSTBetragEUR.Size = New System.Drawing.Size(154, 20)
+ Me.txtUSTBetragEUR.TabIndex = 16
+ '
+ 'Label13
+ '
+ Me.Label13.AutoSize = True
+ Me.Label13.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.Label13.Location = New System.Drawing.Point(291, 112)
+ Me.Label13.Name = "Label13"
+ Me.Label13.Size = New System.Drawing.Size(96, 15)
+ Me.Label13.TabIndex = 13
+ Me.Label13.Text = "USt-Betrag EUR"
+ '
+ 'cboLeistungsbezeichnung
+ '
+ Me.cboLeistungsbezeichnung._allowedValuesFreiText = Nothing
+ Me.cboLeistungsbezeichnung._allowFreiText = False
+ Me.cboLeistungsbezeichnung._value = ""
+ Me.cboLeistungsbezeichnung.FormattingEnabled = True
+ Me.cboLeistungsbezeichnung.Location = New System.Drawing.Point(445, 49)
+ Me.cboLeistungsbezeichnung.Name = "cboLeistungsbezeichnung"
+ Me.cboLeistungsbezeichnung.Size = New System.Drawing.Size(183, 21)
+ Me.cboLeistungsbezeichnung.TabIndex = 8
+ '
+ 'Label4
+ '
+ Me.Label4.AutoSize = True
+ Me.Label4.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.Label4.Location = New System.Drawing.Point(14, 191)
+ Me.Label4.Name = "Label4"
+ Me.Label4.Size = New System.Drawing.Size(94, 15)
+ Me.Label4.TabIndex = 19
+ Me.Label4.Text = "Sachbearbeiter:"
+ '
+ 'Label5
+ '
+ Me.Label5.AutoSize = True
+ Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.Label5.Location = New System.Drawing.Point(14, 207)
+ Me.Label5.Name = "Label5"
+ Me.Label5.Size = New System.Drawing.Size(104, 15)
+ Me.Label5.TabIndex = 21
+ Me.Label5.Text = "Änderungsdatum:"
+ '
+ 'lblAenderungsdatum
+ '
+ Me.lblAenderungsdatum.AutoSize = True
+ Me.lblAenderungsdatum.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.lblAenderungsdatum.Location = New System.Drawing.Point(127, 207)
+ Me.lblAenderungsdatum.Name = "lblAenderungsdatum"
+ Me.lblAenderungsdatum.Size = New System.Drawing.Size(11, 15)
+ Me.lblAenderungsdatum.TabIndex = 22
+ Me.lblAenderungsdatum.Text = "-"
+ '
+ 'lblSachbearbeiter
+ '
+ Me.lblSachbearbeiter.AutoSize = True
+ Me.lblSachbearbeiter.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.5!)
+ Me.lblSachbearbeiter.Location = New System.Drawing.Point(127, 191)
+ Me.lblSachbearbeiter.Name = "lblSachbearbeiter"
+ Me.lblSachbearbeiter.Size = New System.Drawing.Size(11, 15)
+ Me.lblSachbearbeiter.TabIndex = 20
+ Me.lblSachbearbeiter.Text = "-"
+ '
+ 'cboSchnittstellennr
+ '
+ Me.cboSchnittstellennr._allowedValuesFreiText = Nothing
+ Me.cboSchnittstellennr._allowFreiText = False
+ Me.cboSchnittstellennr._value = ""
+ Me.cboSchnittstellennr.Enabled = False
+ Me.cboSchnittstellennr.FormattingEnabled = True
+ Me.cboSchnittstellennr.Location = New System.Drawing.Point(723, 130)
+ Me.cboSchnittstellennr.Name = "cboSchnittstellennr"
+ Me.cboSchnittstellennr.Size = New System.Drawing.Size(190, 21)
+ Me.cboSchnittstellennr.TabIndex = 18
+ '
+ 'pnl
+ '
+ Me.pnl.BackColor = System.Drawing.Color.White
+ Me.pnl.Controls.Add(Me.Label6)
+ Me.pnl.Controls.Add(Me.cboSchnittstellennr)
+ Me.pnl.Controls.Add(Me.Label9)
+ Me.pnl.Controls.Add(Me.lblAenderungsdatum)
+ Me.pnl.Controls.Add(Me.txtRgNr)
+ Me.pnl.Controls.Add(Me.lblSachbearbeiter)
+ Me.pnl.Controls.Add(Me.Label7)
+ Me.pnl.Controls.Add(Me.Label5)
+ Me.pnl.Controls.Add(Me.txtRgDatum)
+ Me.pnl.Controls.Add(Me.Label4)
+ Me.pnl.Controls.Add(Me.cbxAPI)
+ Me.pnl.Controls.Add(Me.Label1)
+ Me.pnl.Controls.Add(Me.cboLeistungsbezeichnung)
+ Me.pnl.Controls.Add(Me.txtLeistender)
+ Me.pnl.Controls.Add(Me.txtUSTBetragEUR)
+ Me.pnl.Controls.Add(Me.Label2)
+ Me.pnl.Controls.Add(Me.Label13)
+ Me.pnl.Controls.Add(Me.Label3)
+ Me.pnl.Controls.Add(Me.txtUmrechnungskurs)
+ Me.pnl.Controls.Add(Me.Label11)
+ Me.pnl.Controls.Add(Me.Label12)
+ Me.pnl.Controls.Add(Me.txtUSTBetrag)
+ Me.pnl.Controls.Add(Me.Label10)
+ Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill
+ Me.pnl.Location = New System.Drawing.Point(0, 30)
+ Me.pnl.Name = "pnl"
+ Me.pnl.Size = New System.Drawing.Size(1022, 239)
+ Me.pnl.TabIndex = 1
+ '
+ 'Panel1
+ '
+ Me.Panel1.Controls.Add(Me.btnBildAuf)
+ Me.Panel1.Controls.Add(Me.Button1)
+ Me.Panel1.Controls.Add(Me.scanLieferschein)
+ Me.Panel1.Dock = System.Windows.Forms.DockStyle.Right
+ Me.Panel1.Location = New System.Drawing.Point(923, 30)
+ Me.Panel1.Name = "Panel1"
+ Me.Panel1.Size = New System.Drawing.Size(99, 239)
+ Me.Panel1.TabIndex = 2
+ '
+ 'ustCntlUSTV_AntragPosition
+ '
+ Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
+ Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+ Me.Controls.Add(Me.Panel1)
+ Me.Controls.Add(Me.pnl)
+ Me.Controls.Add(Me.tbcntr)
+ Me.Controls.Add(Me.Panel2)
+ Me.Name = "ustCntlUSTV_AntragPosition"
+ Me.Size = New System.Drawing.Size(1300, 269)
+ Me.TabPage2.ResumeLayout(False)
+ Me.tbcntr.ResumeLayout(False)
+ Me.Panel2.ResumeLayout(False)
+ Me.Panel2.PerformLayout()
+ Me.pnl.ResumeLayout(False)
+ Me.pnl.PerformLayout()
+ Me.Panel1.ResumeLayout(False)
+ Me.ResumeLayout(False)
+
+ End Sub
+ Friend WithEvents scanLieferschein As VERAG_PROG_ALLGEMEIN.usrcntlPDFScan
+ Friend WithEvents TabPage2 As TabPage
+ Friend WithEvents scanSonstiges As VERAG_PROG_ALLGEMEIN.usrcntlPDFScanList
+ Friend WithEvents tbcntr As TabControl
+ Friend WithEvents cbxAPI As VERAG_PROG_ALLGEMEIN.MyCheckBoxValue
+ Friend WithEvents Label8 As Label
+ Friend WithEvents txtRgDatum As VERAG_PROG_ALLGEMEIN.MyTextBox
+ Friend WithEvents Label7 As Label
+ Friend WithEvents Panel2 As Panel
+ Friend WithEvents txtRgNr As VERAG_PROG_ALLGEMEIN.MyTextBox
+ Friend WithEvents Label9 As Label
+ Friend WithEvents Label1 As Label
+ Friend WithEvents btnBildAuf As Button
+ Friend WithEvents Button1 As Button
+ Friend WithEvents txtLeistender As VERAG_PROG_ALLGEMEIN.MyTextBox
+ Friend WithEvents Label2 As Label
+ Friend WithEvents Label3 As Label
+ Friend WithEvents Label6 As Label
+ Friend WithEvents Label10 As Label
+ Friend WithEvents txtUSTBetrag As VERAG_PROG_ALLGEMEIN.MyTextBox
+ Friend WithEvents Label11 As Label
+ Friend WithEvents txtUmrechnungskurs As VERAG_PROG_ALLGEMEIN.MyTextBox
+ Friend WithEvents Label12 As Label
+ Friend WithEvents txtUSTBetragEUR As VERAG_PROG_ALLGEMEIN.MyTextBox
+ Friend WithEvents Label13 As Label
+ Friend WithEvents cboLeistungsbezeichnung As VERAG_PROG_ALLGEMEIN.MyComboBox
+ Friend WithEvents Label4 As Label
+ Friend WithEvents Label5 As Label
+ Friend WithEvents lblAenderungsdatum As Label
+ Friend WithEvents lblSachbearbeiter As Label
+ Friend WithEvents cboSchnittstellennr As VERAG_PROG_ALLGEMEIN.MyComboBox
+ Friend WithEvents pnl As Panel
+ Friend WithEvents Panel1 As Panel
+End Class
diff --git a/SDL/USTV/ustCntlUSTV_AntragPosition.resx b/SDL/USTV/ustCntlUSTV_AntragPosition.resx
new file mode 100644
index 00000000..1af7de15
--- /dev/null
+++ b/SDL/USTV/ustCntlUSTV_AntragPosition.resx
@@ -0,0 +1,120 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ text/microsoft-resx
+
+
+ 2.0
+
+
+ System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
+
+
+ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
+
+
\ No newline at end of file
diff --git a/SDL/USTV/ustCntlUSTV_AntragPosition.vb b/SDL/USTV/ustCntlUSTV_AntragPosition.vb
new file mode 100644
index 00000000..d2ff4e11
--- /dev/null
+++ b/SDL/USTV/ustCntlUSTV_AntragPosition.vb
@@ -0,0 +1,88 @@
+Public Class ustCntlUSTV_AntragPosition
+ Public UStV_POS As VERAG_PROG_ALLGEMEIN.cUStVPositionen = Nothing
+
+ Public Event EV_PREV()
+ Public Event EV_NEXT()
+ Public Event CHANGED(UStVPo_ID)
+ Dim gridAktiv = False
+ Private Sub btnBildAuf_Click(sender As Object, e As EventArgs) Handles btnBildAuf.Click
+ RaiseEvent EV_PREV()
+ End Sub
+
+ Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
+ RaiseEvent EV_NEXT()
+ End Sub
+
+ Sub reset()
+ txtRgDatum._value = ""
+ txtRgNr._value = ""
+ End Sub
+
+ Sub setValues(UStV_POS As VERAG_PROG_ALLGEMEIN.cUStVPositionen)
+ gridAktiv = False
+ Me.UStV_POS = UStV_POS
+ cbxAPI.Checked = If(UStV_POS.UStVPo_Schnittstelle, False)
+ cboSchnittstellennr.changeItem(If(UStV_POS.UStVPo_SchnittstellenNr, ""))
+ txtRgDatum._value = If(UStV_POS.UStVPo_ReDat, "")
+ txtRgNr._value = If(UStV_POS.UStVPo_ReNr, "")
+ lblSachbearbeiter.Text = If(UStV_POS.UStVPo_Sachbearbeiter, "")
+ If UStV_POS.UStVPo_Zeitstempel IsNot Nothing Then lblAenderungsdatum.Text = CDate(UStV_POS.UStVPo_Zeitstempel).ToString("dd.MM.yyyy HH:mm")
+ txtLeistender.Text = If(UStV_POS.UStVPo_Leistender, "")
+ cboLeistungsbezeichnung.Text = If(UStV_POS.UStVPo_Leistungsbezeichnung, "")
+ txtUSTBetrag.Text = If(UStV_POS.UStVPo_USteuerbetrag, "")
+ txtUmrechnungskurs.Text = If(UStV_POS.UStVPo_Umrechnungskurs, "")
+ txtUSTBetragEUR.Text = If(UStV_POS.UStVPo_USteuerbetragEUR, "")
+ gridAktiv = True
+ End Sub
+
+ Sub getValues(ByRef UStV_POS)
+ If UStV_POS Is Nothing Then UStV_POS = New VERAG_PROG_ALLGEMEIN.cUStVPositionen
+ 'UStV_POS.
+ UStV_POS.UStVPo_Sachbearbeiter = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME
+ UStV_POS.UStVPo_Zeitstempel = Now
+ End Sub
+
+ Private Sub ustCntlUSTV_AntragPosition_KeyDown(sender As Object, e As PreviewKeyDownEventArgs) Handles Me.PreviewKeyDown
+ If e.KeyValue = Keys.PageDown Then
+ RaiseEvent EV_NEXT()
+ End If
+ If e.KeyValue = Keys.PageUp Then
+ RaiseEvent EV_PREV()
+ End If
+ End Sub
+
+ Private Sub txtUmrechnungskurs_TextChanged(sender As Object, e As EventArgs) Handles txtUmrechnungskurs.TextChanged
+ Dim gridAktivTMP = gridAktiv
+ gridAktiv = False
+ txtUSTBetragEUR._value = ""
+ If IsNumeric(txtUSTBetrag._value) AndAlso IsNumeric(txtUmrechnungskurs._value) Then
+ txtUSTBetragEUR._value = txtUSTBetrag._value * txtUmrechnungskurs._value
+ End If
+ gridAktiv = gridAktivTMP
+ End Sub
+
+ Function save()
+ getValues(UStV_POS)
+ MsgBox("TEST")
+ Return UStV_POS.save
+ End Function
+
+ Private Sub txtBestellung_TextChanged(sender As Object, e As EventArgs) Handles txtRgDatum.PropertyChanged, txtRgNr.TextChanged, cboLeistungsbezeichnung.SelectedIndexChanged,
+ txtLeistender.TextChanged, txtUSTBetrag.TextChanged, txtUSTBetrag.TextChanged, txtUSTBetragEUR.TextChanged ', cbxAPI.CheckedChanged, cboSchnittstellennr.SelectedIndexChanged
+
+ If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("MDM_Leistungen_bearbeiten", Me.FindForm) Then Exit Sub
+
+ If gridAktiv And Me.FindForm IsNot Nothing Then
+ 'If sender Is txtLieferung Then
+ ' If Not PROG.checkSDLNrPartnerKdNr(kdNr, SDLNr) Then MsgBox("Bitte geben Sie die Partner-Kundennummer im Kundenblatt oder im FM-ZOLL ein!")
+ 'End If
+ values_changed()
+ End If
+ End Sub
+ Sub values_changed()
+ lblSachbearbeiter.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME
+ lblAenderungsdatum.Text = Now.ToString("dd.MM.yyyy HH:mm")
+ ' If e.Column.ColumnName = "Sachbearbeiter" Or e.Column.ColumnName = "Änderungsdatum" Then Exit Sub
+ If save() Then RaiseEvent CHANGED(UStV_POS.UStVPo_ID)
+ End Sub
+End Class
diff --git a/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUSTVAntrag.vb b/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUSTVAntrag.vb
index 63dc0655..ea4c30fa 100644
--- a/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUSTVAntrag.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/USTV/cUSTVAntrag.vb
@@ -54,6 +54,8 @@ Public Class cUSTVAntrag
Property UStVAn_ErstattungsbetragEUR As Object = Nothing ' MONEY Default ((0)) NULL,
Property UStVAn_Sachbearbeiter As Object = Nothing ' NVARCHAR(15) NULL,
Property UStVAn_Zeitstempel As Object = Nothing ' DATETIME Default (getdate()) NULL,
+ Property UStVAn_Status As Object = Nothing
+ Property UStVAn_StatusText As Object = Nothing
Property POSITIONEN As New List(Of cUStVPositionen) '= Nothing
@@ -118,6 +120,8 @@ Public Class cUSTVAntrag
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStVAn_ErstattungsbetragEUR", UStVAn_ErstattungsbetragEUR)) ' MONEY Default ((0)) NULL,
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStVAn_Sachbearbeiter", UStVAn_Sachbearbeiter)) ' NVARCHAR(15) NULL,
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStVAn_Zeitstempel", UStVAn_Zeitstempel)) ' DATETIME Default (getdate()) NULL,
+ list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStVAn_Status", UStVAn_Status)) ' DATETIME Default (getdate()) NULL,
+ list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("UStVAn_StatusText", UStVAn_StatusText)) ' DATETIME Default (getdate()) NULL,
Return list
@@ -270,8 +274,76 @@ Public Class cUStVPositionen
Dim SQL As New SQL
- Sub New()
+ Sub New(UStVAn_ID, UStVPo_ID)
+ Me.UStVAn_ID = UStVAn_ID
+ Me.UStVPo_ID = UStVPo_ID
+
+ LOAD(UStVAn_ID, UStVPo_ID)
End Sub
+ Sub New()
+
+ End Sub
+
+
+ Public Sub LOAD(UStVAn_ID, UStVPo_ID)
+ Try
+
+ Using conn As SqlConnection = SQL.GetNewOpenConnectionFMZOLL()
+ Using cmd As New SqlCommand("SELECT * FROM [tblUStVPositionen] WHERE UStVAn_ID=@UStVAn_ID AND UStVPo_ID=@UStVPo_ID ", conn)
+ cmd.Parameters.AddWithValue("@UStVAn_ID", UStVAn_ID)
+ cmd.Parameters.AddWithValue("@UStVPo_ID", UStVPo_ID)
+ Dim dr = cmd.ExecuteReader()
+ If dr.Read Then
+ 'Dim l As New cOfferte
+ For Each i In getParameterList()
+ Dim propInfo As PropertyInfo = Me.GetType.GetProperty(i.Scalarvariable)
+ If dr.Item(i.Text) Is DBNull.Value Then
+ propInfo.SetValue(Me, Nothing)
+ Else
+ propInfo.SetValue(Me, dr.Item(i.Text))
+ End If
+ Next
+
+ End If
+ dr.Close()
+ End Using
+ End Using
+ Catch ex As Exception
+ MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+ End Try
+ End Sub
+
+
+ Public Function SAVE() As Boolean
+ Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+ Dim sqlstr = " BEGIN TRAN IF EXISTS(SELECT * FROM tblUStVPositionen WHERE UStVAn_ID=@UStVAn_ID AND UStVPo_ID=@UStVPo_ID) " &
+ " BEGIN " & getUpdateCmd() & " END " &
+ " Else " &
+ " BEGIN " & getInsertCmd() & " END " &
+ " commit tran "
+
+ Return SQL.doSQLVarList(sqlstr, "FMZOLL", , list)
+ End Function
+
+ Public Function getUpdateCmd() As String
+ Try
+ Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+
+ Dim str As String = ""
+ For Each i In list
+ If Not i.isPrimaryParam Then
+ str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
+ End If
+ Next
+ str = str.Substring(0, str.Length - 1) 'wg. ','
+ Return (" UPDATE [tblUStVPositionen] SET " & str & " WHERE UStVAn_ID=@UStVAn_ID AND UStVPo_ID=@UStVPo_ID")
+
+ Catch ex As Exception
+ MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
+ End Try
+ Return ""
+ End Function
diff --git a/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsnummern.vb b/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsnummern.vb
index 7d7d8cf6..9741afbd 100644
--- a/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsnummern.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsnummern.vb
@@ -72,6 +72,14 @@ Public Class cRechnungsnummern
Return LfdRechnungsNr
End Function
+ Public Function DECREASE_RGNR() As Integer
+ If LfdRechnungsNr > 0 Then
+ LfdRechnungsNr -= 1
+ End If
+ SAVE()
+ Return LfdRechnungsNr
+ End Function
+
Public Function CHECK_RGNR() As Integer ' Prüfung, ob RgNr schon vergeben wurde --> dann +1, bis freie Nr.
Dim increased = False