[firebase-br] Delphi 7 / Ibobjects / Firebird 5

[Osvaldo G. Da Cruz Júnior - NetNúcleo]

Olá pessoal,

Estou fazendo testes para atualizar o banco de Firebird 2.1 para o 5.
Ainda utilizo o Delphi 7 com IBObject versão 4.7.16
Ao executar uma TIBOQuery com a SQL abaixo aparece erro: *unsupported
column type 32753*
select 'A' as A, (coalesce(sum(MOVTO.ENTRADA), 0) -
coalesce(sum(MOVTO.SAIDA), 0)) as INICIAL from FIN_MOVTO MOVTO group by 1
==>> Os campos ENTRADA e SAIDA são numeric(15,2)

Quando utilizo o CAST(campos as NUMERIC(15,2)) dá certo:
select 'A' as A, cast((coalesce(sum(MOVTO.ENTRADA), 0) -
coalesce(sum(MOVTO.SAIDA), 0)) as numeric(15,2)) as INICIAL from FIN_MOVTO
MOVTO group by 1

Existe uma forma de fazer o SET no Firebird ser automático no formato
numeric(15,2) ou até mesmo no IBO fazer a conversão de um tipo de campo
desconhecido para o numérico?
A dificuldade está em fazer a alteração nas "querys" adicionando o cast(),
pois são centenas e tem muita lógica envolvida.



Grato,



Osvaldo *Júnior* <junior em netnucleo.com.br>
NetNúcleo.com.br <http://www.netnucleo.com.br> NetBovino.com.br
<http://www.netbovino.com.br>