ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

[Resolvido] Ajuda com erro em SQL

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
renanbg
Colaborador
Colaborador


Registrado: Quinta-Feira, 12 de Abril de 2012
Mensagens: 1158

MensagemEnviada: Qui Ago 09, 2012 9:01 am    Assunto: [Resolvido] Ajuda com erro em SQL Responder com Citação

Bom dia amigos. A SQL a seguir da erro dizendo que não reconhece o campo BANCO(quinta linha).

Acho que falta alguma aspa ali, mas não descobri ainda.

Código:
 frmrelcontas_recebidas.Query1.Close;
  frmrelcontas_recebidas.Query1.SQL.Clear;
  frmrelcontas_recebidas.Query1.SQL.Add('SELECT Sacado, Nf_pedido, Valor, Data_recebimento, Tipo, Obs, Nome');
  frmrelcontas_recebidas.Query1.SQL.Add('FROM tbcontas_recebidas, tbbancos');
  frmrelcontas_recebidas.Query1.SQL.Add('WHERE Data_recebimento >=:pInicial and Data_recebimento<=:pFinal and tbcontas_recebidas.banco = tbbancos.cod_banco and Tipo = '+QuotedStr(ComboTipo.Text) and Banco = '+QuotedStr(EdCodBanco.Text));
  frmrelcontas_recebidas.Query1.SQL.Add('Order by Data_recebimento');
  frmrelcontas_recebidas.Query1.ParamByName('pInicial').AsDateTime := StrToDate(Inicio);
  frmrelcontas_recebidas.Query1.ParamByName('pFinal').AsDateTime := StrToDate(Final);
  frmrelcontas_recebidas.Query1.Prepare;
  frmrelcontas_recebidas.Query1.Open;


Editado pela última vez por renanbg em Qui Ago 09, 2012 9:37 am, num total de 1 vez
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Oseiasao
Membro Junior
Membro Junior


Registrado: Sexta-Feira, 14 de Outubro de 2011
Mensagens: 303

MensagemEnviada: Qui Ago 09, 2012 9:19 am    Assunto: Responder com Citação

amigo, vc precisa especificar a qual tabela no select os campos pertencem, outra coisa, vc não declarou o campo 'banco' e esta usando ele, não tem como:



SELECT Tabela.Sacado, Tabela.Nf_pedido, Tabela.Valor,
Tabela.Data_recebimento, Tabela.Tipo, Tabela.Obs, Tabela.Nome
FROM tbcontas_recebidas, tbbancos
WHERE Tabela.Data_recebimento >=:pInicial and
Tabela.Data_recebimento<=:pFinal and
tbcontas_recebidas.banco = tbbancos.cod_banco
and Tabela.Tipo = +QuotedStr(ComboTipo.Text)
and Tabela.Banco = +QuotedStr(EdCodBanco.Text)
Order by Tabela.Data_recebimento


nesta linha abaixo falta aspas tbeim

'+QuotedStr(ComboTipo.Text)+' and Banco = '+QuotedStr(EdCodBanco.Text)+');

espero te-lo ajudado
_________________
Melhor é o fim das coisas do que o principio delas .... (Salomão)
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
Ghost_Rider
Colaborador
Colaborador


Registrado: Segunda-Feira, 6 de Outubro de 2003
Mensagens: 4437

MensagemEnviada: Qui Ago 09, 2012 9:21 am    Assunto: Responder com Citação

Vamos lá...
isso tbcontas_recebidas.banco não existe...

No SQL, vc tem que colocar o nome do campo lá no banco de dados, ou seja o nome do campo...esse tbcontas que vc digitou esta errado, assim como outras instruções que vc colocou no seu código...
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
renanbg
Colaborador
Colaborador


Registrado: Quinta-Feira, 12 de Abril de 2012
Mensagens: 1158

MensagemEnviada: Qui Ago 09, 2012 9:35 am    Assunto: Responder com Citação

Bom dia amigos. Antes de mais nada obrigado pelas respostas.

Oseias, usando sua dica dava erro nas aspas tbm, mas modifiquei apenas o final e funcionou. ficou assim

Código:
'+QuotedStr(ComboTipo.Text)+' and Banco = '+QuotedStr(EdCodBanco.Text));


Ghost_Rider,

uso o nome das tabelas+campo porque estou buscando dados de tabelas distintas.

Agradeço aos dois pela ajuda.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB