1. CREATE OR REPLACE
  2. PROCEDURE num_test_as_integer IS
  3.   x INTEGER;
  4.   t NUMBER := dbms_utility.get_time;
  5. BEGIN
  6.   FOR i IN 1..10000000 LOOP
  7.    x := i;
  8.   END LOOP;
  9. dbms_output.put_line((dbms_utility.get_time-t)||'cs');
  10. END;
  11. -------------------------------------------
  12. PROCEDURE created.
  13. SQL> EXEC num_test_as_integer
  14. 500cs (среднее значение 5 выполнений)