Help me to change DBMS_JOB to DBMS_SCHEDULER

Question

Hi,
Recently we moved to Oracle10G, in prevous version we used DBMS_JOB package for scheduling jobs. Now we want to use DBMS_SCHEDULER . can anybody help me please?
Below is my senario....
This proc. iam calling in my form Submit_button click..
PROCEDURE Job_Submit(P_Nav_Group IN VARCHAR2,
P_Nav_Process IN VARCHAR2,
P_Start_Time IN VARCHAR2,
P_Job IN OUT NUMBER ,
P_Cretour IN OUT VARCHAR2,
P_Nproc IN OUT VARCHAR2,
P_Message IN OUT VARCHAR2,
P_Cetat IN OUT VARCHAR2) IS
Cursor Cur_Nav_Process_Log Is Select Load_Log
From T_Nav_Process_Log
Where Nav_Process = P_Nav_Process;
Jobno NUMBER;
V_Proc VARCHAR2(100);
V_Interval VARCHAR2(100);
V_Hour NUMBER(4);
V_Min NUMBER(2);
V_Date1 DATE;
V_Numer NUMBER(6);
V_Deno NUMBER(6):= 1440; --(24*60)
V_Load_Log T_Nav_Process_Log.Load_Log%Type; --
BEGIN
COMMIT;
V_Hour := SUBSTR(P_Start_Time,1,2);
V_Min := SUBSTR(P_Start_Time,4,2);
V_Hour := V_Hour*60; -- To convert the hours into minutes
V_Numer:= V_Hour + V_Min; -- To get the total time minutes
V_Date1:= Trunc(SYSDATE) + (V_Numer/V_deno); -- To get the exact time for execution
Open Cur_Nav_Process_Log;
Fetch Cur_Nav_Process_Log Into V_Load_Log;
Close Cur_Nav_Process_Log;
IF V_Date1 < SYSDATE OR Upper(V_Load_Log) = 'Y' THEN
V_Date1:= Trunc(SYSDATE+1) + (V_Numer/V_deno);
END IF;
IF P_Nav_Process Like 'TR%' Or P_Nav_Process Like 'SB%' THEN
V_Proc := 'Nav_Compta_7.Trans_Dispatch
('''||P_Nav_Group||''','''||P_Nav_Process||''');';
V_Interval := 'Nav_Compta_7.Job_Interval ('''||P_Start_Time||''')';
Elsif P_Nav_Process Like 'TX%' THEN
V_Proc := 'Nav_Compta_7.Trans_CGT_Dispatch
('''||P_Nav_Group||''','''||P_Nav_Process||''');';
V_Interval := 'Nav_Compta_7.Job_Interval('''||P_Start_Time||''')';
END IF;
If V_Proc is Not Null then
Dbms_Job.Submit(Jobno ,V_Proc, V_Date1 ,V_Interval);
End If;
COMMIT;
EXCEPTION
When Others Then
P_Cretour := '7';
P_Nproc := 'Job_Submit';
P_Message := P_Message||' - NAV Group '||P_Nav_Group||' Job '||Jobno;
Infos.Format_Message(P_Nproc, P_Message, Sqlerrm(Sqlcode));
END Job_Submit;
2)This function will return next intervel...
FUNCTION Job_Interval(P_Start_Time IN VARCHAR2) RETURN DATE AS
V_Hour NUMBER(4);
V_Min NUMBER(2);
V_Date1 DATE;
V_Numer NUMBER(6);
V_Deno NUMBER(6):= 1440; --(24 hours *60 minutes)
V_Cretour VARCHAR2(30) := '0';
V_Nproc VARCHAR2(100);
V_Message VARCHAR2(2000);
V_Cetat VARCHAR2(30);
BEGIN
V_Hour := SUBSTR(P_Start_Time,1,2); -- To separate the hours from the string
V_Min := SUBSTR(P_Start_Time,4,2); -- To separate the minutes from the string
V_Hour := V_Hour*60; -- To convert the hours into minutes
V_Numer:= V_Hour + V_Min; -- To get the total time minutes
V_Date1:= Trunc(SYSDATE + 1) + (V_Numer/V_deno); -- To get the exact time for execution
RETURN (v_Date1);
END Job_Interval;
Regards
Mallikarjun

Answer 1

duplicate thread -> Re: Help me to change DBMS_JOB to DBMS_SCHEDULER