qreport no imprime registros por 2da vez

[Oscar Guzmán]

 
Dm.NotasCredito.Close;
  DM.NotasCredito.SQL.Clear;
  Dm.NotasCredito.SQL.Add('SELECT * FROM Ventas');
  Dm.NotasCredito.SQL.Add('WHERE Documento=:Documento AND Tipo=:Tipo');
  Dm.NotasCredito.Parameters.ParamByName('Documento').Value:=Edit13.Text;
  Dm.NotasCredito.Parameters.ParamByName('Tipo').Value:='DE';
  Dm.NotasCredito.Open;
  Dm.facturas.Close;
  Dm.facturas.SQL.Clear;
  Dm.facturas.SQL.Add('SELECT * FROM Ventas');
  Dm.facturas.SQL.Add('WHERE Factura=:Documento AND Tipo=:Tipo');
  Dm.facturas.Parameters.ParamByName('Documento').Value:=Dm.NotasCreditofactura.Value;
  Dm.facturas.Parameters.ParamByName('Tipo').Value:='FA';
  Dm.facturas.Open;

  LeeDevolucion.Close;
  LeeDevolucion.Parameters.ParamByName('@Factura').Value:=Dm.facturasfactura.Value;
  LeeDevolucion.Parameters.ParamByName('@NroNota').Value:=Edit13.Text;
  LeeDevolucion.Open;
  FormaDevQR.QuickRep1.Preview;
  BitBtn4.Enabled:=False;
  Edit13.SetFocus;

Con lo anterior reimprimo un nc que ya se realizó y que quedó almacenada, con los dos primeros queries llamo a los datos de la factura a la que se le agregó la nc (edit13.text) y con leedevolución traigo los registros de la nc, buscándolos en la tabla con el nro de factura dm.facturasfactura.value y con el nro de documento de la nc edit13.text. cuando mando a reimprimir los datos de encabezado pasan perfectamente pero los datos de "leedevolucion" no.

 
select f.documento,r.documento as documentor,r.tipofact,f.dividoiva,f.iva,f.porciva,f.codvende,f.nombrevendedor,f.fecha,f.factura,
f.codclie,f.nombre,f.status,f.tipo,r.cb,r.descripcion,r.cantidad,r.pvp,r.total,r.talla,r.costo,r.modelo,f.TotalBaseImp,f.precionc,f.totalnc 
/*from ventas f inner join renglon r on (f.factura=r.factura)*/
from ventas f inner join renglon r on f.factura=r.factura and r.documento=f.documento
where (f.tipo='DE') and (r.tipofact='DE') and (f.factura=@factura) and (r.documento=@NroNota)
order by r.modelo

Lo anterior, es el sp que me da los registros.