Erro Strore Procedure para Inserir e Update

USO DELPHI 7+FB1.5+DBEXPRESS

A procedure e para inserir uma foto e para alterar uma foto

Tenho um SQLDataset para acionar a procedure, ele esta como command type = storeProcedure

Os parametros estão configirador como Ft Blob e input and output

***** A PROCEDURE *******

CREATE PROCEDURE INSERT_FOTOS (
VCODBAR VARCHAR (13),
IFOTO BLOB sub_type 0 segment size 80)
AS

begin

insert into fotos_pro (CODBARRA, FOTO)
VALUES (:vcodbar, :ifoto);

end

*** CHAMANDO A PROCEDURE E PASSANDO PARAMETROS

dm.SQL_FOTO2.Close;
dm.CDT_FOTO.Active:=false;
dm.SQL_FOTO2.CommandText:=´INSERT_FOTOS´;
dm.SQL_FOTO2.ParamByName(´VCODBAR´).AsString:=dbedit35.Text;
dm.SQL_FOTO2.ParamByName(´iFOTO´).LoadFromStream(VI,ftBlob);
dm.SQL_FOTO2.ExecSQL;

**** O ERRO ******

´unassigned code´


Nilson

Agradeço a todos antecipadamente e

T+