create or replace procedure sp_test_handle(v_task_id number --任务编号
                                           ) as
  -----------------------------------------------------------------------
  -- 功能: 存储过程异步处理测试
  -- 创建: lidongping 2020-9-30
  -----------------------------------------------------------------------

begin

  -- 参数检查
  if (v_task_id is null) then
    dbms_output.put_line(‘v_task_id 为空‘);
    return;
  end if;

  -- 处理业务
  dbms_output.put_line(‘处理复杂的业务:‘ || v_task_id);

exception
  when others then
    rollback;
    dbms_output.put_line(‘处理异常:‘ || v_task_id);
end;

create or replace procedure sp_test_handle_run(v_task_id number, -- 批次号
                                               v_out_code out number, -- 错误码
                                               v_out_msg  out varchar2) -- 错误消息
 as
  -----------------------------------------------------------------------
  -- 功能: 执行任务
  -----------------------------------------------------------------------
  l_job_name varchar2(128) := ‘TEST_HANDLE_JOBS‘;

begin

  -- 设置存储过程参数
  dbms_scheduler.set_job_argument_value(job_name          => l_job_name,
                                        argument_position => 1,
                                        argument_value    => v_task_id);

  -- 启动job
  dbms_scheduler.enable(l_job_name);
  v_out_code := error_code.success;
  v_out_msg  := ‘操作成功‘;

exception
  when others then
    rollback;
    v_out_code := error_code.failed;
    v_out_msg  := ‘过程异常:‘ || sqlerrm;
end;