diff --git a/MultiTool.Common/Documents/DocumentLoader.vb b/MultiTool.Common/Documents/DocumentLoader.vb
index 4a4a6c7..5184bff 100644
--- a/MultiTool.Common/Documents/DocumentLoader.vb
+++ b/MultiTool.Common/Documents/DocumentLoader.vb
@@ -9,6 +9,7 @@ Imports MultiTool.Common.Winline.Entities
Imports MultiTool.Common.Constants
Imports DigitalData.Modules.Database
Imports DevExpress.Utils.CommonDialogs
+Imports DigitalData.Modules.Base
Namespace Documents
Public Class DocumentLoader
@@ -542,7 +543,7 @@ Namespace Documents
If IsNothing(oReferencedField) = False Then
Dim oRawValue = oReferencedField.Value?.GetValue(oSubKey)
- Dim oValue As String = Utils.NotNull(oRawValue, String.Empty)
+ Dim oValue As String = ObjectEx.NotNull(oRawValue, String.Empty)
If oValue <> String.Empty Then
oField.Value.SetExternalValue(oValue)
diff --git a/MultiTool.Common/MultiTool.Common.vbproj b/MultiTool.Common/MultiTool.Common.vbproj
index a1799d9..96ef7b9 100644
--- a/MultiTool.Common/MultiTool.Common.vbproj
+++ b/MultiTool.Common/MultiTool.Common.vbproj
@@ -63,18 +63,10 @@
False
..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll
-
- False
- ..\..\DDModules\Filesystem\bin\Debug\DigitalData.Modules.Filesystem.dll
-
False
..\..\DDModules\Interfaces\bin\Debug\DigitalData.Modules.Interfaces.dll
-
- False
- ..\..\DDModules\Language\bin\Debug\DigitalData.Modules.Language.dll
-
False
..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll
diff --git a/MultiTool.Common/Templates/Template.vb b/MultiTool.Common/Templates/Template.vb
index 2695189..2336101 100644
--- a/MultiTool.Common/Templates/Template.vb
+++ b/MultiTool.Common/Templates/Template.vb
@@ -1,4 +1,4 @@
-Imports DigitalData.Modules.Language
+Imports DigitalData.Modules.Base
Imports MultiTool.Common.Winline.WinlineData
Namespace Templates
@@ -95,8 +95,8 @@ Namespace Templates
Public Function GetParameter(pName As String) As String
- Dim oParam1 As String = Utils.NotNull(Parameter1, String.Empty)
- Dim oParam2 As String = Utils.NotNull(Parameter2, String.Empty)
+ Dim oParam1 As String = ObjectEx.NotNull(Parameter1, String.Empty)
+ Dim oParam2 As String = ObjectEx.NotNull(Parameter2, String.Empty)
Dim oParamValue1 = Parameters.TryGet(oParam1, pName)
Dim oParamValue2 = Parameters.TryGet(oParam2, pName)
diff --git a/MultiTool.Form/MultiTool.Form.vbproj b/MultiTool.Form/MultiTool.Form.vbproj
index ad984e6..e7d839e 100644
--- a/MultiTool.Form/MultiTool.Form.vbproj
+++ b/MultiTool.Form/MultiTool.Form.vbproj
@@ -112,14 +112,6 @@
False
..\..\DDModules\Database\bin\Debug\DigitalData.Modules.Database.dll
-
- False
- ..\..\DDModules\Filesystem\bin\Debug\DigitalData.Modules.Filesystem.dll
-
-
- False
- ..\..\DDModules\Language\bin\Debug\DigitalData.Modules.Language.dll
-
False
..\..\DDModules\Logging\bin\Debug\DigitalData.Modules.Logging.dll
diff --git a/MultiTool.Form/frmRowEditor.vb b/MultiTool.Form/frmRowEditor.vb
index 2639841..f7bcaa2 100644
--- a/MultiTool.Form/frmRowEditor.vb
+++ b/MultiTool.Form/frmRowEditor.vb
@@ -5,8 +5,8 @@ Imports MultiTool.Common.Winline
Imports MultiTool.Common.Winline.Entities
Imports MultiTool.Common.Templates
Imports MultiTool.Common.Constants
-Imports DigitalData.Modules.Language
Imports DigitalData.Modules.Logging
+Imports DigitalData.Modules.Base
Imports DevExpress.XtraEditors
Imports DevExpress.XtraEditors.Repository
Imports DevExpress.XtraEditors.Controls
@@ -167,7 +167,7 @@ Public Class frmRowEditor
End If
Dim oFieldValue As FieldValue = oField.Value
- Dim oValueFromGrid As String = Utils.NotNull(oRow.Item(COL_VALUE_FINAL), String.Empty)
+ Dim oValueFromGrid As String = ObjectEx.NotNull(oRow.Item(COL_VALUE_FINAL), String.Empty)
' Do the dirtiest date validation of all times
If oField.Value.DataType = ColumnType.Date And oValueFromGrid.Length > 0 Then
@@ -293,7 +293,7 @@ Public Class frmRowEditor
Private Sub GridView1_CustomDrawCell(sender As Object, e As DevExpress.XtraGrid.Views.Base.RowCellCustomDrawEventArgs) Handles GridView1.CustomDrawCell
Dim oDataRow As DataRow = GridView1.GetDataRow(e.RowHandle)
Dim oKey As String = oDataRow.Item(COL_KEY)
- Dim oValue As String = Utils.NotNull(oDataRow.Item(COL_VALUE_FINAL), String.Empty)
+ Dim oValue As String = ObjectEx.NotNull(oDataRow.Item(COL_VALUE_FINAL), String.Empty)
Dim oColumn = _Table.Columns.
Where(Function(c) c.Name = oKey).
SingleOrDefault()