Заполнение таблицы по диапазону

SELECT   t.start_range
        ,t.end_range
        ,(t.start_range+(level-1)) val_range
    FROM range_table t
    WHERE t.val_range IS NULL
  CONNECT BY (level-1) <= (t.end_range-t.start_range)

WITH temp (start_range,end_range,val_range) AS
 (SELECT start_range,end_range,val_range FROM range_table t WHERE t.val_range IS NULL-- Initial Subquery
 UNION ALL
 SELECT start_range,end_range,val_range+1 FROM temp -- Recursive Subquery
 WHERE val_range < end_range)
SELECT start_range,end_range,val_range FROM temp

DECLARE
  v_i NUMBER(10);
BEGIN
  FOR v_gt IN (SELECT /*+ parallel(t 10)*/ t.start_range,t.end_range FROM range_table t WHERE t.val_range IS NULL)
    LOOP
      v_i:=0;
--Выводим сколько будет добавлено строк в таблицу
      dbms_output.put_line(v_gt.end_range||'-'||v_gt.start_range||'='||(v_gt.end_range-v_gt.start_range));
      LOOP
        INSERT INTO /*+ append */ range_table (start_range,end_range,val_range)
        VALUES (v_gt.start_range,v_gt.end_range,(v_gt.start_range+v_i));
--Через каждые 1000 строк делаем коммит
        IF MOD(v_i,1000)=0
          THEN
            commit;
          END IF;
        v_i:=v_i+1;
--Если мы дошли до границы диапазона, то выходим из цикла и берем следующую партию диапазонов
        EXIT WHEN (v_i+v_gt.start_range) > v_gt.end_range;
      END LOOP;
--еще раз делаем коммит
      commit;
    END LOOP;
--удаляем все строки, у которых поле val_range не заполнено
DELETE FROM range_table t WHERE t.val_range IS NULL;
commit;
END;

WITH temp (start_range,end_range,val_range) AS
 (SELECT start_range,end_range,val_range FROM range_table t WHERE t.val_range IS NULL-- Initial Subquery
 UNION ALL
 SELECT start_range,end_range,val_range+1 FROM temp -- Recursive Subquery
 WHERE val_range < end_range)
SELECT start_range,end_range,val_range FROM temp