From 4d68402224fcac58d06eb2e69642ffc21d79744d Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Tue, 10 Mar 2026 08:44:02 +0100 Subject: [PATCH] cWorker --- initATLASAufschubkonten/cWorker_Verwahrung.vb | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/initATLASAufschubkonten/cWorker_Verwahrung.vb b/initATLASAufschubkonten/cWorker_Verwahrung.vb index cb28f2b..1b1746e 100644 --- a/initATLASAufschubkonten/cWorker_Verwahrung.vb +++ b/initATLASAufschubkonten/cWorker_Verwahrung.vb @@ -646,14 +646,11 @@ Anzeige: VERAG_PROG_ALLGEMEIN.cProgramFunctions.sendMail("verwahrung@verag.ag", IIf(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, "TEST-", "") & "Verwahrungseingang aus DAKOSY - " & Now().ToShortDateString, InfoText,,,,, "d.breimaier@verag.ag") End If - - 'VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False Return True Catch ex As Exception VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name) - VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False Return False Finally @@ -803,7 +800,6 @@ Anzeige: Catch ex As Exception VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name) - 'VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False Finally VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False @@ -818,10 +814,11 @@ Anzeige: Next + VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False End If - VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False + End If End Sub