create or replace procedure JOB_CHANGE(JOB_ID in NUMBER,
                                           JOB_COMMAND in VARCHAR2,
                                           JOB_NEXT_DATE in DATE,
                                           JOB_INTERVAL in VARCHAR2
                                           )
as
   --V типа variable. 
   V_JOB_COMMAND VARCHAR(400);
   V_JOB_NEXT_DATE DATE;
   V_JOB_INTERVAL VARCHAR(400);
   
   --R - типа "результат". Значение, которое подадим для изменения значения джоба.
   R_JOB_COMMAND VARCHAR(400);
   R_JOB_NEXT_DATE DATE;
   R_JOB_INTERVAL VARCHAR(400);
   
begin
  

  
   SELECT TO_CHAR(J.WHAT) INTO V_JOB_COMMAND FROM ALL_JOBS J WHERE J.JOB = JOB_ID;
   IF JOB_COMMAND IS NULL THEN
     R_JOB_COMMAND := V_JOB_COMMAND;
   ELSE
     R_JOB_COMMAND := JOB_COMMAND;
   END IF;
   
   SELECT J.NEXT_DATE INTO V_JOB_NEXT_DATE FROM ALL_JOBS J WHERE J.JOB = JOB_ID;
   IF V_JOB_NEXT_DATE IS NULL THEN
     R_JOB_NEXT_DATE := V_JOB_NEXT_DATE;
   ELSE
     R_JOB_NEXT_DATE := JOB_NEXT_DATE;
   END IF;   
   
   SELECT TO_CHAR(J.INTERVAL) INTO V_JOB_INTERVAL FROM ALL_JOBS J WHERE J.JOB = JOB_ID;
   IF JOB_INTERVAL IS NULL THEN
     R_JOB_INTERVAL := V_JOB_INTERVAL;
   ELSE
     R_JOB_INTERVAL := JOB_INTERVAL;
   END IF;

   sys.dbms_job.change(job => JOB_ID,
                       what => R_JOB_COMMAND,
                       next_date => R_JOB_NEXT_DATE,
                       interval => R_JOB_INTERVAL);
   commit;
end;