ms

app/DD-Record-Organizer/ClassDOC_SEARCH.vb

@@ -302,8 +302,12 @@ Public Class ClassDOC_SEARCH
                             Width = 200
                         End If
                         'Die Spalte definieren
-                        DTGrid.Columns.Add(ColumnName)
-                        ColCount += 1
+                        Try
+                            DTGrid.Columns.Add(ColumnName)
+                            ColCount += 1
+                        Catch ex As Exception
+                            ClassLogger.Add(String.Format("Unexpected Error in DTGrid.Columns.Add({0}) - CONSTR_DET_ID: {1} ", ColumnName, CURRENT_CONSTRUCTOR_DETAIL_ID) & ex.Message)
+                        End Try
                     Next
                     'Jetzt das Array zusammenbauen um die Spaltenwerte zu erhalten
                     For Each rw As DataRow In DT_WINDREAM_RESULTLIST.Rows
@@ -311,6 +315,7 @@ Public Class ClassDOC_SEARCH
                     Next
                 End If
             Catch ex As Exception
+                ClassLogger.Add("Unexpected Error in Construct Datatable: " & ex.Message)
                 MsgBox("Unexpected Error in Construct Datatable for GridResult: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
             End Try
             elapsed = sw.Elapsed.TotalSeconds
@@ -412,6 +417,7 @@ Public Class ClassDOC_SEARCH
             If LogErrorsOnly = False Then ClassLogger.Add(" >> Run Get_DOC_RESULTTABLE took " & Format(elapsed, "0.000000000") & " seconds", False)
         Catch ex As Exception
             MsgBox("Unexpected Error in Get_DOC_RESULTTABLE: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
+            ClassLogger.Add("Unexpected Error in Get_DOC_RESULTTABLE: " & ex.Message)
             Return Nothing
         End Try
     End Function