MS Divers Globix,EDMI Service etc

Modules.EDMIAPI/Client.vb

@@ -281,4 +281,13 @@ Public Class Client
             Throw ex
         End Try
     End Function
+    Public Function NewFileStoreObject(IDB_OBJ_ID As Long, Optional pStoreType As String = "", Optional pDate As String = "") As String
+        Try
+            Dim oResponse = _channel.New_FileStore_Object(IDB_OBJ_ID, pStoreType, pDate)
+            Return oResponse
+        Catch ex As Exception
+            _logger.Error(ex)
+            Throw ex
+        End Try
+    End Function
 End Class