GG public

SDL/Formulare/KDFormulare/FormulareBaukasten/usrcntlGestellungsgarantie.Designer.vb

@@ -129,10 +129,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtEmail._DateTimeOnly = False
         Me.txtEmail._numbersOnly = False
         Me.txtEmail._numbersOnlyKommastellen = ""
+        Me.txtEmail._numbersOnlyTrennzeichen = True
         Me.txtEmail._Prozent = False
         Me.txtEmail._ShortDateNew = False
         Me.txtEmail._ShortDateOnly = False
         Me.txtEmail._TimeOnly = False
+        Me.txtEmail._TimeOnly_Seconds = False
         Me.txtEmail._value = Nothing
         Me.txtEmail._Waehrung = False
         Me.txtEmail._WaehrungZeichen = True
@@ -150,10 +152,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtFax._DateTimeOnly = False
         Me.txtFax._numbersOnly = False
         Me.txtFax._numbersOnlyKommastellen = ""
+        Me.txtFax._numbersOnlyTrennzeichen = True
         Me.txtFax._Prozent = False
         Me.txtFax._ShortDateNew = False
         Me.txtFax._ShortDateOnly = False
         Me.txtFax._TimeOnly = False
+        Me.txtFax._TimeOnly_Seconds = False
         Me.txtFax._value = Nothing
         Me.txtFax._Waehrung = False
         Me.txtFax._WaehrungZeichen = True
@@ -171,10 +175,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtTel._DateTimeOnly = False
         Me.txtTel._numbersOnly = False
         Me.txtTel._numbersOnlyKommastellen = ""
+        Me.txtTel._numbersOnlyTrennzeichen = True
         Me.txtTel._Prozent = False
         Me.txtTel._ShortDateNew = False
         Me.txtTel._ShortDateOnly = False
         Me.txtTel._TimeOnly = False
+        Me.txtTel._TimeOnly_Seconds = False
         Me.txtTel._value = Nothing
         Me.txtTel._Waehrung = False
         Me.txtTel._WaehrungZeichen = True
@@ -192,10 +198,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtAnsprechpartner._DateTimeOnly = False
         Me.txtAnsprechpartner._numbersOnly = False
         Me.txtAnsprechpartner._numbersOnlyKommastellen = ""
+        Me.txtAnsprechpartner._numbersOnlyTrennzeichen = True
         Me.txtAnsprechpartner._Prozent = False
         Me.txtAnsprechpartner._ShortDateNew = False
         Me.txtAnsprechpartner._ShortDateOnly = False
         Me.txtAnsprechpartner._TimeOnly = False
+        Me.txtAnsprechpartner._TimeOnly_Seconds = False
         Me.txtAnsprechpartner._value = Nothing
         Me.txtAnsprechpartner._Waehrung = False
         Me.txtAnsprechpartner._WaehrungZeichen = True
@@ -213,10 +221,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtAdresse2._DateTimeOnly = False
         Me.txtAdresse2._numbersOnly = False
         Me.txtAdresse2._numbersOnlyKommastellen = ""
+        Me.txtAdresse2._numbersOnlyTrennzeichen = True
         Me.txtAdresse2._Prozent = False
         Me.txtAdresse2._ShortDateNew = False
         Me.txtAdresse2._ShortDateOnly = False
         Me.txtAdresse2._TimeOnly = False
+        Me.txtAdresse2._TimeOnly_Seconds = False
         Me.txtAdresse2._value = Nothing
         Me.txtAdresse2._Waehrung = False
         Me.txtAdresse2._WaehrungZeichen = True
@@ -234,10 +244,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtAdresse1._DateTimeOnly = False
         Me.txtAdresse1._numbersOnly = False
         Me.txtAdresse1._numbersOnlyKommastellen = ""
+        Me.txtAdresse1._numbersOnlyTrennzeichen = True
         Me.txtAdresse1._Prozent = False
         Me.txtAdresse1._ShortDateNew = False
         Me.txtAdresse1._ShortDateOnly = False
         Me.txtAdresse1._TimeOnly = False
+        Me.txtAdresse1._TimeOnly_Seconds = False
         Me.txtAdresse1._value = Nothing
         Me.txtAdresse1._Waehrung = False
         Me.txtAdresse1._WaehrungZeichen = True
@@ -255,10 +267,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtFirma._DateTimeOnly = False
         Me.txtFirma._numbersOnly = False
         Me.txtFirma._numbersOnlyKommastellen = ""
