From 6440299038e9d1db9c0047cd06e93d08ed12e148 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 26 May 2022 13:47:57 -0700
Subject: [PATCH] -- mejora en manejo de liga para prepoliza

---
 Contabilidad/PopUpAuxiliar.aspx.vb | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/Contabilidad/PopUpAuxiliar.aspx.vb b/Contabilidad/PopUpAuxiliar.aspx.vb
index d7547cfe2..6f0951149 100644
--- a/Contabilidad/PopUpAuxiliar.aspx.vb
+++ b/Contabilidad/PopUpAuxiliar.aspx.vb
@@ -268,7 +268,7 @@ Partial Class PopUpAuxiliar
         End If
 
         If Not TieneError Then
-            If IdPoliza > 0 Then
+            If UsuarioActual.Empresa.TipoContabilidad = 2 AndAlso IdPoliza > 0 Then
                 If UsuarioActual.Empresa.UsaAC Or UsuarioActual.Empresa.UsaContabilidad Then
                     ObjContPaq = New ClsContPAQi(UsuarioActual.Empresa)
                     ObjContPaq.IniciaTransacSQL()
@@ -410,8 +410,9 @@ Partial Class PopUpAuxiliar
             RegistraScript(" $('#DivCancelar').modal('hide'); ")
             If UsuarioActual.Empresa.Funcionalidad(200) = "1" Then
                 If ObjContabilidad.ContabilizarPrePoliza(CvePrePolizaNueva, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then
-                    Str.AppendFormat("<a href='/Contabilidad/RegPoliza.aspx?IdPoliza={0}' target='_blank' class='Texto'>Ver Poliza</a>", ObjContabilidad.ContaIdPoliza)
-
+                    If UsuarioActual.Empresa.TipoContabilidad = 2 Then
+                        Str.AppendFormat("<a href='/Contabilidad/RegPoliza.aspx?IdPoliza={0}' target='_blank' class='Texto'>Ver Poliza</a>", ObjContabilidad.ContaIdPoliza)
+                    End If
                 End If
             End If
             Alert(Str.ToString)
@@ -420,8 +421,6 @@ Partial Class PopUpAuxiliar
 
         End If
 
-
-
         ObjContabilidad.Dispose()
         CargaDatos()