Patterns: Add Custom module

Patterns/Patterns2.vb

@@ -139,6 +139,23 @@ Public Class Patterns2
         End Try
     End Function
 
+    Public Function ReplaceCustomValues(pInput As String, pCustomValues As Dictionary(Of String, String)) As String
+        Logger.Debug("Replacing Custom Values")
+
+        Dim oResult = pInput
+
+        Try
+            Dim oCustom = New Modules.Custom(LogConfig)
+            oResult = oCustom.Replace(oResult, pCustomValues)
+
+            Return oResult
+        Catch ex As Exception
+            Logger.Warn("Error occurred while replacing Globix Values")
+            Logger.Error(ex)
+            Return oResult
+        End Try
+    End Function
+
 #Region "Helper Functions"
     ''' <summary>
     ''' Wraps a pattern-type and -value in the common format: {#type#value}