declare
type tcur_ref is ref cursor;
cur_obj tcur_ref;
i_l_start number default dbms_utility.get_time;
str_l_dummy all_objects.object_name%type;
begin
for i in 1..1000
loop
open cur_obj for
'select object_name
from all_objects
where object_id = :x' using i; --使用了绑定变量
fetch cur_obj
into str_l_dummy;
close cur_obj;
end loop;
dbms_output.put_line ( round ( ( dbms_utility.get_time-i_l_start ) / 100,2) || 'seconds...');
end;
type tcur_ref is ref cursor;
cur_obj tcur_ref;
i_l_start number default dbms_utility.get_time;
str_l_dummy all_objects.object_name%type;
begin
for i in 1..1000
loop
open cur_obj for
'select object_name
from all_objects
where object_id = :x' using i; --使用了绑定变量
fetch cur_obj
into str_l_dummy;
close cur_obj;
end loop;
dbms_output.put_line ( round ( ( dbms_utility.get_time-i_l_start ) / 100,2) || 'seconds...');
end;