SQL

Aviso/frmHauptfenster.vb

@@ -283,6 +283,12 @@ Public Class frmHauptfenster
         pnlSearch.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor
         UsrCntlBenachrichtigungen1.Panel3.BackColor = VERAG_PROG_ALLGEMEIN.cAllgemein.cSPECIFIC.FIRMA_BgColor
 
+
+        If VERAG_PROG_ALLGEMEIN.cAllgemein.SQLGUIDE01_USED Then
+            Panel1.BackColor = Color.Red
+
+        End If
+
         UpdateUpdater.Interval = 5000
         UpdateUpdater.Enabled = True
 
@@ -3488,7 +3494,7 @@ ELSE_ATILLA:
 
         Dim path = SDL.cFinanzOnlineWebService.genUID_Formular("ATU74813856")
         If path <> "" Then
-            process.Start(path)
+            Process.Start(path)
         End If
         'If SDL.cFinanzOnlineWebService.Call_Web_Service_MethodUID_Abfrage_NEU2020(firma, "ATU74813856") = 0 Then
         '    MsgBox("HURRA2" & vbNewLine & firma)
@@ -5115,7 +5121,8 @@ ELSE_ATILLA:
     End Sub
 
     Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
-
+        'cATEZ_Greenpulse_CBAM_CostCalculation.Test()
+        Exit Sub
 
         ' VERAG_PROG_ALLGEMEIN.cProgramFunctions.SendMessageToAviso("OpenAvisoSnd_1445868")