Как генерировать последовательные числа? (типа счетчика в Access, нужно для Oracle) - VB
Формулировка задачи:
Добрый день!
БД и приложение переводим из Access в Oracle.
В Access есть тип данных счетчик, а в Oracle нет. На форуме Oracle дают советы использовать для этого тригерры, в которых всю эту бодягу писать для каждой таблицы. Но что-то не очень хочется огород городить.
Как-то давно сталкивался с описанием (где не помню) о функции, которая генерит уникальные номера в зависимости от системной даты, времени и вероятность выдачи одного и того же числа очень низка.
Никто не в курсе этого или может есть еще какой-то вариант?
БД и приложение переводим из Access в Oracle.
В Access есть тип данных счетчик, а в Oracle нет. На форуме Oracle дают советы использовать для этого тригерры, в которых всю эту бодягу писать для каждой таблицы. Но что-то не очень хочется огород городить.
Как-то давно сталкивался с описанием (где не помню) о функции, которая генерит уникальные номера в зависимости от системной даты, времени и вероятность выдачи одного и того же числа очень низка.
Никто не в курсе этого или может есть еще какой-то вариант?
Решение задачи: «Как генерировать последовательные числа? (типа счетчика в Access, нужно для Oracle)»
textual
Листинг программы
<font color="blue">If</font> rsSEQ.State = adStateOpen <font color="blue">Then</font> rsSEQ.<font color="blue">Close</font>
rsSEQ.<font color="blue">Open</font> <font color="teal">"SELECT МояСХЕМА.SEQ_ПКМоейТабилицы.NEXTVAL FROM DUAL"</font> _
, Conn1, adOpenForwardOnly, adLockReadOnly, adCmdText
m_NextID = rsSEQ(<font color="darkblue"><b>0</b></font>)
rsSEQ.<font color="blue">Close</font>
'Используем m_ID для вновь добавляемой записи