From cc40fb3f4b50857073907984635ad6dc2e33bde5 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 19 May 2022 16:57:38 -0700
Subject: [PATCH] =?UTF-8?q?--=20mejora=20conexi=C3=B3n=20contpaqi?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Inicio.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Inicio.aspx.vb b/Inicio.aspx.vb
index c7073fe77..644f1ede8 100644
--- a/Inicio.aspx.vb
+++ b/Inicio.aspx.vb
@@ -156,7 +156,7 @@ Partial Class Inicio
                 LtlTitulo.Text = "Sistema Integral de Información Gluyas"
             End If
 
-            If UsuarioActual.Empresa.UsaContabilidad Then
+            If UsuarioActual.Empresa.TipoContabilidad = 2 AndAlso UsuarioActual.Empresa.UsaContabilidad Then
                 Dim ObjPolizas As New ClsContPAQi(UsuarioActual.Empresa)
                 If ObjPolizas.GetPolizasCuadre() And ObjPolizas.DtResultados.Rows.Count > 0 Then
                     Dim ObjNotificacion = ItemNotificaciones(String.Format("Polizas de cuadre {0}", ObjPolizas.DtResultados.Rows.Count), Ico:="icon-calculator", Tipo:="warning", Link:="/Contabilidad/RepPolizasCuadre.aspx")