Átállás 17.2.3-ra

Related Work Items: #123

Nuvolar.Module.Win/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Bank/BankImportVC.vb

@@ -26,113 +26,113 @@ Public Class BankImportVC
     Protected Overrides Sub OnActivated()
         MyBase.OnActivated()
         If View.Id = "BankImportHeader_BankImportHeaderSum_ListView" Then
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", False)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", False)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", False)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", False)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", False)
-            Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", False)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", False)
         End If
         If View.Id = "BankImportHeaderSum_BankImportHeaderSumDetail_ListView" Then
-            Frame.GetController(Of ListViewProcessCurrentObjectController)().Active.SetItemValue("", False)
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", False)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", False)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", False)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", False)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", False)
-            Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", False)
+            Frame.GetController(Of ListViewProcessCurrentObjectController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", False)
         End If
         If View.Id = "BankImportHeaderSum_GLRows_ListView" Then
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", False)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", False)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", False)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", False)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", False)
-            Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", False)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", False)
         End If
         If View.Id = "BankImportHeaderSum_BankImportNameParameters_ListView" Then
-            Frame.GetController(Of ListViewProcessCurrentObjectController)().Active.SetItemValue("", False)
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", False)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", False)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", False)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", False)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", False)
-            'Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", False)
+            Frame.GetController(Of ListViewProcessCurrentObjectController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", False)
+            'Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", False)
         End If
         If View.Id = "BankImportHeaderSum_BankImportPopup_ListView" Then
-            Frame.GetController(Of ListViewProcessCurrentObjectController)().Active.SetItemValue("", False)
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", False)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", False)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", False)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", False)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", False)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", False)
-            Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", False)
+            Frame.GetController(Of ListViewProcessCurrentObjectController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", False)
+            Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", False)
         End If
     End Sub
     Protected Overrides Sub Ondeactivated()
         MyBase.OnActivated()
         If View.Id = "BankImportHeader_BankImportHeaderSum_ListView" Then
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", True)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", True)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", True)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", True)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", True)
-            Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", True)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", True)
         End If
         If View.Id = "BankImportHeaderSum_BankImportHeaderSumDetail_ListView" Then
-            Frame.GetController(Of ListViewProcessCurrentObjectController)().Active.SetItemValue("", True)
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", True)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", True)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", True)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", True)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", True)
-            Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", True)
+            Frame.GetController(Of ListViewProcessCurrentObjectController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", True)
         End If
         If View.Id = "BankImportHeaderSum_GLRows_ListView" Then
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", True)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", True)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", True)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", True)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", True)
-            Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", True)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", True)
         End If
         If View.Id = "BankImportHeaderSum_BankImportNameParameters_ListView" Then
-            Frame.GetController(Of ListViewProcessCurrentObjectController)().Active.SetItemValue("", True)
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", True)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", True)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", True)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", True)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", True)
-            'Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", True)
+            Frame.GetController(Of ListViewProcessCurrentObjectController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", True)
+            'Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", True)
         End If
         If View.Id = "BankImportHeaderSum_BankImportPopup_ListView" Then
-            Frame.GetController(Of ListViewProcessCurrentObjectController)().Active.SetItemValue("", True)
-            Frame.GetController(Of LinkUnlinkController)().Active.SetItemValue("", True)
-            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of NewObjectViewController)().Active.SetItemValue("", True)
-            Frame.GetController(Of OpenObjectController)().Active.SetItemValue("", True)
-            Frame.GetController(Of ExportController)().Active.SetItemValue("", True)
-            Frame.GetController(Of RecordsNavigationController)().Active.SetItemValue("", True)
-            Frame.GetController(Of PrintingController)().Active.SetItemValue("", True)
-            Frame.GetController(Of DeleteObjectsViewController)().Active.SetItemValue("", True)
+            Frame.GetController(Of ListViewProcessCurrentObjectController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of LinkUnlinkController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of DevExpress.ExpressApp.CloneObject.CloneObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of NewObjectViewController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of OpenObjectController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of ExportController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of RecordsNavigationController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of PrintingController)()?.Active.SetItemValue("", True)
+            Frame.GetController(Of DeleteObjectsViewController)()?.Active.SetItemValue("", True)
         End If
     End Sub
     Private Sub BankImportVC_ViewControlsCreated(sender As System.Object, e As System.EventArgs)

Nuvolar.Module.Win/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Bank/BankVC.vb