+        Me.txtFirma._numbersOnlyTrennzeichen = True
         Me.txtFirma._Prozent = False
         Me.txtFirma._ShortDateNew = False
         Me.txtFirma._ShortDateOnly = False
         Me.txtFirma._TimeOnly = False
+        Me.txtFirma._TimeOnly_Seconds = False
         Me.txtFirma._value = Nothing
         Me.txtFirma._Waehrung = False
         Me.txtFirma._WaehrungZeichen = True
@@ -353,10 +367,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtBestimmungszollamt._DateTimeOnly = False
         Me.txtBestimmungszollamt._numbersOnly = False
         Me.txtBestimmungszollamt._numbersOnlyKommastellen = ""
+        Me.txtBestimmungszollamt._numbersOnlyTrennzeichen = True
         Me.txtBestimmungszollamt._Prozent = False
         Me.txtBestimmungszollamt._ShortDateNew = False
         Me.txtBestimmungszollamt._ShortDateOnly = False
         Me.txtBestimmungszollamt._TimeOnly = False
+        Me.txtBestimmungszollamt._TimeOnly_Seconds = False
         Me.txtBestimmungszollamt._value = Nothing
         Me.txtBestimmungszollamt._Waehrung = False
         Me.txtBestimmungszollamt._WaehrungZeichen = True
@@ -384,10 +400,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtEORI._DateTimeOnly = False
         Me.txtEORI._numbersOnly = False
         Me.txtEORI._numbersOnlyKommastellen = ""
+        Me.txtEORI._numbersOnlyTrennzeichen = True
         Me.txtEORI._Prozent = False
         Me.txtEORI._ShortDateNew = False
         Me.txtEORI._ShortDateOnly = False
         Me.txtEORI._TimeOnly = False
+        Me.txtEORI._TimeOnly_Seconds = False
         Me.txtEORI._value = Nothing
         Me.txtEORI._Waehrung = False
         Me.txtEORI._WaehrungZeichen = True
@@ -414,10 +432,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtZulassungsnummer1._DateTimeOnly = False
         Me.txtZulassungsnummer1._numbersOnly = False
         Me.txtZulassungsnummer1._numbersOnlyKommastellen = ""
+        Me.txtZulassungsnummer1._numbersOnlyTrennzeichen = True
         Me.txtZulassungsnummer1._Prozent = False
         Me.txtZulassungsnummer1._ShortDateNew = False
         Me.txtZulassungsnummer1._ShortDateOnly = False
         Me.txtZulassungsnummer1._TimeOnly = False
+        Me.txtZulassungsnummer1._TimeOnly_Seconds = False
         Me.txtZulassungsnummer1._value = Nothing
         Me.txtZulassungsnummer1._Waehrung = False
         Me.txtZulassungsnummer1._WaehrungZeichen = True
@@ -465,10 +485,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtZulassungsnummer2._DateTimeOnly = False
         Me.txtZulassungsnummer2._numbersOnly = False
         Me.txtZulassungsnummer2._numbersOnlyKommastellen = ""
+        Me.txtZulassungsnummer2._numbersOnlyTrennzeichen = True
         Me.txtZulassungsnummer2._Prozent = False
         Me.txtZulassungsnummer2._ShortDateNew = False
         Me.txtZulassungsnummer2._ShortDateOnly = False
         Me.txtZulassungsnummer2._TimeOnly = False
+        Me.txtZulassungsnummer2._TimeOnly_Seconds = False
         Me.txtZulassungsnummer2._value = Nothing
         Me.txtZulassungsnummer2._Waehrung = False
         Me.txtZulassungsnummer2._WaehrungZeichen = True
@@ -496,10 +518,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtAnmerkung1._DateTimeOnly = False
         Me.txtAnmerkung1._numbersOnly = False
         Me.txtAnmerkung1._numbersOnlyKommastellen = ""
+        Me.txtAnmerkung1._numbersOnlyTrennzeichen = True
         Me.txtAnmerkung1._Prozent = False
         Me.txtAnmerkung1._ShortDateNew = False
         Me.txtAnmerkung1._ShortDateOnly = False
         Me.txtAnmerkung1._TimeOnly = False
+        Me.txtAnmerkung1._TimeOnly_Seconds = False
         Me.txtAnmerkung1._value = Nothing
         Me.txtAnmerkung1._Waehrung = False
         Me.txtAnmerkung1._WaehrungZeichen = True
