ola, estou migrando um sistema dem firebird para postgre, utilizo conexao via
ado + clientdataset, mas não consigo gravar informações em campo numeric, segue
minha rotina de importacao:
if q_servico.RecordCount > 0 then
repeat
if cds_servico.Locate('SE_COD',
q_servico.FieldByName('SE_COD').AsInteger,[]) = false then
begin
cds_servico.Append;
cds_servico.FieldByName('SE_COD').AsInteger :=
q_servico.FieldByName('SE_COD').AsInteger;
cds_servico.FieldByName('SE_DESC').AsString :=
q_servico.FieldByName('SE_DESC').AsString;
t := STRTOFLOAT (q_servico.FieldByName('SE_COMISSAO').AsSTRING);
cds_servico.FieldByName('SE_COMISSAO').AsFloat := T;
cds_servico.FieldByName('SE_TMPGARANT').AsInteger :=
q_servico.FieldByName('SE_TMPGARANT').AsInteger;
cds_servico.FieldByName('SE_STATUS').AsString :=
q_servico.FieldByName('SE_STATUS').AsString;
t := q_servico.FieldByName('SE_VALOR').AsFloat;
cds_servico.FieldByName('SE_VALOR').AsFloat := t;
cds_servico.Post;
cds_servico.ApplyUpdates(0);
end;
Progresso.Progress := (q_servico.Recno * 100) div
q_servico.RecordCount;
q_servico.next;
Application.ProcessMessages;
until q_servico.eof;
porem da o erro: raised exception class EOleException with message "ERROR:
column "se_comissao" is of type numeric but expression is of type money.
Como posso solucionar este problema, visto que tanto no firebird como no
postgree o campo foi criado como numeric (9,2) ?
_______________________________________________
pgbr-geral mailing list
[email protected]
https://listas.postgresql.org.br/cgi-bin/mailman/listinfo/pgbr-geral
