IE permite actualizar Folio y observacion cuando no esta consiliado y tiene complemento vigente

Bancos/IE.aspx.vb

@@ -1088,6 +1088,7 @@ Partial Class Bancos_IE
             '2019-08-28 unificados vista de controles complemento  (Cancelado, conciliciado, Con complemento vigente, sin complemento vigente)
             Dim ExistenComplementosVigentes As Boolean = VerificaComplementos(True)
             Dim ExistenComplementos As Boolean = VerificaComplementos(False)
+
             If Not ChkConciliado.Checked And ObjIE.CveEstatusIE <> 2 Then
 
                 If (Not ExistenComplementosVigentes) Then
@@ -1101,7 +1102,13 @@ Partial Class Bancos_IE
 
                 Else
 
-                    BtnEditar.Visible = False
+                    If UsuarioActual.TienePermisoProceso(99) Then
+                        BtnEditar.Visible = True
+                        PermisoComplementoVigente = True
+                    Else
+                        BtnEditar.Visible = False
+                    End If
+
                     LnkEliminar.Visible = False
                     LnkCancelar.Visible = False
 
@@ -5647,15 +5654,24 @@ Partial Class Bancos_IE
 
     Private Sub ControlesEdicion()
 
+        Dim ExistenComplementosVigentes As Boolean = VerificaComplementos(True)
 
         If PermisoComplementoVigente Then
 
-            DdlTipoTransaccion.Enabled = True
-            LblCuenta.Visible = False
-            DdlCuenta.Enabled = True
-            DdlCuenta.Visible = True
-            TxtFolio.Enabled = True
-            TxtObservaciones.Enabled = True
+            If ExistenComplementosVigentes Then
+                TxtFolio.Enabled = True
+                TxtObservaciones.Enabled = True
+            Else
+
+                DdlTipoTransaccion.Enabled = True
+                LblCuenta.Visible = False
+                DdlCuenta.Enabled = True
+                DdlCuenta.Visible = True
+                TxtFolio.Enabled = True
+                TxtObservaciones.Enabled = True
+
+            End If
+
             UpDatos.Update()
 
             CargaCuentasDepositoClientes()