CREATE OR REPLACE PROCEDURE p
AS
   v_sql   VARCHAR2 (1000);
BEGIN
   v_sql := 'select junk from abc';

   EXECUTE IMMEDIATE v_sql;
EXCEPTION
   WHEN OTHERS
   THEN
	NULL;
END;
/

DECLARE
   v_program_name    VARCHAR2 (30);
   v_schedule_name   VARCHAR2 (30);
   v_job_name        VARCHAR2 (30);
   v_count            NUMBER;
   v_sql_string      VARCHAR2 (1000);
BEGIN
--create schedule
   v_schedule_name := 'P_SCHED';
   v_sql_string :=
      'SELECT COUNT(1) from user_SCHEDULER_SCHEDULES where SCHEDULE_name=:1';
   EXECUTE IMMEDIATE v_sql_string INTO v_count USING v_schedule_name;
   IF v_count = 0
   THEN
      v_sql_string :=
            ' BEGIN  '
         || 'DBMS_SCHEDULER.create_schedule ('
         || ' schedule_name          => '
         || CHR (39)
         || 'P_SCHED'
         || CHR (39)
         || ','
         || '   start_date            => trunc(sysdate)'
         || ','
         || '  repeat_interval         => '
         || CHR (39)
         || 'freq=MINUTELY;byhour=0;byminute=0;bysecond=10'
         || CHR (39)
         || ','
         || 'comments        =>'
         || CHR (39)
         || 'Schedule for the P_PROC stored proc to execute daily at 9.15 am'
         || CHR (39)
         || ');'
         || 'END;';
      DBMS_OUTPUT.PUT_LINE (v_sql_string);
      EXECUTE IMMEDIATE v_sql_string;
   END IF;

--create program
   v_program_name := 'P_PROG';
   v_sql_string :=
      'SELECT COUNT(1) from user_scheduler_programs where program_name=:1';

   EXECUTE IMMEDIATE v_sql_string INTO v_count USING v_program_name;

   IF v_count = 0
   THEN
      v_sql_string :=
            ' BEGIN  '
         || 'DBMS_SCHEDULER.create_program   ('
         || ' program_name         => '
         || CHR (39)
         || 'P_PROG'
         || CHR (39)
         || ','
         || ' program_type         => '
         || CHR (39)
         || 'STORED_PROCEDURE'
         || CHR (39)
         || ','
         || ' program_action         => '
         || CHR (39)
         || 'P'
         || CHR (39)
         || ','
         || 'enabled         => FALSE,'
         || 'comments        =>'
         || CHR (39)
         || 'Program definition for calling the P_PROC stored proc '
         || CHR (39)
         || ');'
         || 'END;';
      DBMS_OUTPUT.PUT_LINE (v_sql_string);

      EXECUTE IMMEDIATE v_sql_string;



--Enable the program 
      v_sql_string :=
            ' BEGIN  '
         || 'DBMS_SCHEDULER.enable    ('
         || ' name         => '
         || CHR (39)
         || 'P_PROG'
         || CHR (39)
         || ');'
         || 'END;';

      DBMS_OUTPUT.PUT_LINE (v_sql_string);
      EXECUTE IMMEDIATE v_sql_string;


   END IF;

--create job
v_job_name:='P_JOB';
v_sql_string:='SELECT COUNT(1) from user_scheduler_jobs where job_name=:1';
     EXECUTE IMMEDIATE v_sql_string
                   INTO v_count
                  USING v_job_name;
      IF v_count = 0
      THEN
         v_sql_string :=
                ' BEGIN  ' 
		|| 'DBMS_SCHEDULER.create_job (' 
		|| ' job_name        => '
		|| CHR(39) 
		|| 'P_JOB'
		|| CHR(39) 
		|| ',' 
		|| '  program_name        => '
		|| CHR(39) 
		|| 'P_PROG'
		|| CHR(39) 
		|| ',' 
		|| '  schedule_name        => '
		|| CHR(39) 
		|| 'P_SCHED'
		|| CHR(39) 
		|| ',' 
		|| 'enabled         => FALSE,'
		|| 'auto_drop       => FALSE,'
		|| 'comments        =>'
		|| CHR(39) 
		|| 'Job to execute P_PROC stored proc every day at 2 am' 
		|| CHR(39) 
		|| ');' 
		|| 'END;';
   DBMS_OUTPUT.PUT_LINE(v_sql_string);
   EXECUTE IMMEDIATE v_sql_string;


--Enable the job
      v_sql_string :=
            ' BEGIN  '
         || 'DBMS_SCHEDULER.enable    ('
         || ' name         => '
         || CHR (39)
         || 'P_JOB'
         || CHR (39)
         || ');'
         || 'END;';

      DBMS_OUTPUT.PUT_LINE (v_sql_string);
      EXECUTE IMMEDIATE v_sql_string;


      END IF;

 EXCEPTION
   WHEN OTHERS
   THEN
      DBMS_OUTPUT.put_line (SQLERRM);

      raise_application_error (-20005,
                               'sqlcode = ' || SQLCODE || ' , sqlerrm = "' || SQLERRM || '"'
                              );

END;
/

select next_RUN_date from dba_scheduler_jobs where job_name='P_JOB';

10/24/2013 12:00:10.300000 AM -07:00   <--i want this to be today in next 10 minutes...how to do that?

         || '   start_date            => trunc(sysdate)'
          || ','
         || '  repeat_interval         => '
         || CHR (39)
         || 'freq=MINUTELY;byhour=0;byminute=0;bysecond=10'

         || '   start_date            => trunc(sysdate)  '
         || ','
         || '  repeat_interval         => '
         || CHR (39)
         || 'freq=minutely;'