Error in creating job using DBMS_SCHEDULER

Question

I have create the following procedure to create individual jobs dynamically on each schema.
CREATE OR REPLACE PROCEDURE APSP.JOB_TEST_RAM
AS
   V_SQL   VARCHAR2 (1000);
BEGIN
   FOR i
   IN (SELECT   gbm.OWNER_NAME owner_name,
                vdb.NAME || '_BU_' || gbm.BU_CODE,
                gbm.bu_id bu_id
         FROM   apps_global.GLOBAL_BU_MAPPING gbm, v$database vdb
        WHERE   OWNER_NAME NOT IN ('APPS_GLOBAL'))
   LOOP
      V_SQL :=
         'BEGIN
              DBMS_SCHEDULER.CREATE_JOB (
                  job_name => '''
         || i.owner_name
         || '_archive_job'',
      job_class => '''
         || i.owner_name
         || '_job_class'',
                  job_type => ''PLSQL_BLOCK'',
                  job_action => ''begin APSP.POP_TARGET(''APPS_XX'',i.owner,i.buid); end;'',
                  auto_drop => TRUE,
                  comments => '''|| i.owner_name||''',
              enabled => TRUE);
            END;';
      EXECUTE IMMEDIATE V_SQL;
   END LOOP;
END;
/The procedure is having following arguments.
CREATE OR REPLACE PROCEDURE APSP.POP_TARGET (
p_schema_name           VARCHAR2,
   p_actual_schema_name    VARCHAR2,
   p_buid                  NUMBER
)While executing this procedure I am getting the below error.
PLS-00103: Encountered the symbol "APPS_XX" when expecting one of the following:
Please help me.
Thanks in advance .

Answer 1

Try this
create or replace procedure apsp.job_test_ram
as
   v_sql   varchar2 (1000);
begin
   for i
   in (select   gbm.owner_name owner_name,
                vdb.name || '_BU_' || gbm.bu_code,
                gbm.bu_id bu_id
         from   apps_global.GLOBAL_BU_MAPPING gbm, v$database vdb
        where   owner_name not in ('APPS_GLOBAL'))
   loop
      v_sql :=
         q'[begin
              dbms_scheduler.create_job
                  job_name   => '#OWNER_NAME#_archive_job'
                , job_class  => '#OWNER_NAME#_job_class'
                , job_type   => 'STORED_PROCEDURE'
                , job_action => q'{APSP.POP_TARGET('APPS_XX','#OWNER_NAME#','#BUILD#')}'
                , auto_drop  => TRUE
                , comments   => '#OWNER_NAME#'
                , enabled    => TRUE
            end;]';
         v_sql := replace(replace(v_sql, '#OWNER_NAME#', i.owner), '#BUILD#', i.build);
      execute immediate v_sql;
   end loop;
end;
/