por favor alguien que me ayude tengo probelmas con un IBStored proc

[luisg]

no se como agregar guardar una imagen mediante el ibstoredproc, no se como definir el parametro ni como pasarlo he intentado de varias formas y me marca error este es el codigo:
sp:=TIBStoredProc.Create(nil);
sp.Database:=DtMdlEstetica.DbEstetica;
sp.StoredProcName:='SP_MODIFICA_EMPRESA';
sp.Params.CreateParam(ftString, 'PI_NOMBRE', ptInput).AsString:=nombre;
sp.Params.CreateParam(ftString, 'PI_DOMICILIO', ptInput).AsString:=domicilio;
sp.Params.CreateParam(ftString, 'PI_TELEFONO', ptInput).AsString:=telefono;
sp.Params.CreateParam(ftString, 'PI_PAGINAWEB', ptInput).AsString:=paginaweb;
sp.Params.CreateParam(ftBlob, 'PI_LOGO', ptInput);
bs:=TBlobStream.Create(TBlobField(sp.ParamByName('PI_LOGO')), bmReadWrite);
img:=TJPEGImage.Create;
img.Assign(logo.Picture);
img.SaveToStream(bs);
img.Free;
bs.Free;
sp.Free;