Fórum Ajuda Delphi X Sql Server #211654

select 
left(arrivedtime,11) as ´DATA´, count(*) as ´Quantidade´, 
sum( case when substring(tonumber,1,7) = ´0115533´ then 1 else 0 end) as ´com 011´, 
sum(CASE WHEN substring(tonumber,1,2) = ´33´ then 1 else 0 end) as ´sem 011´ 
from CDR where 
-- Gostaria de mudar linhas abaixo via formulario 
arrivedtime BETWEEN :inicio and :termino 
campo abaixo 
and tonumber <> ´´ 
and (substring(tonumber,1,11) = ´01155333321´ 
or substring(tonumber,1,11) = ´01155333322´ 
or substring(tonumber,1,11) = ´01155333329´ 
or substring(tonumber,1,6) = ´333321´ 
or substring(tonumber,1,6) = ´333322´ 
or substring(tonumber,1,6) = ´333329´) 
group by left(arrivedtime,11) 
ORDER by left(arrivedtime,11)

  With Query1 do
    Close;
    ParamByName(´Inicio´).AsDateTime := DateTimePicker1.DateTime;
    ParamByName(Termino).AsDateTime := DateTimePicker2.DateTime;
    Open;
  end;