Может это кому пригодится, правда в сотых долях с начала суток.
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
CREATE OR REPLACE FUNCTION GET_TIME_AM
RETURN NUMBER IS
/*
* Created by:
* A. Gerasimov (ASBT) 17.10.1998
* Purpose:
* Возвращает время с полуночи в сотых долях секунды
*/
RetTime NUMBER; -- Возвращаемое значение
tmpTime Date; -- Текущея дата/время
GTime NUMBER; -- Время в сотых долях секунды с момента загрузки сервера
SecByDay NUMBER; -- Время с начала дня в секундах
BEGIN
tmpTime:=SYSDATE;
GTime:=dbms_utility.get_time;
SecByDay:=To_Number(To_Char(tmpTime,'SSSSS'));
RetTime:= SecByDay* 100 + (GTime - Trunc(GTime,- 2 ));
Return RetTime;
END;
