Oracle PL/SQL Tutorial/PL SQL Programming/dbms utility
dbms_utility.get_time
<source lang="sql">
SQL> SQL> declare
2 type rc is ref cursor; 3 l_rc rc; 4 l_dummy all_objects.object_name%type; 5 l_start number default dbms_utility.get_time; 6 begin 7 for i in 1 .. 1000 8 loop 9 open l_rc for 10 "select object_name 11 from all_objects 12 where object_id = :x" 13 using i; 14 fetch l_rc into l_dummy; 15 close l_rc; 16 end loop; 17 dbms_output.put_line 18 ( round( (dbms_utility.get_time-l_start)/100, 2 ) || 19 " seconds..." ); 20 end; 21 /
.63 seconds... PL/SQL procedure successfully completed. Elapsed: 00:00:00.70 SQL> SQL> set timing off</source>
Declare dbms_utility.get_time as a variable default value
<source lang="sql">
SQL> set echo on SQL> SQL> SQL> create table t ( x int ); Table created. SQL> SQL> set serveroutput on SQL> SQL> declare
2 l_start number default dbms_utility.get_time; 3 begin 4 for i in 1 .. 1000 5 loop 6 insert into t values ( 1 ); 7 end loop; 8 commit; 9 dbms_output.put_line ( dbms_utility.get_time-l_start || " hsecs" ); 10 end; 11 /
19 hsecs PL/SQL procedure successfully completed. SQL> SQL> SQL> SQL> drop table t; Table dropped. SQL> SQL></source>