Fórum Erro em sql no delphi #350864
19/12/2007
0
Que erro há nesse sql
Ta dando esso erro de Parametro não existe.
Já coloquei lá no parametro esse mesmo campo, só que fica dando esse erro.
Que faço?
if not (projeto.Text=´´) then begin
dm.sdsLancamento2.Close;
dm.sdsLancamento2.CommandText:=´select id_lancamento_projeto, cod_projeto_lancamento, ´ +
´cod_grupo_fk, id_grupo from lancamento_projeto ´ +
´inner join grupo on lancamento_projeto.cod_grupo_fk ´ +
´= grupo.id_grupo ´ +
´where cod_projeto_lancamento =: cod_projeto_lancamento´;
dm.sdsLancamento2.ParamByName(´cod_projeto_lancamento´).AsString:=projeto.Text;
dm.sdsLancamento2.Open;
dm.cdsLancamento2.Close;
dm.cdsLancamento2.Open;
dm.cdsLancamento2.Refresh;
end;
Ta dando esso erro de Parametro não existe.
--------------------------- Debugger Exception Notification --------------------------- Project MATERIAIS.exe raised exception class EDatabaseError with message ´sdsLancamento2: Parameter ´cod_projeto_lancamento´ not found´. Process stopped. Use Step or Run to continue. --------------------------- OK Help ---------------------------
Já coloquei lá no parametro esse mesmo campo, só que fica dando esse erro.
Que faço?
Jpauloss
Curtir tópico
+ 0
Responder
Posts
20/12/2007
Andersonscinfo
pela mensagem de erro que ta dando...aparece que este campo não existe...mas vendo se código eu percebi duas coias que ao meu ver não estão corretas...
1º vc ta usando um parametro com o mesmo nome de um campo.....não recomendo...
2º onde vc definiu o parametro existe um espaço entre os : e o parametro...isso é errado...tem que estar junto
1º vc ta usando um parametro com o mesmo nome de um campo.....não recomendo...
2º onde vc definiu o parametro existe um espaço entre os : e o parametro...isso é errado...tem que estar junto
if not (projeto.Text=´´) then begin
dm.sdsLancamento2.Close;
dm.sdsLancamento2.CommandText:=´select id_lancamento_projeto, cod_projeto_lancamento, ´ +
´cod_grupo_fk, id_grupo from lancamento_projeto ´ +
´inner join grupo on lancamento_projeto.cod_grupo_fk ´ +
´= grupo.id_grupo ´ +
´where cod_projeto_lancamento = :cod_pr_lan´;
dm.sdsLancamento2.ParamByName(´cod_pr_lan´).AsString:=projeto.Text;
dm.sdsLancamento2.Open;
dm.cdsLancamento2.Close;
dm.cdsLancamento2.Open;
end;
Responder
Gostei + 0
21/12/2007
Jpauloss
Valeu resolvido!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)