 |
ActiveDelphi .: O site do programador Delphi! :.
|
Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
renanbg Colaborador


Registrado: Quinta-Feira, 12 de Abril de 2012 Mensagens: 1158
|
Enviada: Qui Ago 09, 2012 9:01 am Assunto: [Resolvido] Ajuda com erro em SQL |
|
|
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 |
|
 |
Oseiasao Membro Junior


Registrado: Sexta-Feira, 14 de Outubro de 2011 Mensagens: 303
|
Enviada: Qui Ago 09, 2012 9:19 am Assunto: |
|
|
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 |
|
 |
Ghost_Rider Colaborador

Registrado: Segunda-Feira, 6 de Outubro de 2003 Mensagens: 4437
|
Enviada: Qui Ago 09, 2012 9:21 am Assunto: |
|
|
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 |
|
 |
renanbg Colaborador


Registrado: Quinta-Feira, 12 de Abril de 2012 Mensagens: 1158
|
Enviada: Qui Ago 09, 2012 9:35 am Assunto: |
|
|
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 |
|
 |
|
|
Enviar Mensagens Novas: Proibido. Responder Tópicos Proibido Editar Mensagens: Proibido. Excluir Mensagens: Proibido. Votar em Enquetes: Proibido.
|
|