TC

2024-05-28 19:57:47 +02:00
parent 78af0f0c5e
commit d1c19098c9
3 changed files with 32 additions and 3 deletions
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -523,6 +523,14 @@ Public Class frmStartOptions
                Dim f As New frmInfo(PARAM)
                f.Show()
                VERAG_PROG_ALLGEMEIN.cSyska_Interface.genDatensatz_Buchungen(24,, "", True)
+                closeMe()
+                '------------------------------
+            Case "AAS" 'Aviso Alert System
+                VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
+                Dim f As New frmInfo(PARAM)
+                f.Show()
+                doAASVermerke_Schwelle()
+
                closeMe()
                '------------------------------
            Case Else