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