484:
485: -- Alter the sequence to use this inc value
486: l_sql_stmt := 'ALTER SEQUENCE ' || l_per_owner || '.' || p_seq_name ||
487: ' INCREMENT BY '|| new_inc;
488: l_cursor := dbms_sql.open_cursor;
489: dbms_sql.parse(l_cursor, l_sql_stmt, DBMS_SQL.V7);
490: l_ret := dbms_sql.execute(l_cursor);
491: dbms_sql.close_cursor(l_cursor);
492:
485: -- Alter the sequence to use this inc value
486: l_sql_stmt := 'ALTER SEQUENCE ' || l_per_owner || '.' || p_seq_name ||
487: ' INCREMENT BY '|| new_inc;
488: l_cursor := dbms_sql.open_cursor;
489: dbms_sql.parse(l_cursor, l_sql_stmt, DBMS_SQL.V7);
490: l_ret := dbms_sql.execute(l_cursor);
491: dbms_sql.close_cursor(l_cursor);
492:
493: -- Now select the sequence once to bump it past our target
486: l_sql_stmt := 'ALTER SEQUENCE ' || l_per_owner || '.' || p_seq_name ||
487: ' INCREMENT BY '|| new_inc;
488: l_cursor := dbms_sql.open_cursor;
489: dbms_sql.parse(l_cursor, l_sql_stmt, DBMS_SQL.V7);
490: l_ret := dbms_sql.execute(l_cursor);
491: dbms_sql.close_cursor(l_cursor);
492:
493: -- Now select the sequence once to bump it past our target
494: l_sql_stmt := 'SELECT ' || l_per_owner || '.' || p_seq_name || '.NEXTVAL FROM DUAL';
487: ' INCREMENT BY '|| new_inc;
488: l_cursor := dbms_sql.open_cursor;
489: dbms_sql.parse(l_cursor, l_sql_stmt, DBMS_SQL.V7);
490: l_ret := dbms_sql.execute(l_cursor);
491: dbms_sql.close_cursor(l_cursor);
492:
493: -- Now select the sequence once to bump it past our target
494: l_sql_stmt := 'SELECT ' || l_per_owner || '.' || p_seq_name || '.NEXTVAL FROM DUAL';
495: EXECUTE IMMEDIATE l_sql_stmt INTO dummy;
496:
497: -- Reset the sequence to use the old value
498: l_sql_stmt := 'ALTER SEQUENCE ' || l_per_owner || '.' || p_seq_name ||
499: ' INCREMENT BY '|| old_inc;
500: l_cursor := dbms_sql.open_cursor;
501: dbms_sql.parse(l_cursor, l_sql_stmt, DBMS_SQL.V7);
502: l_ret := dbms_sql.execute(l_cursor);
503: dbms_sql.close_cursor(l_cursor);
504:
497: -- Reset the sequence to use the old value
498: l_sql_stmt := 'ALTER SEQUENCE ' || l_per_owner || '.' || p_seq_name ||
499: ' INCREMENT BY '|| old_inc;
500: l_cursor := dbms_sql.open_cursor;
501: dbms_sql.parse(l_cursor, l_sql_stmt, DBMS_SQL.V7);
502: l_ret := dbms_sql.execute(l_cursor);
503: dbms_sql.close_cursor(l_cursor);
504:
505: END LOOP;
498: l_sql_stmt := 'ALTER SEQUENCE ' || l_per_owner || '.' || p_seq_name ||
499: ' INCREMENT BY '|| old_inc;
500: l_cursor := dbms_sql.open_cursor;
501: dbms_sql.parse(l_cursor, l_sql_stmt, DBMS_SQL.V7);
502: l_ret := dbms_sql.execute(l_cursor);
503: dbms_sql.close_cursor(l_cursor);
504:
505: END LOOP;
506:
499: ' INCREMENT BY '|| old_inc;
500: l_cursor := dbms_sql.open_cursor;
501: dbms_sql.parse(l_cursor, l_sql_stmt, DBMS_SQL.V7);
502: l_ret := dbms_sql.execute(l_cursor);
503: dbms_sql.close_cursor(l_cursor);
504:
505: END LOOP;
506:
507: END IF;