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