1265: --------------------------------------------------------------------------
1266: -- This function returns the current value of the Data Set ID sequence; --
1267: -- if the sequence doesn't yet have a value this session, we make one --
1268: --------------------------------------------------------------------------
1269: SELECT EGO_IUA_DATA_SET_ID_S.CURRVAL INTO l_curr_data_set_id FROM DUAL;
1270: RETURN l_curr_data_set_id;
1271:
1272: EXCEPTION
1273: WHEN G_NO_CURRVAL_YET THEN
1271:
1272: EXCEPTION
1273: WHEN G_NO_CURRVAL_YET THEN
1274:
1275: SELECT ENG_CUA_DATA_SET_ID_S.NEXTVAL INTO l_curr_data_set_id FROM DUAL;
1276: RETURN l_curr_data_set_id;
1277:
1278: END Get_Current_Data_Set_Id;
1279: ----------------------------------------------------------------------