本文共 2258 字，大约阅读时间需要 7 分钟。

说明：本文为面向PL/SQL开发初学者的指导手册

set serveroutput onset line 150set pages 200col error for a80declare  i          simple_integer := 1;  j          simple_integer := 2000;  s1         simple_integer := 0;  s2         simple_integer := 0;  v_job_name varchar2(50);  flag       pls_integer;  --cur job running  cursor cur_jobs_run is    select *      from dba_scheduler_running_jobs r     where r.OWNER = 'ZZT'       and r.JOB_STYLE = 'LIGHTWEIGHT';  re_cur_jobs_run cur_jobs_run%ROWTYPE;  --cur job list  cursor cur_jobs_list is    select *      from dba_scheduler_jobs j     where j.owner = 'ZZT'       and j.JOB_STYLE = 'LIGHTWEIGHT';  re_cur_jobs_list cur_jobs_list%ROWTYPE;begin  --【stop jobs】  dbms_output.put_line('***************
   
    ***************');  for re_cur_jobs_run in cur_jobs_run loop    v_job_name := re_cur_jobs_run.owner || '.' || re_cur_jobs_run.job_name;    dbms_scheduler.stop_job(v_job_name);    dbms_output.put_line('>>> job: ' || v_job_name || ' is stoped!');    s1 := s1 + 1;  end loop;  dbms_output.put_line('// Total stoped <' || s1 ||                       '> jobs, and no jobs running now !');  --【drop jobs】  open cur_jobs_list;  loop    fetch cur_jobs_list      into re_cur_jobs_list;    if cur_jobs_list%FOUND then      v_job_name := re_cur_jobs_list.owner || '.' ||                    re_cur_jobs_list.job_name;      dbms_scheduler.drop_job(v_job_name, true);      dbms_output.put_line('>>> job: ' || v_job_name || ' is droped!');    else      dbms_output.put_line('// Total droped <' || s1 ||                           '> jobs, no more jobs exist or AUTO-DROPED !');      exit when cur_jobs_list%NOTFOUND;    end if;    s2 := s2 + 1;  end loop;  close cur_jobs_list;  dbms_output.put_line('***************
    
     ***************');  --【exception】exception  when others then    --close cur_jobs_run    if cur_jobs_run%isopen then      close cur_jobs_list;      dbms_output.put_line('>>> error [cur_jobs_run]');    end if;    --close cur_jobs_list    if cur_jobs_list%isopen then      close cur_jobs_list;      dbms_output.put_line('>>> error [cur_jobs_list]');    end if;end;/
    
   

※ 如果您觉得文章写的还不错， 别忘了在文末给作者点个赞哦 ~

over

转载地址：https://blog.csdn.net/zzt_2009/article/details/112388363 如侵犯您的版权，请留言回复原文章的地址，我们会给您删除此文章，给您带来不便请您谅解！