CONSULTA COM SQLQUERY /DATA SET PROVIDER/ CLIENTDATASET/ RVSYSTEM/RVDATASETCONNECTION/RVPROJECT1 não filtra por datas
boa tarde estou com muita dificuldade de gerar um relatório por datas no RAVE REPORT, ALGUEM PODE ME AJUDAR ( SOU INICIANTE)
MINHA LINHA DE CODIGO:
VAR
INICIO:TDATEtime;
FIM :tDATEtime;
tipostatus: string;
codigoConsultaRave : integer;
rotina: string;
begin
Inicio := strtodate(MaskEdit1.TEXT);
FIM := strtodate(MaskEdit1.TEXT);
//codigoconsultarave := strtoint(edtcodigodizi.Text);
clienDtReceCons.Close;
with SqlQUERYreceCons do
begin
close;
sql.Clear;
sql.Add('select * from TBrecebimentos');
//sql.add ('where CODID =:dcodid');
sql.Add('where DATARECEBIMENTO BETWEEN :data1 and :data2');
SQL.Add('Order by codrecebe');
// parambyname('dcodid').AsInteger := strtoint(edtCodigoDizi.Text);
paramByName('data1').Value := strtodate(maskedit1.Text);
ParamByName('data2').Value := strtodate(maskedit1.Text);
//rvproject1.SetParam('codigodizimista',edtCodigoDizi.text);
open;
end;
Cliendtrececons.Open;
RvReciboProjeto.ProjectFile:='rvRecibo1.rav';
RvReciboProjeto.SetParam('datainicial',maskedit1.text);
//SetParam('DATAEX_INICIAL',FormatDateTime('mm/dd/yyyy', edtDataInicial.DateTime));
RvReciboProjeto.SetParam('datafinal',maskedit1.text);
RvReciboProjeto.Execute;
RvReciboProjeto.Close;
COM ESSAS INFORMAÇÕES O RAVE NAO ESTA MOTRANDO O RESULTADO:
O DB GRID MOSTRA NORMAL
CRIEI OS PARAMETROS (datainicial datafinal) e nao funciona!!!!!
MINHA LINHA DE CODIGO:
VAR
INICIO:TDATEtime;
FIM :tDATEtime;
tipostatus: string;
codigoConsultaRave : integer;
rotina: string;
begin
Inicio := strtodate(MaskEdit1.TEXT);
FIM := strtodate(MaskEdit1.TEXT);
//codigoconsultarave := strtoint(edtcodigodizi.Text);
clienDtReceCons.Close;
with SqlQUERYreceCons do
begin
close;
sql.Clear;
sql.Add('select * from TBrecebimentos');
//sql.add ('where CODID =:dcodid');
sql.Add('where DATARECEBIMENTO BETWEEN :data1 and :data2');
SQL.Add('Order by codrecebe');
// parambyname('dcodid').AsInteger := strtoint(edtCodigoDizi.Text);
paramByName('data1').Value := strtodate(maskedit1.Text);
ParamByName('data2').Value := strtodate(maskedit1.Text);
//rvproject1.SetParam('codigodizimista',edtCodigoDizi.text);
open;
end;
Cliendtrececons.Open;
RvReciboProjeto.ProjectFile:='rvRecibo1.rav';
RvReciboProjeto.SetParam('datainicial',maskedit1.text);
//SetParam('DATAEX_INICIAL',FormatDateTime('mm/dd/yyyy', edtDataInicial.DateTime));
RvReciboProjeto.SetParam('datafinal',maskedit1.text);
RvReciboProjeto.Execute;
RvReciboProjeto.Close;
COM ESSAS INFORMAÇÕES O RAVE NAO ESTA MOTRANDO O RESULTADO:
O DB GRID MOSTRA NORMAL
CRIEI OS PARAMETROS (datainicial datafinal) e nao funciona!!!!!
Wallisson Melo
Curtidas 0