neu

initATLASAufschubkonten/VERAG_Interface/cVERAG_out_ncts.vb

@@ -661,8 +661,8 @@
                 Catch ex As Exception
                     VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & vbNewLine & "BezugsNr: " & NCTS_TMP.ncts_ObjectName, System.Reflection.MethodInfo.GetCurrentMethod.Name)
                 End Try
-
             End If
+
             'If XMLFilePath = "" Then
             '    Dim dir = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getRootDir() & "ZOLL_SCHNITTSTELLEN\VERAG\NCTS_OUT\DY\" & Now.Year & "\" & Now.ToShortDateString & "\"
             '    If Not IO.Directory.Exists(dir) Then IO.Directory.CreateDirectory(dir)