4762: h_sql := 'ALTER SEQUENCE BSC_SYS_IMAGE_ID_S INCREMENT BY 1';
4763: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_IMAGE_ID_S');
4764: END IF;
4765:
4766: -- 3. Reset sequence BSC_SYS_CALENDAR_ID_S to start with at least the same current value of the sequence
4767: -- in the source system.
4768: h_sql := 'SELECT BSC_SYS_CALENDAR_ID_S.NEXTVAL@'||g_db_link||' FROM DUAL';
4769: OPEN h_cursor FOR h_sql;
4770: FETCH h_cursor INTO h_src_currval;
4764: END IF;
4765:
4766: -- 3. Reset sequence BSC_SYS_CALENDAR_ID_S to start with at least the same current value of the sequence
4767: -- in the source system.
4768: h_sql := 'SELECT BSC_SYS_CALENDAR_ID_S.NEXTVAL@'||g_db_link||' FROM DUAL';
4769: OPEN h_cursor FOR h_sql;
4770: FETCH h_cursor INTO h_src_currval;
4771: CLOSE h_cursor;
4772:
4769: OPEN h_cursor FOR h_sql;
4770: FETCH h_cursor INTO h_src_currval;
4771: CLOSE h_cursor;
4772:
4773: SELECT BSC_SYS_CALENDAR_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4774: IF h_src_currval > h_currval THEN
4775: h_interval := h_src_currval - h_currval;
4776:
4777: h_sql := 'ALTER SEQUENCE BSC_SYS_CALENDAR_ID_S INCREMENT BY '||h_interval;
4773: SELECT BSC_SYS_CALENDAR_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4774: IF h_src_currval > h_currval THEN
4775: h_interval := h_src_currval - h_currval;
4776:
4777: h_sql := 'ALTER SEQUENCE BSC_SYS_CALENDAR_ID_S INCREMENT BY '||h_interval;
4778: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_CALENDAR_ID_S');
4779:
4780: SELECT BSC_SYS_CALENDAR_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4781:
4774: IF h_src_currval > h_currval THEN
4775: h_interval := h_src_currval - h_currval;
4776:
4777: h_sql := 'ALTER SEQUENCE BSC_SYS_CALENDAR_ID_S INCREMENT BY '||h_interval;
4778: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_CALENDAR_ID_S');
4779:
4780: SELECT BSC_SYS_CALENDAR_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4781:
4782: h_sql := 'ALTER SEQUENCE BSC_SYS_CALENDAR_ID_S INCREMENT BY 1';
4776:
4777: h_sql := 'ALTER SEQUENCE BSC_SYS_CALENDAR_ID_S INCREMENT BY '||h_interval;
4778: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_CALENDAR_ID_S');
4779:
4780: SELECT BSC_SYS_CALENDAR_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4781:
4782: h_sql := 'ALTER SEQUENCE BSC_SYS_CALENDAR_ID_S INCREMENT BY 1';
4783: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_CALENDAR_ID_S');
4784: END IF;
4778: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_CALENDAR_ID_S');
4779:
4780: SELECT BSC_SYS_CALENDAR_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4781:
4782: h_sql := 'ALTER SEQUENCE BSC_SYS_CALENDAR_ID_S INCREMENT BY 1';
4783: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_CALENDAR_ID_S');
4784: END IF;
4785:
4786: -- 4. Reset sequence BSC_SYS_PERIODICITY_ID_S to start with at least the same current value of the sequence
4779:
4780: SELECT BSC_SYS_CALENDAR_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4781:
4782: h_sql := 'ALTER SEQUENCE BSC_SYS_CALENDAR_ID_S INCREMENT BY 1';
4783: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_CALENDAR_ID_S');
4784: END IF;
4785:
4786: -- 4. Reset sequence BSC_SYS_PERIODICITY_ID_S to start with at least the same current value of the sequence
4787: -- in the source system.