Рабочее

[rattus_norveg]

Интересный вариант извращения придумался при отсутствии foreach

Цикл по датасету
{
try

IF (...1) {
    КОД1.
    continue;
    };

if (...2)
    {
    КОД2.
    continue;
    }

if (...N)
    {
    КОД_N.
    continue;
    }

finally
  dataset.next
end;

}//Конец цикла по датасету