Convertendo data, Erro de Todas as Formas

Question

Cansei!Estou tentando fazer um update em uma query assim:  AtuProduto := �UPDATE TBPRODUTO SET PRQUANTIDADE = PRQUANTIDADE + �+ IBDataSet1.FieldByName(�INFQUANTIDADE�).AsString +                �, PRU...

Deus · Answer

Bem, confesso que vi duas coisas que podem ser problema.

1o: Voc� falou que tentou converter com

FormatDate(�dd,mm,yy�, FrmNotaFiscal.IBDataSet1NFDATAEMISSAO.AsDateTime);

Primeiro, o Interbase trabalha com mm/dd/yyyy. Veja se o problema n�o s�o os 4 d�gitos para o ano, ao inv�s de 2. Segundo, veja se o uso da barra ao inv�s da v�rgula n�o solucionaria o problema. 3, pq vc chama como string, ao inv�s de Date? Ficaria assim:

�, PRUTLDATA = � + QuotedStr(FormatDateTime(�mm/dd/yyyy�, FrmNotaFiscal.IBDataSet1NFDATAEMISSAO.AsDateTime))

2o.: Voc� usou, no final da expressao, o seguinte:

�WHERE ID = �+ IBDataSet1.FieldByName(�INFPRODUTO_ID�).AsString +�;�;

Primeiro, ID � um campo string ou inteiro? Se ele � string, est� sendo chamado referenciado errado - cad� as aspas? Se ele � inteiro, pq est� sendo chamado AsString? Segundo, n�o h� necessidade do ponto e v�rgula no final. Poderia ficar da seguinte forma:

�WHERE ID = � + QuotedStr(IBDataSet1.FieldByName(�INFPRODUTO_ID�).AsString)

ou ent�o

�WHERE ID = � + IBDataSet1.FieldByName(�INFPRODUTO_ID�).AsInteger

Verifique se n�o � isso.

Espero ter ajudado. Abra�os, dEUS.

F�rum Convertendo data, Erro de Todas as Formas #198556