5071: h_sql := 'ALTER SEQUENCE BSC_KPI_MEASURE_S INCREMENT BY 1';
5072: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_KPI_MEASURE_S');
5073: END IF;
5074:
5075: -- 18. Reset sequence BSC_COLOR_RANGE_ID_S to start with at least the same current value of the sequence
5076: -- in the source system.
5077: h_sql := 'SELECT BSC_COLOR_RANGE_ID_S.NEXTVAL@'||g_db_link||' FROM DUAL';
5078: OPEN h_cursor FOR h_sql;
5079: FETCH h_cursor INTO h_src_currval;
5073: END IF;
5074:
5075: -- 18. Reset sequence BSC_COLOR_RANGE_ID_S to start with at least the same current value of the sequence
5076: -- in the source system.
5077: h_sql := 'SELECT BSC_COLOR_RANGE_ID_S.NEXTVAL@'||g_db_link||' FROM DUAL';
5078: OPEN h_cursor FOR h_sql;
5079: FETCH h_cursor INTO h_src_currval;
5080: CLOSE h_cursor;
5081:
5078: OPEN h_cursor FOR h_sql;
5079: FETCH h_cursor INTO h_src_currval;
5080: CLOSE h_cursor;
5081:
5082: SELECT BSC_COLOR_RANGE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5083: IF h_src_currval > h_currval THEN
5084: h_interval := h_src_currval - h_currval;
5085:
5086: h_sql := 'ALTER SEQUENCE BSC_COLOR_RANGE_ID_S INCREMENT BY '||h_interval;
5082: SELECT BSC_COLOR_RANGE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5083: IF h_src_currval > h_currval THEN
5084: h_interval := h_src_currval - h_currval;
5085:
5086: h_sql := 'ALTER SEQUENCE BSC_COLOR_RANGE_ID_S INCREMENT BY '||h_interval;
5087: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_COLOR_RANGE_ID_S');
5088:
5089: SELECT BSC_COLOR_RANGE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5090:
5083: IF h_src_currval > h_currval THEN
5084: h_interval := h_src_currval - h_currval;
5085:
5086: h_sql := 'ALTER SEQUENCE BSC_COLOR_RANGE_ID_S INCREMENT BY '||h_interval;
5087: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_COLOR_RANGE_ID_S');
5088:
5089: SELECT BSC_COLOR_RANGE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5090:
5091: h_sql := 'ALTER SEQUENCE BSC_COLOR_RANGE_ID_S INCREMENT BY 1';
5085:
5086: h_sql := 'ALTER SEQUENCE BSC_COLOR_RANGE_ID_S INCREMENT BY '||h_interval;
5087: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_COLOR_RANGE_ID_S');
5088:
5089: SELECT BSC_COLOR_RANGE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5090:
5091: h_sql := 'ALTER SEQUENCE BSC_COLOR_RANGE_ID_S INCREMENT BY 1';
5092: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_COLOR_RANGE_ID_S');
5093: END IF;
5087: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_COLOR_RANGE_ID_S');
5088:
5089: SELECT BSC_COLOR_RANGE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5090:
5091: h_sql := 'ALTER SEQUENCE BSC_COLOR_RANGE_ID_S INCREMENT BY 1';
5092: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_COLOR_RANGE_ID_S');
5093: END IF;
5094:
5095: RETURN TRUE;
5088:
5089: SELECT BSC_COLOR_RANGE_ID_S.NEXTVAL INTO h_currval FROM DUAL;
5090:
5091: h_sql := 'ALTER SEQUENCE BSC_COLOR_RANGE_ID_S INCREMENT BY 1';
5092: BSC_APPS.Do_DDL(h_sql, AD_DDL.ALTER_SEQUENCE, 'BSC_COLOR_RANGE_ID_S');
5093: END IF;
5094:
5095: RETURN TRUE;
5096: