...

Ventas/PV.aspx.vb

@@ -3767,6 +3767,10 @@ Partial Class PV
                     ObjFactura.ErrorList.Add("No existe un almacen configurado como 'Servicio a Domicilio' en esta sucursal.")
                 End If
 
+                If TmpDTAjustes IsNot Nothing AndAlso TmpDTAjustes.Rows.Count > 0 Then
+                    ObjFactura.EsGarantia = True
+                End If
+
             End If
         Catch ex As Exception
             OnError("Ocurrió un error al generar la venta", ex)