diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb
index 724fd38d4..e66384a6e 100644
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -1069,9 +1069,9 @@ Partial Class PopUpVerFactura
                     If ObjVentas.DtResultados IsNot Nothing AndAlso ObjVentas.DtResultados.Rows.Count > 0 Then
                         ObjVentas.DtResultados.Columns.Add("Importe", GetType(Decimal))
                         ObjVentas.DtResultados.Rows(0)("Importe") = ObjVentas.DtResultados.Rows(0)("Total")
-                        Vta.DtDocumentosRelacionados = ObjVentas.DtResultados.Copy().FiltraParametros("FolioFiscal IS NOT NULL")
+                        Vta.DtDocumentosRelacionados = ObjVentas.DtResultados.FiltraParametros("FolioFiscal IS NOT NULL")
                         If ObjVentas.GetVentasRelacionadas(CveVenta, UsuarioActual.CveEmpresa) Then
-                            Vta.DtNCVinculadas = ObjVentas.DtResultados.Copy()
+                            Vta.DtNCVinculadas = ObjVentas.DtResultados
                             Vta.DtDocumentosRelacionados = ObjVentas.DtResultados.FiltraParametros("FolioFiscal IS NOT NULL")
                             If Vta.DtDocumentosRelacionados.Rows.Count > 0 Then
                                 If Vta.TipoDocto.Contiene("Dev") Then