удаление из таблицы без индекса

[A K]

есть большая таблица. миллиона записей. все индексы снесены.
стоит задача удалить часть записей. какой вариант отработает
быстрее:

1)

create procedure del
as
  declare variable id integer;
begin
  for select id from table into :id do
  begin
    if (chеck some condition)
      then delete from table where id=:id;
  end
end

2)

create procedure del
as
  declare variable id integer;
begin
  for select id from table into :id as cursor tcur do
  begin
    if (check some condition)
      then delete from table where current of tcur;
  end
end

я понимаю, что можно поставить эксперимент, но сейчас полдесятого вечера
воскр. может кто так знает ответ?

андрей