NCTS_TR ATEZ Anpassungen

initATLASAufschubkonten/frmStartOptions.vb

@@ -3252,4 +3252,20 @@ Public Class frmStartOptions
         Catch ex As Exception : VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodBase.GetCurrentMethod.Name) : End Try
         Me.Cursor = Cursors.Default
     End Sub
+
+    Private Sub LinkLabel40_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel40.LinkClicked
+        Me.Visible = False
+        VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = True
+        Dim f As New frmTRNCTS_NachrichtenVerarbeitung_ATEZ
+        f.ShowDialog()
+        Me.Visible = True
+    End Sub
+
+    Private Sub LinkLabel39_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel39.LinkClicked
+        Me.Visible = False
+        VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
+        Dim f As New frmTRNCTS_NachrichtenVerarbeitung_ATEZ
+        f.ShowDialog()
+        Me.Visible = True
+    End Sub
 End Class