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")