Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
pauloD7 Aprendiz

Registrado: Domingo, 17 de Abril de 2011 Mensagens: 165
|
Enviada: Sex Abr 17, 2020 10:55 am Assunto: [RESOLVIDO]erro de syntax |
|
|
Bom dia! to tentando executar esse eql mas esta dando erro erro de syntax
Código: | qryListapro := TFDQuery.Create(Nil);
qryListapro.Connection := conn;
qryListapro.SQL.Clear;
qryListapro.SQL.Text := 'select TAB_CATEGORIA.COD_CATEGORIA,'+
'TAB_CATEGORIA.SABOR,'+
'TAB_PRODUTO.COD_CATE,'+
'TAB_PRODUTO.COD_PRODUTO,'+
'TAB_PRODUTO.DESCRICAO,'+
'TAB_PRODUTO.NOME'+
'FROM TAB_PRODUTO'+
'left join TAB_CATEGORIA ON TAB_CATEGORIA.COD_CATEGORIA = TAB_PRODUTO.COD_CATE'+
'order by TAB_CATEGORIA.COD_CATEGORIA asc';
qryListapro.Open();
qryListapro.First; |
Editado pela última vez por pauloD7 em Sex Abr 17, 2020 9:55 pm, num total de 1 vez |
|
Voltar ao Topo |
|
 |
JoaoSHi Experiente

Registrado: Segunda-Feira, 25 de Agosto de 2008 Mensagens: 484
|
Enviada: Sex Abr 17, 2020 11:13 am Assunto: |
|
|
Colega verifica se tem um espaço entre o ' e o FROM (pode ser este o problema).
Código: |
' FROM TAB_PRODUTO'+
' left join TAB_CATEGORIA ON TAB_CATEGORIA.COD_CATEGORIA = TAB_PRODUTO.COD_CATE'+
' order by TAB_CATEGORIA.COD_CATEGORIA asc'; |
|
|
Voltar ao Topo |
|
 |
pauloD7 Aprendiz

Registrado: Domingo, 17 de Abril de 2011 Mensagens: 165
|
Enviada: Sex Abr 17, 2020 11:36 am Assunto: |
|
|
JoaoSHi escreveu: | Colega verifica se tem um espaço entre o ' e o FROM (pode ser este o problema).
Código: |
' FROM TAB_PRODUTO'+
' left join TAB_CATEGORIA ON TAB_CATEGORIA.COD_CATEGORIA = TAB_PRODUTO.COD_CATE'+
' order by TAB_CATEGORIA.COD_CATEGORIA asc'; |
|
nao tem continua o mesmo erro |
|
Voltar ao Topo |
|
 |
imex Moderador

Registrado: Sexta-Feira, 7 de Janeiro de 2011 Mensagens: 11666
|
Enviada: Sex Abr 17, 2020 11:59 am Assunto: |
|
|
Bom dia,
Experimente utilizar o método Add para adicionar o comando SQL:
Código: | qryListapro.SQL.Add('select TAB_CATEGORIA.COD_CATEGORIA,');
qryListapro.SQL.Add('TAB_CATEGORIA.SABOR,');
qryListapro.SQL.Add('TAB_PRODUTO.COD_CATE,');
qryListapro.SQL.Add('TAB_PRODUTO.COD_PRODUTO,');
qryListapro.SQL.Add('TAB_PRODUTO.DESCRICAO,');
qryListapro.SQL.Add('TAB_PRODUTO.NOME');
qryListapro.SQL.Add('FROM TAB_PRODUTO');
qryListapro.SQL.Add('left join TAB_CATEGORIA ON TAB_CATEGORIA.COD_CATEGORIA = TAB_PRODUTO.COD_CATE');
qryListapro.SQL.Add('order by TAB_CATEGORIA.COD_CATEGORIA asc'); |
Espero que ajude
_________________
Assinatura: https://www.imoveisemexposicao.com.br/imobiliarias-em-guarulhos |
|
Voltar ao Topo |
|
 |
pauloD7 Aprendiz

