Erro de conversão

Delphi

16/08/2011

Dá esse erro, mas a query funcionava. Esse é meu código. O errop é ess:   Conversion failed when converting datetime from character string  
DM.qryAtualiza.Sql.Clear;
  if (rgBanco.ItemIndex = 1) and (edtQtde.Text <> '') then
    DM.qryAtualiza.Sql.Add('select top ' + edtQtde.Text + ' numero_conhecimento,data_emissao_conhecimento,filial_origem ' +
                           ' from conhecimento_carga where data_emissao_conhecimento = ''1899-12-30 00:00:00.000''');
  DM.qryAtualiza.Open;
  sql := Memo1.Lines.Text;
  Gauge1.Visible := True;
  gauge1.MinValue := 0;
  gauge1.MaxValue := DM.qryAtualiza.RecordCount;
  //pb.Max := DM.qryAtualiza.RecordCount;
  //pb.Position := 0;
  DM.qryAtualiza.First;
  while not DM.qryAtualiza.Eof do
  begin
    try
      //DM.Conn.BeginTrans;
      Application.ProcessMessages;
      qry.SQL.add(sql);
      qry.Parameters.ParamByName('Filial').Value  := DM.qryAtualiza.FieldByName('filial_origem').AsString;
      qry.Parameters.ParamByName('Numero').Value  := DM.qryAtualiza.FieldByName('numero_conhecimento').AsString;
      qry.Parameters.ParamByName('Emissao').Value := DM.qryAtualiza.FieldByName('data_emissao_conhecimento').AsDateTime;
      qry.ExecSQL;
  E Essa é minha query
UPDATE
CONHECIMENTO_CARGA
SET
DATA_EMISSAO_CONHECIMENTO = COALESCE(
(SELECT DISTINCT
OPERACOES_DATA.DATA FROM OPERACOES_DATA
WHERE
OPERACOES_DATA.CONTRATO = 
CONHECIMENTO_CARGA.NUMERO_CONHECIMENTO AND
OPERACOES_DATA.COD_CREDENCIADA = 
CONHECIMENTO_CARGA.FILIAL_ORIGEM AND
OPERACOES_DATA.DATA = 
CONHECIMENTO_CARGA.DATA_EMISSAO_REAL), 
DATA_EMISSAO_CONHECIMENTO )
WHERE
DATA_EMISSAO_CONHECIMENTO = '1899-12-30 
00:00:00.000' AND
FILIAL_ORIGEM = :FILIAL AND
NUMERO_CONHECIMENTO = :NUMERO AND
DATA_EMISSAO_CONHECIMENTO = :EMISSAO
Pjava

Pjava

Curtidas 0
POSTAR