create or replace procedure UpdateSQLPLUS(tcSqlPlusPath in varchar2,
                                          tcScriptPath  in varchar2) as
lcJobName varchar2(500);
begin
  lcJobName := 'updateschema_' || to_char(sysdate, 'YYYYMMDDHH24MISS');
  dbms_scheduler.create_job(lcJobName,
                            job_action          => tcSqlPlusPath,
                            number_of_arguments => 2,
                            job_type            => 'executable',
                            enabled             => false);
  dbms_scheduler.set_job_argument_value(lcJobName, 1, '/nolog');
  dbms_scheduler.set_job_argument_value(lcJobName, 2, '@' || tcScriptPath);
  dbms_scheduler.enable(lcJobName);
end;
/