1 PACKAGE BODY hz_utility_pub AS
2 /*$Header: ARHUTILB.pls 120.1 2005/06/16 21:16:19 jhuang ship $ */
3
4 FUNCTION created_by RETURN NUMBER IS
5 BEGIN
6 RETURN nvl(FND_GLOBAL.user_id,-1);
7 END;
8
9 FUNCTION creation_date RETURN DATE IS
10 BEGIN
11 RETURN SYSDATE;
12 END;
13
14 FUNCTION last_updated_by RETURN NUMBER IS
15 BEGIN
16 RETURN nvl(FND_GLOBAL.user_id,-1);
17 END;
18
19 FUNCTION last_update_date RETURN DATE IS
20 BEGIN
21 RETURN SYSDATE;
22 END;
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;
34
35 FUNCTION request_id RETURN NUMBER IS
36 BEGIN
37 IF ( FND_GLOBAL.conc_request_id = -1 ) OR
38 ( FND_GLOBAL.conc_request_id IS NULL )
39 THEN
40 RETURN NULL;
41 ELSE
42 RETURN FND_GLOBAL.conc_request_id;
43 END IF;
44 END;
45
46 FUNCTION program_id RETURN NUMBER IS
47 BEGIN
48 IF ( FND_GLOBAL.conc_program_id = -1 ) OR
49 ( FND_GLOBAL.conc_program_id IS NULL )
50 THEN
51 RETURN NULL;
52 ELSE
53 RETURN FND_GLOBAL.conc_program_id;
54 END IF;
55 END;
56
57 FUNCTION program_application_id RETURN NUMBER IS
58 BEGIN
59 IF ( FND_GLOBAL.prog_appl_id = -1 ) OR
60 ( FND_GLOBAL.prog_appl_id IS NULL )
61 THEN
62 RETURN NULL;
63 ELSE
64 RETURN FND_GLOBAL.prog_appl_id;
65 END IF;
66 END;
67
68 FUNCTION program_update_date RETURN DATE IS
69 BEGIN
70 IF ( program_id IS NULL )
71 THEN
72 RETURN NULL;
73 ELSE
74 RETURN SYSDATE;
75 END IF;
76 END;
77
78 FUNCTION user_id RETURN NUMBER IS
79 BEGIN
80 RETURN nvl(FND_GLOBAL.user_id,-1);
81 END;
82
83 END hz_utility_pub;