4931: h_sql := 'ALTER SEQUENCE BSC_INTERNAL_COLUMN_S INCREMENT BY 1';
4932: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_INTERNAL_COLUMN_S');
4933: END IF;
4934:
4935: -- 12. Reset sequence BSC_SYS_DIM_LEVEL_ID_S to start with at least the same current value of the sequence
4936: -- in the source system.
4937: h_sql := 'SELECT BSC_SYS_DIM_LEVEL_ID_S.NEXTVAL@'||g_db_link||' FROM DUAL';
4938: OPEN h_cursor FOR h_sql;
4939: FETCH h_cursor INTO h_src_currval;
4933: END IF;
4934:
4935: -- 12. Reset sequence BSC_SYS_DIM_LEVEL_ID_S to start with at least the same current value of the sequence
4936: -- in the source system.
4937: h_sql := 'SELECT BSC_SYS_DIM_LEVEL_ID_S.NEXTVAL@'||g_db_link||' FROM DUAL';
4938: OPEN h_cursor FOR h_sql;
4939: FETCH h_cursor INTO h_src_currval;
4940: CLOSE h_cursor;
4941:
4938: OPEN h_cursor FOR h_sql;
4939: FETCH h_cursor INTO h_src_currval;
4940: CLOSE h_cursor;
4941:
4942: SELECT BSC_SYS_DIM_LEVEL_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4943: IF h_src_currval > h_currval THEN
4944: h_interval := h_src_currval - h_currval;
4945:
4946: h_sql := 'ALTER SEQUENCE BSC_SYS_DIM_LEVEL_ID_S INCREMENT BY '||h_interval;
4942: SELECT BSC_SYS_DIM_LEVEL_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4943: IF h_src_currval > h_currval THEN
4944: h_interval := h_src_currval - h_currval;
4945:
4946: h_sql := 'ALTER SEQUENCE BSC_SYS_DIM_LEVEL_ID_S INCREMENT BY '||h_interval;
4947: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_DIM_LEVEL_ID_S');
4948:
4949: SELECT BSC_SYS_DIM_LEVEL_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4950:
4943: IF h_src_currval > h_currval THEN
4944: h_interval := h_src_currval - h_currval;
4945:
4946: h_sql := 'ALTER SEQUENCE BSC_SYS_DIM_LEVEL_ID_S INCREMENT BY '||h_interval;
4947: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_DIM_LEVEL_ID_S');
4948:
4949: SELECT BSC_SYS_DIM_LEVEL_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4950:
4951: h_sql := 'ALTER SEQUENCE BSC_SYS_DIM_LEVEL_ID_S INCREMENT BY 1';
4945:
4946: h_sql := 'ALTER SEQUENCE BSC_SYS_DIM_LEVEL_ID_S INCREMENT BY '||h_interval;
4947: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_DIM_LEVEL_ID_S');
4948:
4949: SELECT BSC_SYS_DIM_LEVEL_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4950:
4951: h_sql := 'ALTER SEQUENCE BSC_SYS_DIM_LEVEL_ID_S INCREMENT BY 1';
4952: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_DIM_LEVEL_ID_S');
4953: END IF;
4947: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_DIM_LEVEL_ID_S');
4948:
4949: SELECT BSC_SYS_DIM_LEVEL_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4950:
4951: h_sql := 'ALTER SEQUENCE BSC_SYS_DIM_LEVEL_ID_S INCREMENT BY 1';
4952: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_DIM_LEVEL_ID_S');
4953: END IF;
4954:
4955: -- 13. Reset sequence BSC_SYS_DIM_GROUP_ID_S to start with at least the same current value of the sequence
4948:
4949: SELECT BSC_SYS_DIM_LEVEL_ID_S.NEXTVAL INTO h_currval FROM DUAL;
4950:
4951: h_sql := 'ALTER SEQUENCE BSC_SYS_DIM_LEVEL_ID_S INCREMENT BY 1';
4952: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_DIM_LEVEL_ID_S');
4953: END IF;
4954:
4955: -- 13. Reset sequence BSC_SYS_DIM_GROUP_ID_S to start with at least the same current value of the sequence
4956: -- in the source system.