1.准备并发测试的内容
create or replace procedure p_task is
begin
for i in 1 .. 5000 loop
for j in (select * from scott.emp where empno=7369) loop
null;
end loop;
end loop;
end;
2.通过JOB的形式实现并发
--JOB的并发度依赖于参数job_queue_processes
declare
v_job_no number;
begin
for v_parallel in 1 .. 50 loop
dbms_job.submit(job=>v_job_no,what=>'p_task;');
commit;
end loop;
end;
3.监控
--根据需求查询并发时的系统状态
select * from v$session_wait
where wait_class!='Idle'
4.测试完成后删除JOB
begin
for v_job in (select * from dba_jobs where what='p_task;') loop
dbms_job.remove(v_job.job);
commit;
end loop;
end;
create or replace procedure p_task is
begin
for i in 1 .. 5000 loop
for j in (select * from scott.emp where empno=7369) loop
null;
end loop;
end loop;
end;
2.通过JOB的形式实现并发
--JOB的并发度依赖于参数job_queue_processes
declare
v_job_no number;
begin
for v_parallel in 1 .. 50 loop
dbms_job.submit(job=>v_job_no,what=>'p_task;');
commit;
end loop;
end;
3.监控
--根据需求查询并发时的系统状态
select * from v$session_wait
where wait_class!='Idle'
4.测试完成后删除JOB
begin
for v_job in (select * from dba_jobs where what='p_task;') loop
dbms_job.remove(v_job.job);
commit;
end loop;
end;
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/28539951/viewspace-2133802/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/28539951/viewspace-2133802/