Delphi XE2 - Erro TBookmark - GotoBookmark

Boa noite pessoal.
Estou precisando urgente a ajuda de vocês.
Após migrar para o delphi XE2, nenhum dos relatórios do sistema abrem, isso porque o procedimento abaixo ao ser executado sempre cai na exceção.
O problema está na função ou o componente IBQuery não suporta tal procedimento?

procedure TQryIndice.SetaPosicao;
var
pos : TBookmark;
begin
pos := TBookmark( FIndice.Objects[FPosicao]) ;
try
FTmpQuery.GotoBookmark(pos);
except on e: Exception do
begin
ShowMessage( e.Message);
end;
end;
end;