[firebase-br] Erro

[FireBird FireBird]

Pessoa estou com a seguinte procedure.CREATE PROCEDURE SP_EMISSAO_RAZAO (
    COD_EMP INTEGER,
    COD_CONTA INTEGER,
    DTA_INI DATE,
    DTA_FIM DATE)
RETURNS (
    COD_MOV INTEGER,
    CONTA_DEB INTEGER,
    CONTA_CRE INTEGER,
    DTA_MOV DATE,
    VALOR NUMERIC (9, 2),
    HISTORICO BLOB sub_type 1 segment size 128,
    VALOR_DEB NUMERIC (9, 2),
    VALOR_CRE NUMERIC (9, 2),
    SALDO NUMERIC (9, 2))
AS
  declare variable SALDO_ANT_DEBITO NUMERIC (9,2);
  declare variable SALDO_ANT_CREDITO NUMERIC (9,2);
  declare variable SALDO_FINAL NUMERIC (9,2);
  declare variable SALDO_ANTERIOR NUMERIC (9,2);
BEGIN
    select sum(CTMOV.VR_MOV)
    from CTMOV
    where (CTMOV.DTA_MOV <:DTA_INI)
    And CTMOV.DEB_MOV=:COD_CONTA
    Into: SALDO_ANT_DEBITO;

    select sum(CTMOV.VR_MOV)
    from CTMOV
    where (CTMOV.DTA_MOV <:DTA_INI)
    And CTMOV.CRED_MOV=:COD_CONTA
    Into: SALDO_ANT_CREDITO;

    DTA_MOV = DTA_INI-1;
    HISTORICO='SALDO ANTERIOR'; <<<<<<<<<<< Da erro neste ponto, estou
escrevendo 'SALDO ANTERIOR', este e um campo Blob. se modifica-lo para
varchar funciona.



Alguem sabe como resolver isto?
Uma forma de poder escrever este texto.

O erro e:
unsucessful execution caused by a system
error that precludes sucessful of
subsequent statemenets internal erro.


Valeu pessoal!!!!