Firebird 2.5 delphi 7 campo BCD numeric Ajuda

Pessoal, tenho um campo no firebird 2.5 ... valorpedido (numeric,15,2).


tenho uma procedure onde um dos campos e´ o valorprocedure definido como valorprocedure:dcb

quando coloco

valorpedido.value:= valorprocedure // recebo mensagem incompatible types TBcd and _DCB


se altero para

valorpedido.asfloat:=valorprocedure //recebo mensagem incompatible type Double and _DCB


Agradeco pela ajuda, pois estou comecando agora com Firebird 2.5