@@ -35,11 +35,11 @@ Public Class BankVC
         Frame.GetController(Of BankVC).aBankDivide.Active.SetItemValue("", False)
         If View.Id Like "RegistryBankTransfer_ListView*" Then
 
-            Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController)().Active.SetItemValue("", False)
+            Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController)()?.Active.SetItemValue("", False)
             Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController).DeleteAction.Active.SetItemValue("", False)
             Frame.GetController(Of DevExpress.ExpressApp.SystemModule.NewObjectViewController).NewObjectAction.Active.SetItemValue("", False)
-            Frame.GetController(Of DevExpress.ExpressApp.SystemModule.LinkUnlinkController).Active.SetItemValue("", False)
-            Frame.GetController(Of ListViewProcessCurrentObjectController).Active.SetItemValue("", False)
+            Frame.GetController(Of DevExpress.ExpressApp.SystemModule.LinkUnlinkController)?.Active.SetItemValue("", False)
+            Frame.GetController(Of ListViewProcessCurrentObjectController)?.Active.SetItemValue("", False)
 
             Frame.GetController(Of BankVC).aViewAttachments_Bank.Active.SetItemValue("", True)
             Frame.GetController(Of BankVC).aViewRegistry.Active.SetItemValue("", True)
@@ -65,7 +65,7 @@ Public Class BankVC
     Protected Overrides Sub OnDeactivated()
         MyBase.OnDeactivated()
         If View.Id Like "RegistryBankTransfer_ListView*" Then
-            Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController)().Active.SetItemValue("", True)
+            Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController)()?.Active.SetItemValue("", True)
             RemoveHandler View.SelectionChanged, AddressOf view_SelectionChanged
         End If
         If View.Id = "GLBankDivide_DetailView" Then
@@ -78,7 +78,7 @@ Public Class BankVC
             Frame.GetController(Of BankVC).aBankDivide.Active.SetItemValue("", False)
             Frame.GetController(Of DevExpress.ExpressApp.SystemModule.DeleteObjectsViewController).DeleteAction.Active.SetItemValue("", True)
             Frame.GetController(Of DevExpress.ExpressApp.SystemModule.NewObjectViewController).NewObjectAction.Active.SetItemValue("", True)
-            Frame.GetController(Of DevExpress.ExpressApp.SystemModule.LinkUnlinkController).Active.SetItemValue("", True)
+            Frame.GetController(Of DevExpress.ExpressApp.SystemModule.LinkUnlinkController)?.Active.SetItemValue("", True)
         End If
     End Sub
 #Region "Bank save" 'Banki kommunikáció
@@ -410,7 +410,7 @@ Public Class BankVC
             Throw New UserFriendlyException("Csak azonos Saját cég esetén választható ez a funkció!")
         End If
 
-        Frame.GetController(Of DevExpress.ExpressApp.Validation.PersistenceValidationController)().Active.SetItemValue("", False)
+        Frame.GetController(Of DevExpress.ExpressApp.Validation.PersistenceValidationController)()?.Active.SetItemValue("", False)
         _BankParameterDEV = _ocur.FindObject(Of BankParameterDEV)(CriteriaOperator.Parse("CurrencyName.ShortName='HUF'"), True)
         If _BankParameterDEV Is Nothing Then _BankParameterDEV = _ocur.CreateObject(Of BankParameterDEV)()
 
@@ -435,7 +435,7 @@ Public Class BankVC
         _BankParameterDEV.Save()
         _ocur.CommitChanges()
 
-        Frame.GetController(Of DevExpress.ExpressApp.Validation.PersistenceValidationController)().Active.SetItemValue("", True)
+        Frame.GetController(Of DevExpress.ExpressApp.Validation.PersistenceValidationController)()?.Active.SetItemValue("", True)
 
         Dim _BankParameterDEV_New As BankParameterDEV = _onew.GetObject(_BankParameterDEV)
         e.View = Application.CreateDetailView(_onew, "BankParameterDEV_DetailView", False, _BankParameterDEV_New)

Nuvolar.Module.Win/BusinessObjects/Financial/FinancialObjects/FinancialTransactions/Bank/GLBankVC.vb

@@ -68,13 +68,13 @@ Public Class GLBankVC
             Dim _GLBank As GLBank = TryCast(View.SelectedObjects(0), GLBank)
             If _GLBank 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 _GLBank.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