4991: h_sql := 'ALTER SEQUENCE BSC_SYS_DATASET_ID_S INCREMENT BY 1';
4992: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_DATASET_ID_S');
4993: END IF;
4994:
4995: -- 15. Reset sequence BSC_SYS_MEASURE_ID_S to start with at least the same current value of the sequence
4996: -- in the source system.
4997: h_sql := 'SELECT BSC_SYS_MEASURE_ID_S.NEXTVAL@'||g_db_link||' FROM DUAL';
4998: OPEN h_cursor FOR h_sql;
4999: FETCH h_cursor INTO h_src_currval;
4993: END IF;
4994:
4995: -- 15. Reset sequence BSC_SYS_MEASURE_ID_S to start with at least the same current value of the sequence
4996: -- in the source system.
4997: h_sql := 'SELECT BSC_SYS_MEASURE_ID_S.NEXTVAL@'||g_db_link||' FROM DUAL';
4998: OPEN h_cursor FOR h_sql;
4999: FETCH h_cursor INTO h_src_currval;
5000: CLOSE h_cursor;
5001:
4998: OPEN h_cursor FOR h_sql;
4999: FETCH h_cursor INTO h_src_currval;
5000: CLOSE h_cursor;
5001:
5002: SELECT BSC_SYS_MEASURE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5003: IF h_src_currval > h_currval THEN
5004: h_interval := h_src_currval - h_currval;
5005:
5006: h_sql := 'ALTER SEQUENCE BSC_SYS_MEASURE_ID_S INCREMENT BY '||h_interval;
5002: SELECT BSC_SYS_MEASURE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5003: IF h_src_currval > h_currval THEN
5004: h_interval := h_src_currval - h_currval;
5005:
5006: h_sql := 'ALTER SEQUENCE BSC_SYS_MEASURE_ID_S INCREMENT BY '||h_interval;
5007: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_MEASURE_ID_S');
5008:
5009: SELECT BSC_SYS_MEASURE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5010:
5003: IF h_src_currval > h_currval THEN
5004: h_interval := h_src_currval - h_currval;
5005:
5006: h_sql := 'ALTER SEQUENCE BSC_SYS_MEASURE_ID_S INCREMENT BY '||h_interval;
5007: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_MEASURE_ID_S');
5008:
5009: SELECT BSC_SYS_MEASURE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5010:
5011: h_sql := 'ALTER SEQUENCE BSC_SYS_MEASURE_ID_S INCREMENT BY 1';
5005:
5006: h_sql := 'ALTER SEQUENCE BSC_SYS_MEASURE_ID_S INCREMENT BY '||h_interval;
5007: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_MEASURE_ID_S');
5008:
5009: SELECT BSC_SYS_MEASURE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5010:
5011: h_sql := 'ALTER SEQUENCE BSC_SYS_MEASURE_ID_S INCREMENT BY 1';
5012: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_MEASURE_ID_S');
5013: END IF;
5007: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_MEASURE_ID_S');
5008:
5009: SELECT BSC_SYS_MEASURE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5010:
5011: h_sql := 'ALTER SEQUENCE BSC_SYS_MEASURE_ID_S INCREMENT BY 1';
5012: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_MEASURE_ID_S');
5013: END IF;
5014:
5015: -- 16. Reset sequence BSC_DB_MEASURE_GROUPS_S to start with at least the same current value of the sequence
5008:
5009: SELECT BSC_SYS_MEASURE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5010:
5011: h_sql := 'ALTER SEQUENCE BSC_SYS_MEASURE_ID_S INCREMENT BY 1';
5012: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_SYS_MEASURE_ID_S');
5013: END IF;
5014:
5015: -- 16. Reset sequence BSC_DB_MEASURE_GROUPS_S to start with at least the same current value of the sequence
5016: -- in the source system.