From d608180ff522e783d29017dd87a4f06b24aadd9a Mon Sep 17 00:00:00 2001
From: Raul Pimienta <raul.pimienta@adssistemas.mx>
Date: Fri, 23 Aug 2019 11:00:51 -0700
Subject: [PATCH] Desbloquear al eliminar poliza

---
 Ventas/Ventas.aspx.vb | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 641edb992..77dc78ae2 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -14609,6 +14609,12 @@ Partial Class Ventas
             End If
         End If
 
+        If Not ErrorMovimiento Then
+            If Not ObjConta.UpdatePrePolizasDetalleBloquear(CvePrePoliza, False) Then
+                ErrorMovimiento = True
+            End If
+        End If
+
         If Not ErrorMovimiento Then
             Alert("La póliza ha sido desvinculada y eliminada con éxito.", TipoMensaje.MsgInformacion)
             ObjAC.Commit()