ivanszabo/Nuvolar
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Átállás 17.2.3-ra

Browse Source 
Related Work Items: #123
This commit is contained in:
ivanszabo
2017-12-02 16:09:26 +01:00
parent 2b2f1b201c
commit 9cca882b34
201 changed files with 16991 additions and 3617 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Nuvolar.Module.Win/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Compensation/GLCompensationVC.vb
+5 -5
View File
@@ -27,14 +27,14 @@ Public Class GLCompensationVC
Frame.GetController(Of WinModificationsController).ModificationsHandlingMode = SystemModule.ModificationsHandlingMode.AutoCommit
End If
If View.Id = "GLHeader_GLRows_ListView_Compensation" Then
Frame.GetController(Of ToolbarVisibilityController).Active.SetItemValue("", False)
Frame.GetController(Of ToolbarVisibilityController)?.Active.SetItemValue("", False)
Frame.GetController(Of ToolbarVisibilityController).SetToolbarVisibility(False)
End If
End Sub
Protected Overrides Sub OnDeactivated()
MyBase.OnDeactivated()
If View.Id = "GLCompensation_DetailView" Or View.Id = "GLCompensation_GLRows_ListView" Then
Frame.GetController(Of ToolbarVisibilityController)().Active.SetItemValue("", True)
Frame.GetController(Of ToolbarVisibilityController)()?.Active.SetItemValue("", True)
End If
If View.Id = "GLHeader_GLRows_ListView_Compensation" Then
Frame.GetController(Of ToolbarVisibilityController).SetToolbarVisibility(True)
@@ -87,13 +87,13 @@ Public Class GLCompensationVC
Dim _GLCompensation As GLCompensation = TryCast(View.SelectedObjects(0), GLCompensation)
If _GLCompensation Is Nothing Then
Else
Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController).Active.SetItemValue("", True)
Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController)?.Active.SetItemValue("", True)
If _GLCompensation.IsEditable = False Then
Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController).Active.SetItemValue("", False)
Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController)?.Active.SetItemValue("", False)
End If
End If
ElseIf View.SelectedObjects.Count > 1 Then
Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController).Active.SetItemValue("", False)
Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController)?.Active.SetItemValue("", False)
End If
End Sub