@@ -517,10 +541,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtAnmerkung2._DateTimeOnly = False
         Me.txtAnmerkung2._numbersOnly = False
         Me.txtAnmerkung2._numbersOnlyKommastellen = ""
+        Me.txtAnmerkung2._numbersOnlyTrennzeichen = True
         Me.txtAnmerkung2._Prozent = False
         Me.txtAnmerkung2._ShortDateNew = False
         Me.txtAnmerkung2._ShortDateOnly = False
         Me.txtAnmerkung2._TimeOnly = False
+        Me.txtAnmerkung2._TimeOnly_Seconds = False
         Me.txtAnmerkung2._value = Nothing
         Me.txtAnmerkung2._Waehrung = False
         Me.txtAnmerkung2._WaehrungZeichen = True
@@ -538,10 +564,12 @@ Partial Class usrcntlGestellungsgarantie
         Me.txtAnmerkung3._DateTimeOnly = False
         Me.txtAnmerkung3._numbersOnly = False
         Me.txtAnmerkung3._numbersOnlyKommastellen = ""
+        Me.txtAnmerkung3._numbersOnlyTrennzeichen = True
         Me.txtAnmerkung3._Prozent = False
         Me.txtAnmerkung3._ShortDateNew = False
         Me.txtAnmerkung3._ShortDateOnly = False
         Me.txtAnmerkung3._TimeOnly = False
+        Me.txtAnmerkung3._TimeOnly_Seconds = False
         Me.txtAnmerkung3._value = Nothing
         Me.txtAnmerkung3._Waehrung = False
         Me.txtAnmerkung3._WaehrungZeichen = True
@@ -602,10 +630,7 @@ Partial Class usrcntlGestellungsgarantie
 
     End Sub
     Friend WithEvents lbl As System.Windows.Forms.Label
-    Friend WithEvents txtFirma As VERAG_PROG_ALLGEMEIN.MyTextBox
-    Friend WithEvents txtAdresse1 As VERAG_PROG_ALLGEMEIN.MyTextBox
     Friend WithEvents Label1 As System.Windows.Forms.Label
-    Friend WithEvents txtAdresse2 As VERAG_PROG_ALLGEMEIN.MyTextBox
     Friend WithEvents txtAnsprechpartner As VERAG_PROG_ALLGEMEIN.MyTextBox
     Friend WithEvents Label2 As System.Windows.Forms.Label
     Friend WithEvents txtFax As VERAG_PROG_ALLGEMEIN.MyTextBox
@@ -621,10 +646,7 @@ Partial Class usrcntlGestellungsgarantie
     Friend WithEvents btnUp As System.Windows.Forms.Button
     Friend WithEvents btnDel As System.Windows.Forms.Button
     Friend WithEvents Label12 As System.Windows.Forms.Label
-    Friend WithEvents cboSprache As VERAG_PROG_ALLGEMEIN.MyComboBox
-    Friend WithEvents txtBestimmungszollamt As VERAG_PROG_ALLGEMEIN.MyTextBox
     Friend WithEvents Label3 As System.Windows.Forms.Label
-    Friend WithEvents txtEORI As VERAG_PROG_ALLGEMEIN.MyTextBox
     Friend WithEvents Label7 As System.Windows.Forms.Label
     Friend WithEvents txtZulassungsnummer1 As VERAG_PROG_ALLGEMEIN.MyTextBox
     Friend WithEvents Label8 As System.Windows.Forms.Label
@@ -635,4 +657,10 @@ Partial Class usrcntlGestellungsgarantie
     Friend WithEvents txtAnmerkung1 As VERAG_PROG_ALLGEMEIN.MyTextBox
     Friend WithEvents txtAnmerkung2 As VERAG_PROG_ALLGEMEIN.MyTextBox
     Friend WithEvents txtAnmerkung3 As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Public WithEvents txtFirma As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Public WithEvents txtAdresse1 As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Public WithEvents txtAdresse2 As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Public WithEvents cboSprache As VERAG_PROG_ALLGEMEIN.MyComboBox
+    Public WithEvents txtBestimmungszollamt As VERAG_PROG_ALLGEMEIN.MyTextBox
+    Public WithEvents txtEORI As VERAG_PROG_ALLGEMEIN.MyTextBox
 End Class

SDL/Formulare/KDFormulare/FormulareBaukasten/usrcntlGestellungsgarantie.vb

@@ -12,6 +12,7 @@
         initKdNR(kdnr)
     End Sub
 
+
     Sub initControlsHandler()
         For Each c In Me.Controls
             Select Case c.GetType.ToString