1 PACKAGE BODY HRI_BPL_BEN_UTIL AS
2 /* $Header: hribbutl.pkb 120.1 2005/11/14 08:08:42 bmanyam noship $ */
3 /*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
4 Name : HRI_BPL_BEN_UTIL
5 Purpose : Contains all common functions and procedures for Benefits HRI.
6 -------------------------------------------------------------------------------
7 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++*/
8
9 --
10 -- Returns Profile Value of ICX_DATE_FORMAT_MASK
11 FUNCTION get_date_display_format
12 RETURN VARCHAR2 IS
13 l_ret_val VARCHAR2(255);
14 BEGIN
15 FND_PROFILE.GET(name => 'ICX_DATE_FORMAT_MASK',
16 val => l_ret_val);
17 RETURN l_ret_val;
18 END get_date_display_format;
19 --
20
21 -- Returns Profile Value of HRI_SET_EVENTS_ARCHIVE
22 -- Identifies whether Event Quey table has to be Archived or Not.
23 -- Default 'No'
24 FUNCTION get_archive_events
25 RETURN VARCHAR2 IS
26 l_ret_val VARCHAR2(255);
27 BEGIN
28 FND_PROFILE.GET(name => 'HRI_SET_EVENTS_ARCHIVE',
29 val => l_ret_val);
30
31 RETURN NVL(l_ret_val,'N');
32 END get_archive_events;
33 --
34
35 -- Returns Profile Value of HRI_ENBL_BEN_COL_EQ
36 -- Identifies whether BEN OLTP should log events in DBI Event Queue tables.
37 -- Default 'False'
38 FUNCTION enable_ben_col_evt_que
39 RETURN BOOLEAN IS
40 l_col_evt BOOLEAN;
41 l_ret_val VARCHAR2(255);
42 BEGIN
43 FND_PROFILE.GET(name => 'HRI_ENBL_BEN_COL_EQ',
44 val => l_ret_val);
45
46 IF (l_ret_val = 'Y') THEN
47 l_col_evt := TRUE;
48 ELSE
49 l_col_evt := FALSE;
50 END IF;
51
52 RETURN l_col_evt;
53 END enable_ben_col_evt_que;
54 --
55
56 -- This is the start date for Collection, in case of Incremental Refresh.
57 -- This values is only passed to concurrent program.
58 -- Not actually used functionally, becoz all events in Event queue
59 -- will be collected, irrespective of start date.
60 FUNCTION get_collect_start_date (p_process_code VARCHAR2, p_table_name VARCHAR2)
61 RETURN VARCHAR2 IS
62 l_start_date DATE;
63 l_ret_val VARCHAR2(255);
64 BEGIN
65 -- 4276676
66 l_ret_val := hri_bpl_conc_log.get_last_collect_to_date(p_process_code, p_table_name);
67 --
68 RETURN l_ret_val;
69
70 END get_collect_start_date;
71 --
72
73 -- Returns Profile Value of HRI_BEN_COL_CURR_OE
74 -- Enables Benefits Collection for the Current Open Enrollment Only
75 -- Default 'No'
76 FUNCTION get_curr_oe_coll_mode
77 RETURN VARCHAR2 IS
78 l_ret_val VARCHAR2(255);
79 BEGIN
80 --
81 FND_PROFILE.GET(name => 'HRI_BEN_COL_CURR_OE',
82 val => l_ret_val);
83
84 RETURN NVL(l_ret_val,'N');
85 --
86 END get_curr_oe_coll_mode;
87
88 -- Returns Mode of Refresh
89 FUNCTION get_full_refresh_flag (p_table_name VARCHAR2)
90 RETURN VARCHAR2 IS
91 l_ret_val VARCHAR2(255);
92
93 BEGIN
94 -- 4276676
95 l_ret_val := hri_bpl_conc_admin.get_full_refresh_flag(p_table_name);
96 --
97 RETURN l_ret_val;
98 --
99 END get_full_refresh_flag;
100
101 END HRI_BPL_BEN_UTIL;