Átállás 17.2.3-ra

Related Work Items: #123
This commit is contained in:
2017-12-02 16:09:26 +01:00
parent 2b2f1b201c
commit 9cca882b34
201 changed files with 16991 additions and 3617 deletions
@@ -24,30 +24,30 @@ Public Class OrderInToDisposeVC
MyBase.OnActivated()
If View.Id = "OrderInToDispose_DetailView" Then
Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", False)
Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", False)
Frame.GetController(Of CloneObjectViewController)().Active.SetItemValue("", False)
Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", False)
Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", False)
Frame.GetController(Of CloneObjectViewController)()?.Active.SetItemValue("", False)
End If
If View.Id = "OrderInToDispose_OrderInTo_ListView" Then
Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", False)
Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", False)
Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", False)
Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", False)
Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", False)
Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", False)
Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", False)
Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", False)
End If
End Sub
Protected Overrides Sub OnDeactivated()
MyBase.OnDeactivated()
If View.Id = "OrderInToDispose_DetailView" Then
Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", True)
Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", True)
Frame.GetController(Of CloneObjectViewController)().Active.SetItemValue("", True)
Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", True)
Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", True)
Frame.GetController(Of CloneObjectViewController)()?.Active.SetItemValue("", True)
End If
If View.Id = "OrderInToDispose_OrderInTo_ListView" Then
Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", True)
Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", True)
Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", True)
Frame.GetController(Of CloneObjectViewController)().Active.SetItemValue("", True)
Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", True)
Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", True)
Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", True)
Frame.GetController(Of CloneObjectViewController)()?.Active.SetItemValue("", True)
End If
End Sub
@@ -78,7 +78,7 @@ Public Class OrderInToDisposeVC
Dim _OrderOutRows As OrderOutRows = Nothing
Dim _OrderInTo As OrderInTo
Frame.GetController(Of Validation.PersistenceValidationController).Active.SetItemValue("", False)
Frame.GetController(Of Validation.PersistenceValidationController)?.Active.SetItemValue("", False)
If _OrderOutHeader IsNot Nothing Then
For Each _OrderInTo In _OrderInTo_ListEditor.ListView.SelectedObjects
If _OrderInTo.OrderOutRows Is Nothing Then
@@ -105,7 +105,7 @@ Public Class OrderInToDisposeVC
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.OkOnly)
Finally
Frame.GetController(Of Validation.PersistenceValidationController).Active.SetItemValue("", True)
Frame.GetController(Of Validation.PersistenceValidationController)?.Active.SetItemValue("", True)
End Try
End Sub