tib_query

[titi-delphi 0]

bom dia pessoal estou com um problema aqui no desenvolvimento de um sistema,,

o negocio e o seguinte tem uma query que filtra todas as batidas dos funcionarios,

no evento on create do form e coloco o seguinte codigo na query

 

qrybatidas.Close;
qrybatidas.SQL.Clear;
qrybatidas.SQL.Add('SELECT b.id,b.idfuncionario,f.nome,b.data,b.dia,'+
' S.DESCRICAO,b.codsituacao,b.batida1,'+
' b.batida2,b.batida3,b.batida4,'+
' b.htrab,b.hatraso,b.hextra,b.hfalta,hnoturna,b.usercad,b.useralter'+
' FROM BATIDAPONTOcont b,funcionarios f, SITUACAO S where'+
' b.idfuncionario=f.id and b.codsituacao=s.id '+
'  order by f.nome, b.data');
qrybatidas.Prepare;
qrybatidas.Open;

ate ai tudo bem.. mais ai quando eu vou filtra este select selecionado ao dar o comando qrybatidas.sql.clear.

o sistema gera o seguinte erro....

 

project sisccponto.exe raised exception class eib_statementerror whith message 'Nome de campo:

descricao nao encontrado'.process stopped. Use step or run continue.

 

lembrado que eu uso um datasource ligado a esse query para alimentar um dbgrid e tbm uso os componentes da paleta iboobjects

 

o codigo que esta dando o erro do botao filtrar e o seguinte...

 

qrybatidas.Close;
qrybatidas.SQL.Clear;
qrybatidas.SQL.Add('SELECT b.id,b.idfuncionario,f.nome,b.data,b.dia,'+
' S.DESCRICAO,b.codsituacao,b.batida1,'+
' b.batida2,b.batida3,b.batida4,'+
' b.htrab,b.hatraso,b.hextra,b.hfalta,hnoturna,b.usercad,b.useralter'+
' FROM BATIDAPONTOcont b,funcionarios f, SITUACAO S where'+
' b.idfuncionario=f.id and b.codsituacao=s.id and b.data between :data1 and :data2'+
' and b.idfuncionario=:id order by f.nome, b.data');
qrybatidas.Prepare;
qrybatidas.Params.ParamByName('data1').Value:=data1.Date;
    qrybatidas.Params.ParamByName('data2').Value:=data2.Date;
      qrybatidas.Params.ParamByName('idfunc').Value:=qryfiltrafunc.fieldbyname('id').Value;

qrybatidas.Open;

Porem o erro da ao limpar a query

[Mário Monteiro 179]

Conforme o aviso existente no fórum de origem deste post, não é permitida a postagem de dúvidas nesta área, motivo pelo qual este tópico será movido para o fórum principal deste assunto.

 

Tópico Movido

 

Origem: Artigos, Tutoriais e Matérias (Delphi) http://forum.imasters.com.br/public/style_emoticons/default/seta.gif Destino: Delphi