CONSULTA SQL

Delphi

06/05/2003

Fala moçada!!!

Tenho a seguinte consulta:

procedure TFrmConsultaCliente.EditLocalizarChange(Sender: TObject);
begin
DMadm.Query1.Close;
DMadm.Query1.SQL.Clear;
DMadm.Query1.SQL.Add(´SELECT Cliente.CodCli, Cliente.Nome, Cliente.Endereco, Cliente.Num, Cliente.Compl, Cliente.Cidad, Cliente.Bair, Cliente.Uf, Cliente.Cep, Cliente.Tel´);
DMadm.Query1.SQL.Add(´Cliente.Cel, Cliente.Email, Cliente.Cpf, Cliente.Id, Sexo.DescSex, Cliente.DtNasc, Formacao.DescEsc, Profissao.DescProf´);
DMadm.Query1.SQL.Add(´FROM ´Cliente.DB´ Cliente, ´Formacao.db´ Formacao, ´Profissao.db´ Profissao, ´Sexo.db´ Sexo´);
DMadm.Query1.SQL.Add(´Where (Cliente.Escolar = Formacao.CodEsc) AND (Cliente.Profis = Profissao.CodProf) AND (Cliente.Sexo = Sexo.Sigla) AND Cliente.Nome Like :Consulta´);
DMadm.Query1.ParamByName(´Consulta´).AsString := ´´+´¬´+ EditLocalizar.Text +´¬´;
DMadm.Query1.Open;
end;

mas quando executo me retorna o seguinte erro:

Query1 : Field´Telefone´ not found

Por favor onde está errado???

:oops:


Psiu

Psiu

Curtidas 0

Respostas

Okama

Okama

06/05/2003

Verifique se vc tem algum componente DBEdit, DBGrid ou semelhante que referencia o telefone do cliente como Cliente.telefone, pois a consulta seleciona Cliente.Tel



Fala moçada!!! Tenho a seguinte consulta: procedure TFrmConsultaCliente.EditLocalizarChange(Sender: TObject); begin DMadm.Query1.Close; DMadm.Query1.SQL.Clear; DMadm.Query1.SQL.Add(´SELECT Cliente.CodCli, Cliente.Nome, Cliente.Endereco, Cliente.Num, Cliente.Compl, Cliente.Cidad, Cliente.Bair, Cliente.Uf, Cliente.Cep, [color=red:0d34a3b351][b:0d34a3b351]Cliente.Tel[/b:0d34a3b351][/color:0d34a3b351]´); DMadm.Query1.SQL.Add(´Cliente.Cel, Cliente.Email, Cliente.Cpf, Cliente.Id, Sexo.DescSex, Cliente.DtNasc, Formacao.DescEsc, Profissao.DescProf´); DMadm.Query1.SQL.Add(´FROM ´Cliente.DB´ Cliente, ´Formacao.db´ Formacao, ´Profissao.db´ Profissao, ´Sexo.db´ Sexo´); DMadm.Query1.SQL.Add(´Where (Cliente.Escolar = Formacao.CodEsc) AND (Cliente.Profis = Profissao.CodProf) AND (Cliente.Sexo = Sexo.Sigla) AND Cliente.Nome Like :Consulta´); DMadm.Query1.ParamByName(´Consulta´).AsString := ´´+´¬´+ EditLocalizar.Text +´¬´; DMadm.Query1.Open; end; mas quando executo me retorna o seguinte erro: Query1 : Field´Telefone´ not found Por favor onde está errado??? :oops:



GOSTEI 0
Falinden

Falinden

06/05/2003

Além disso, falta uma vírgula após o campo Cliente.Tel

...
Cliente.Num, Cliente.Compl, Cliente.Cidad, Cliente.Bair, Cliente.Uf, Cliente.Cep, Cliente.Tel[b:238b494f7f][color=red:238b494f7f][size=18:238b494f7f],[/size:238b494f7f][/color:238b494f7f][/b:238b494f7f]´);
DMadm.Query1.SQL.Add(´Cliente.Cel, Cliente.Email, Cliente.Cpf,
...


GOSTEI 0
POSTAR