-

Bancos/RepCortes.aspx.vb

@@ -180,7 +180,7 @@ Partial Class Bancos_RepCortes
             End If
         End If
 
-        If Vn.GetCortesDetalleDepositosCaja(CveCorte, DdlSubProyectos.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
+        If UsuarioActual.CveEmpresa.contiene(140, 141) AndAlso Vn.GetCortesDetalleDepositosCaja(CveCorte, DdlSubProyectos.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
             GvDep.DataSource = Vn.DtResultados
             If Vn.DtResultados.Rows.Count > 0 Then
                 DivDep.Visible = True
@@ -210,7 +210,7 @@ Partial Class Bancos_RepCortes
         GvDep.DataBind()
         GvPorIVA.DataBind()
 
-        If UsuarioActual.CveEmpresa = 193 AndAlso UsuarioActual.CveRol = 1 Then
+        If UsuarioActual.CveEmpresa = 193 Then
             DivAnexo.Visible = True
 
             Dim CveCuenta As Integer = 186367