Registrado: Domingo, 17 de Abril de 2011 Mensagens: 165
|
Enviada: Sex Abr 17, 2020 12:18 pm Assunto: |
|
|
imex escreveu: | Bom dia,
Experimente utilizar o método Add para adicionar o comando SQL:
Código: | qryListapro.SQL.Add('select TAB_CATEGORIA.COD_CATEGORIA,');
qryListapro.SQL.Add('TAB_CATEGORIA.SABOR,');
qryListapro.SQL.Add('TAB_PRODUTO.COD_CATE,');
qryListapro.SQL.Add('TAB_PRODUTO.COD_PRODUTO,');
qryListapro.SQL.Add('TAB_PRODUTO.DESCRICAO,');
qryListapro.SQL.Add('TAB_PRODUTO.NOME');
qryListapro.SQL.Add('FROM TAB_PRODUTO');
qryListapro.SQL.Add('left join TAB_CATEGORIA ON TAB_CATEGORIA.COD_CATEGORIA = TAB_PRODUTO.COD_CATE');
qryListapro.SQL.Add('order by TAB_CATEGORIA.COD_CATEGORIA asc'); |
Espero que ajude
_________________
Assinatura: https://www.imoveisemexposicao.com.br/imobiliarias-em-guarulhos |
Esta dando o mesmo erro de syntax
Código: | procedure TForm1.Button1Click(Sender: TObject);
var
qryListapro : TFDQuery;
ItemAdd : TListBoxItem;
//ItemAdd : TListViewItem;
begin
qryListapro := TFDQuery.Create(Nil);
qryListapro.Connection := conn;
qryListapro.SQL.Clear;
qryListapro.SQL.Add('SELECT TAB_CATEGORIA.COD_CATEGORIA,');
qryListapro.SQL.Add('TAB_CATEGORIA.SABOR,');
qryListapro.SQL.Add('TAB_PRODUTO.COD_CATE,');
qryListapro.SQL.Add('TAB_PRODUTO.COD_PRODUTO,');
qryListapro.SQL.Add('TAB_PRODUTO.DESCRICAO,');
qryListapro.SQL.Add('TAB_PRODUTO.VALOR');
qryListapro.SQL.Add('TAB_PRODUTO.NOME');
qryListapro.SQL.Add('FROM TAB_PRODUTO');
qryListapro.SQL.Add('left join TAB_CATEGORIA ON TAB_CATEGORIA.COD_CATEGORIA = TAB_PRODUTO.COD_CATE');
qryListapro.SQL.Add('order by TAB_CATEGORIA.COD_CATEGORIA asc');
qryListapro.Open();
qryListapro.First;
while NOT qryListapro.eof do
begin
lb.AddItem(qry_produto.FieldByName('COD_PRODUTO').AsString,
qryListapro.FieldByName('VALOR').AsFloat,
qryListapro.FieldByName('DESCRICAO').AsString,
qryListapro.FieldByName('Nome').AsString);
ListBCategoria.Items.Text := qryListapro.FieldByName('NOME').AsString;
qryListapro.Next;
end;
qryListapro.Close;
qryListapro.Free;
ListBCategoria.ItemWidth := 80;
end; |
|
|
Voltar ao Topo |
|
 |
imex Moderador

Registrado: Sexta-Feira, 7 de Janeiro de 2011 Mensagens: 11666
|
Enviada: Sex Abr 17, 2020 2:07 pm Assunto: |
|
|
Pelo que vi você adicionou o campo Valor e faltou uma vírgula após esse campo. |
|
Voltar ao Topo |
|
 |
pauloD7 Aprendiz

Registrado: Domingo, 17 de Abril de 2011 Mensagens: 165
|
Enviada: Sex Abr 17, 2020 9:54 pm Assunto: |
|
|
imex escreveu: | Pelo que vi você adicionou o campo Valor e faltou uma vírgula após esse campo. |
imex era isso mesmo me cegou obg valeu. |
|
Voltar ao Topo |
|
 |
|