[nolo]

bueno disculpas nuevamente, este seria mi codigo

si primero cierro el dataset y despues lo abro como decis vos, me tira un errorcito, la unica forma de que por lo menos se ejecute era ponerlo de esa forma a pesar de que yo tenia entendido de que es como tu dices

Código Delphi [-]
procedure TForm2.Button1Click(Sender: TObject);
  var
   sQ: WideString;
 begin
   adsReporte.Open;
   sQ := 'SELECT V.fDocumento, C.sRazonSocial, V.idTipoDoc, ((V.rTotBruto+V.rTotDescuentos)*TD.iAplicStock*(-1)) as totBruto,'+
         'RIGHT('+QuotedStr('0000')+'+CAST(V.idPV AS VARCHAR),4)+'+QuotedStr(' - ')+
         '+ RIGHT('+QuotedStr('00000000')+'+CAST(V.idNumDoc AS VARCHAR),8) as Numero, '+
         '( SELECT SUM((rSubBruto+rSubDescuentos)*TID.iAplicStock*(-1)*(rComisionAPagar)) AS Comision'+
         'FROM VentasItems VI, TiposDoc TID'+
         'WHERE VI.idTipoDoc = TID.idTipoDoc'+
         'AND VI.idTipoDoc = V.idTipoDoc'+
         'AND VI.idPV = V.idPV'+
         'AND VI.idNumdoc = V.idNumDoc ) AS Comision'+
         'FROM Ventas V'+
         'INNER JOIN Clientes C ON V.idCliente = C.idCliente'+
         'INNER JOIN TiposDoc TD ON V.idTipoDoc = TD.idTipoDoc'+
         'WHERE V.fDocumento >= :FechaDesde'+
         'AND V.fDocumento <= :FechaHasta' +
         'AND V.idVendedor := :idVendedor'+
         'AND V.bAnulado = 0'+
         'ORDER BY V.idTipoDoc ASC, V.idPV ASC, V.idNumDoc ASC'+
         'adsDatos1.CommandText := sQ;';
   {adsReporte.Parameters.ParamByName('idVendedor').Value := TEdit1.AsInteger;
  adsReporte.Parameters.ParamByName('FechaDesde').Value := dtpDesde.DateTime;
  adsReporte.Parameters.ParamByName('FechaHasta').Value := dtpHasta.DateTime}
   //adsReporte.CommandText := sQ;
   //adsReporte.Close;
 end;
end.

en fin mi pregunta es, si esta bien el codigo en el TBotton o si es que falta algo o sobra, porque no me tira nada el DBGrid