EDMI: Move Object Status changes into Service

GUIs.Common/ObjectPropertyDialog/ctrlObjectPropertyDialog.vb

@@ -63,12 +63,6 @@ Public Class ctrlObjectPropertyDialog
                     .Language = Environment.User.Language,
                     .Username = Environment.User.UserName
                 })
-
-                Logger.Info("Updating Object State for Object [{0}]", ObjectId)
-                Await Client.SetObjectStateAsync(ObjectId, FileStore.OBJECT_STATE_METADATA_CHANGED, New Options.SetObjectStateOptions With {
-                    .Language = Environment.User.Language,
-                    .Username = Environment.User.UserName
-                })
             Next
 
             ErrorHandler.ShowInfoMessage($"{Changes.Count} Änderungen gespeichert!")
@@ -92,6 +86,10 @@ Public Class ctrlObjectPropertyDialog
     End Function
 
     Public Async Function LoadObject(pObjectId As Long, pEntityId As Long) As Task(Of Boolean)
+        If pObjectId = 0 Then
+            Return True
+        End If
+
         IsLoading = True
         Dim oLoadingHandle = SplashScreenManager.ShowOverlayForm(Me)