go_block('block_name');
first_record;
LOOP
  message(:block_name.item);
  if :system.last_record  = 'TRUE' then
      exit;
  end if;
  next_record;
END LOOP;