Asfinag, Essensbestellungen

SDL/mdm/frmMDMDatenverarbetiung.vb

@@ -1122,15 +1122,15 @@ Public Class frmMDMDatenverarbetiung
 
 
             'AT ---> Gruppiert
-            If dtAT IsNot Nothing AndAlso dtAT.Rows.Count > 0 Then
-                If dt Is Nothing OrElse dt.Rows.Count = 0 Then
-                    dt = dtAT
-                Else
-                    For Each r In dtAT.Rows
-                        dt.Rows.Add({r(0), r(1), r(2), r(3), r(4), r(5), r(6), r(7), r(8), r(9)})
-                    Next
-                End If
-            End If
+            'If dtAT IsNot Nothing AndAlso dtAT.Rows.Count > 0 Then
+            '    If dt Is Nothing OrElse dt.Rows.Count = 0 Then
+            '        dt = dtAT
+            '    Else
+            '        For Each r In dtAT.Rows
+            '            dt.Rows.Add({r(0), r(1), r(2), r(3), r(4), r(5), r(6), r(7), r(8), r(9)})
+            '        Next
+            '    End If
+            'End If
 
             Dim connectionString = ""
             If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then