From 60e5095f7b811d698431ee20c07394d76feedc58 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Wed, 12 Oct 2022 17:40:32 -0700
Subject: [PATCH] =?UTF-8?q?--bandera=20de=20contabilizaci=C3=B3n?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Bancos/CuentasBancariasDetalle.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Bancos/CuentasBancariasDetalle.aspx.vb b/Bancos/CuentasBancariasDetalle.aspx.vb
index 00e7bf7a4..9576baed7 100644
--- a/Bancos/CuentasBancariasDetalle.aspx.vb
+++ b/Bancos/CuentasBancariasDetalle.aspx.vb
@@ -122,7 +122,7 @@ Partial Class Bancos_CuentasBancariasDetalle
             trCuentaContableComplementaria.Visible = True
 
         Else
-            If UsuarioActual.Empresa.UsaContabilidad Or UsuarioActual.Empresa.UsaAC Then
+            If UsuarioActual.Empresa.TipoContabilidad = 2 Or UsuarioActual.Empresa.UsaAC Then
                 Dim IdPadre As Integer
                 Dim Conta As New ClsContPAQi(UsuarioActual.Empresa)