currow(<курсор>)
<курсор>
– имя курсорной переменной.
Возвращает номер текущей строки открытого курсора или 0, если курсор не открыт.
После удаления текущей строки курсор автоматически встает на следующую строку, если ее нет – на предыдущую. Соответственно, оператор fetch сдвигает курсор еще на одну строку. Не произойти изменения текущей строки после операции delete current of cursor никак не может, т.к. этой текущей строки уже нет. Номер текущей строки по возможности сохраняется.
В приведенном примере удаление строк выполняется не подряд, через одну строку:
while not outofcursor(a) loop execute "delete from tab1 where current of \"cursor_a\";";// print ("Текущая строка курсора:"+ to_char(currow(a)));// fetch a;// endloop