Ajuda Com Sql

[Sérgio Assunção]

Bom dia ...

Preciso de um help aqui com uma consulta sql. Faço assim:

qEstoque.Close;
qEstoque.Sql.Clear;
qEstoque.Sql.Text := 'select * from PRODUTOS where LOJA in (4,5)';
qEstoque.Open;

Funciona certinho.

 

Dessa forma:

var Lojas: String;
...
Lojas := '4,5';
qEstoque.Close;
qEstoque.Sql.Clear;
qEstoque.Sql.Text := 'select * from PRODUTOS where LOJA in (:vLojas)';
qEstoque.ParamByName('vLojas').Value := Lojas;
qEstoque.Open;

Só mostra na grid os produtos da LOJA 4.

Onde estou errando ?

 

Obrigado.

 

Sérgio

 

[Régys Silveira]

Ao inves de .value no parâmetro, tente .AsString.

Ou concatene a string diretamente na string do SQL em SQL.TEXT.

[EMBarbosa]

Verifique o tipo do parâmetro.

Mas até onde sei, você não pode usar um Param para incluir uma parte configurável do seu Select, em especial um conjunto de valores.

[Sérgio Assunção]

Ao inves de .value no parâmetro, tente .AsString.

Ou concatene a string diretamente na string do SQL em SQL.TEXT.

Fazendo qEstoque.ParamByName('vLojas').AsString := Lojas; só puxou a LOJA 4.

 

Já dessa forma: qEstoque.Sql.Text := 'select * from PRODUTOS where LOJA in ('+Lojas+')'; deu certo.

 

Obrigado.

 

Sérgio

 

[Sérgio Assunção]

Verifique o tipo do parâmetro.

Mas até onde sei, você não pode usar um Param para incluir uma parte configurável do seu Select, em especial um conjunto de valores.

Deu certo aqui a segunda opção mencionada pelo Regys.

 

Agradeço muito a atenção.

 

Sérgio

Editado 28 Agosto, 2013 por gigainfo

[EMBarbosa]

Exato. Não dá pra usar um param, o que pode ser feito é modificar a SQL como o Régys mencionou. Mas daí sua query não pode ser preparada para múltiplas execuções alterando apenas o parâmetro. No entanto, dependendo do caso, isso não atrapalha em nada.

[Sérgio Assunção]

Aproveitando mais um pouco da atenção... mais uma dúvida. Eu uso muito o "Value" nos parametros nas minhas instruções SQL.

 

Exemplo: qEstoque.ParamByName('Loja').Value := 4;

 

Seria dessa forma qEstoque.ParamByName('Loja').AsInteger := 4; o correto ?

 

O que muda ?

 

Sérgio

[EMBarbosa]

Value usa o tipo nativo da classe TParam, ao passo que AsInteger ou AsString faz uma conversão conforme você passou.

Não existe meio correto ou incorreto.

O que muda é que a conversão é feita ou não. A explanação foi breve, mas espero que ajude.

[Régys Silveira]

Só para complementar o tipo padrão é "Variant" que aceita qualquer coisa dentro dele, o problema de usar ele ao meu ver é na hora das conversões, nem tudo pode ser convertido dependendo da situação e como variant aceita qualquer coisa dentro fica um tanto quanto complicado.

Se você tem certeza do que tem dentro do TParam não é problema usar .value, mas se não tem, o ideal e fazer o cast ".As...", outra coisa que vejo de vantagem no cast é que se o valor passado não for possível de converter, o próprio compilador já mata abortando a compilação, se não é gerada uma exceção durante o processo.