1 PACKAGE BODY XLE_Utility_PUB AS
2 /* $Header: xleutilb.pls 120.1 2005/01/21 23:34:01 guyuan ship $ */
3
4 FUNCTION created_by RETURN NUMBER IS
5 BEGIN
6 RETURN NVL(FND_GLOBAL.user_id,-1);
7 END created_by;
8
9 FUNCTION creation_date RETURN DATE IS
10 BEGIN
11 RETURN SYSDATE;
12 END creation_date;
13
14 FUNCTION last_updated_by RETURN NUMBER IS
15 BEGIN
16 RETURN NVL(FND_GLOBAL.user_id,-1);
17 END last_updated_by;
18
19 FUNCTION last_update_date RETURN DATE IS
20 BEGIN
21 RETURN SYSDATE;
22 END last_update_date;
23
24 FUNCTION last_update_login RETURN NUMBER IS
25 BEGIN
26 IF FND_GLOBAL.conc_login_id = -1 OR
27 FND_GLOBAL.conc_login_id IS NULL
28 THEN
29 RETURN FND_GLOBAL.login_id;
30 ELSE
31 RETURN FND_GLOBAL.conc_login_id;
32 END IF;
33 END last_update_login;
34
35 END XLE_Utility_PUB;