From 37234cd74786fa0ab5724f03929800361c6e102b Mon Sep 17 00:00:00 2001
From: "d.breimaier" <d.breimaier@verag.ag>
Date: Tue, 22 Oct 2024 16:03:28 +0200
Subject: [PATCH] SummenBerechnen

---
 initATLASAufschubkonten/frmStartOptions.vb | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/initATLASAufschubkonten/frmStartOptions.vb b/initATLASAufschubkonten/frmStartOptions.vb
index 029a3ea..39e27be 100644
--- a/initATLASAufschubkonten/frmStartOptions.vb
+++ b/initATLASAufschubkonten/frmStartOptions.vb
@@ -694,6 +694,13 @@ Public Class frmStartOptions
                     API.UPDTAE_OK(,, PARAM)
                 End If
 
+            Case "USTVA_SUMMEM_BERECHNEN"
+                VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM = False
+                Dim ok As Boolean = False
+                If cMDMFunctionsAllgemein.Update_UStVASummenNeuBerechnen() Then
+                    ok = cMDMFunctionsAllgemein.UStVAKunden_SummenNeuBerechnen()
+                End If
+                closeMe()
 
             Case Else
                 'Nur bei manuellem Start wird der fehler ausgegeben