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/Mixed/GLMixedVC.vb
+5 -5
View File
@@ -102,13 +102,13 @@ Public Class GLMixedVC
Dim _GLMixed As GLMixed = TryCast(View.SelectedObjects(0), GLMixed)
If _GLMixed 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 _GLMixed.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
@@ -117,10 +117,10 @@ Public Class GLMixedVC
Select Case TryCast(e.Column, GridColumn).FieldName
Case "NoteRows", "Controlling!", "CostHolder!", "JobNumberObjects!", "UniqueObjects!", "AmountHUF", "AmountDEV", "DebitChartOfAccounts!", "CreditChartOfAccounts!"
If nestedFrame IsNot Nothing Then
Frame.GetController(Of DevExpress.ExpressApp.Validation.PersistenceValidationController)().Active.SetItemValue("", False)
Frame.GetController(Of DevExpress.ExpressApp.Validation.PersistenceValidationController)()?.Active.SetItemValue("", False)
Dim parentView As View = nestedFrame.View
TryCast(parentView.ObjectSpace, Xpo.XPObjectSpace).CommitChanges()
Frame.GetController(Of DevExpress.ExpressApp.Validation.PersistenceValidationController)().Active.SetItemValue("", True)
Frame.GetController(Of DevExpress.ExpressApp.Validation.PersistenceValidationController)()?.Active.SetItemValue("", True)
parentView.ObjectSpace.Refresh()
End If
End Select