Fórum IbQuery #179605
03/09/2003
0
Pessoal estou fazendo uma pesquisa e quero colocar o resultado dentro de um edit. O meu código é esse. Não estou conseguindo encontrar o erro.
DmMovimentacao.IBQuery1.Active:=False;
DmMovimentacao.IBQuery1.SQL.Clear;
DmMovimentacao.IBQuery1.SQL.Add(´select desc_Localidade from localidade, Area , patrimonio ´+
´where Area.cod_area=patrimonio.cod_area and area.cod_setor=´+ ´´ +(QuotedStr(intToStr(pcodSetor))) + ´´ +
´and patrimonio.cod_patrimonio=´+ ´´ +(QuotedStr(IntTOStr(pCodPatrimonio))) + ´´ +
´and localidade.cod_localidade=area.cod_localidade and area.st_area=´+ QuotedStr(´V´));
DmMovimentacao.IBQuery1.Active:=True;
//EditLocalidade.Text:=wloc;
with DmMovimentacao do begin
EditLocalidade.Text:=IBQuery1.FieldByName(´Desc_Localidade´).Value;
end;
DmMovimentacao.IBQuery1.Active:=False;
DmMovimentacao.IBQuery1.SQL.Clear;
DmMovimentacao.IBQuery1.SQL.Add(´select desc_Localidade from localidade, Area , patrimonio ´+
´where Area.cod_area=patrimonio.cod_area and area.cod_setor=´+ ´´ +(QuotedStr(intToStr(pcodSetor))) + ´´ +
´and patrimonio.cod_patrimonio=´+ ´´ +(QuotedStr(IntTOStr(pCodPatrimonio))) + ´´ +
´and localidade.cod_localidade=area.cod_localidade and area.st_area=´+ QuotedStr(´V´));
DmMovimentacao.IBQuery1.Active:=True;
//EditLocalidade.Text:=wloc;
with DmMovimentacao do begin
EditLocalidade.Text:=IBQuery1.FieldByName(´Desc_Localidade´).Value;
end;
Mineiro
Curtir tópico
+ 0
Responder
Posts
04/09/2003
Nigro
Amigo:
Vamos a alguns testes:
1º) Você já colocou tudo isso dedntro do SQL Explorer para ver o que dá?
2º) Para evitar erros na utilização de aspas, ao invés de colocar o conteúdo dos componentes, coloque isso como parâmetro.
3º) Crie os campos fisicamente dentro do IBQuery
4º) Você não está informando a qual tabela pertence o campo desc_localidade
5º) Nas cláusulas where, coloque parêntes para organizar as condições
6º) Assim... sua cláusula em SQL puro ficaria mais ou menos assim:
select localidade.desc_Localidade
from localidade, Area , patrimonio
where (Area.cod_area = patrimonio.cod_area) and (area.cod_setor = :pcodSetor) and
(patrimonio.cod_patrimonio = :pCodPatrimonio) and (localidade.cod_localidade = area.cod_localidade) and a
(rea.st_area = :QuotedStr)
Nigro
Vamos a alguns testes:
1º) Você já colocou tudo isso dedntro do SQL Explorer para ver o que dá?
2º) Para evitar erros na utilização de aspas, ao invés de colocar o conteúdo dos componentes, coloque isso como parâmetro.
3º) Crie os campos fisicamente dentro do IBQuery
4º) Você não está informando a qual tabela pertence o campo desc_localidade
5º) Nas cláusulas where, coloque parêntes para organizar as condições
6º) Assim... sua cláusula em SQL puro ficaria mais ou menos assim:
select localidade.desc_Localidade
from localidade, Area , patrimonio
where (Area.cod_area = patrimonio.cod_area) and (area.cod_setor = :pcodSetor) and
(patrimonio.cod_patrimonio = :pCodPatrimonio) and (localidade.cod_localidade = area.cod_localidade) and a
(rea.st_area = :QuotedStr)
Nigro
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)