Sql Como faço???

Delphi

08/09/2003

Olá....
qry_PesqValor.SQL.Add (´Select * From TipoItemEmol ´);
qry_PesqValor.SQL.Add (´Where cd_tpItemEmol=´+cdtipoitem);

Tenho uma varíavel data , como faço pra adicionar ao where :
essa variável data esteja entre campo dt_inicial e campo dt_final

Obrigada, Catharina.


Catharina

Catharina

Curtidas 0

Respostas

Essantos

Essantos

08/09/2003

qry_PesqValor.SQL.Add (´ And DataInicial >=´+ #39+ DateToStr(dt_inicial) +39);

[]´s


GOSTEI 0
Derecksp

Derecksp

08/09/2003

Vc poderia fazer da seguinte forma:

With qry_PesqValor do
Begin
Close;
SQL.Clear;
SQL.Add (´Select * From TipoItemEmol ´);
SQL.Add (´Where cd_tpItemEmol= :p_cdtipoitem);
SQL.Add (´and Data between :p_dt_inicial and :p_dt_final );
ParamByName(´p_cdtipoitem´).asInteger := cdtipoitem;
ParamByName(´p_dt_inicial´).asDate := dt_inicial;
ParamByName(´p_dt_final´).asDate := dt_final;
Open;
End;


=> A utilização de parametros facilita a programação pois deixa o código mais limpo e permite com facilidade conversão de tipos.

Outra dica é sempre tentar evitar um instrução ´Select *´, sempre tente identificar o nome das colunas a ser pesquisada, isto tornará mais rápida sua consulta.

Qualquer dúvida, entre em contarto
Derecksp@bol.com.br







qry_PesqValor.SQL.Add (´Select * From TipoItemEmol ´);
qry_PesqValor.SQL.Add (´Where cd_tpItemEmol=´+cdtipoitem);


GOSTEI 0
Catharina

Catharina

08/09/2003

var data1: tdatetime;

data1 := date;

qry_PesqValor.SQL.Add (´Where cd_tpItemEmol=´+cdtipoitem );
qry_PesqValor.SQL.Add (´and :data between dt_inival and dt_fimval´);
qry_PesqValor.parambyname(´data´).value := data1;

O meu param. é data e os campos onde pesquiso dt_inival e dt_fimval, mas não está dando certo, ele não acha, sei que o problema é na data....



Agradeço . Catharina...


GOSTEI 0
POSTAR