[Home] [Help]
5: -- | Private Global Definitions |
6: -- --------------------------------------------------------------------------
7: --
8: g_package varchar2(33):=' ben_cwb_pl_dsgn_pkg.'; --Global package name
9: g_debug boolean := hr_utility.debug_enabled;
10: --
11: -- --------------------------------------------------------------------------
12: -- |------------------------< get_opt_ordr_in_grp >-------------------------|
13: -- --------------------------------------------------------------------------
31: --
32: begin
33: --
34: if g_debug then
35: hr_utility.set_location('Entering:'|| l_proc, 10);
36: end if;
37: --
38: if g_grp_opt.count = 0 then
39: return 0;
39: return 0;
40: end if;
41: --
42: if g_debug then
43: hr_utility.set_location(l_proc, 20);
44: end if;
45: --
46: for i in g_grp_opt.first .. g_grp_opt.last
47: loop
52: -- this case should never happen
53: return 0;
54: --
55: if g_debug then
56: hr_utility.set_location(' Leaving:'|| l_proc, 99);
57: end if;
58: --
59: end get_opt_ordr_in_grp;
60: --
76: --
77: begin
78: --
79: if g_debug then
80: hr_utility.set_location('Entering:'|| l_proc, 10);
81: end if;
82: --
83: if (p_pl_id <> p_group_pl_id) then
84: --pl_id and group_pl_id differs. So this is an actual plan
83: if (p_pl_id <> p_group_pl_id) then
84: --pl_id and group_pl_id differs. So this is an actual plan
85: --
86: if g_debug then
87: hr_utility.set_location(' Leaving:'|| l_proc, 66);
88: end if;
89: --
90: return 'Y';
91: else
104: -- Some other plans have this pl_id as group_pl_id. So not an
105: -- acutal plan
106: --
107: if g_debug then
108: hr_utility.set_location(' Leaving:'|| l_proc, 77);
109: end if;
110: --
111: return 'N';
112: exception
113: when no_data_found then
114: -- no other plans are attached to pl_id. so this is an actual plan
115: --
116: if g_debug then
117: hr_utility.set_location(' Leaving:'|| l_proc, 99);
118: end if;
119: --
120: return 'Y';
121: end;
138: --
139: begin
140: --
141: if g_debug then
142: hr_utility.set_location('Entering:'|| l_proc, 10);
143: end if;
144: --
145: l_exchg_rate := hr_currency_pkg.get_rate
146: (p_from_currency -- From currency
151: ,p_effective_date -- conversion date
152: ,'R')); -- processing type
153: --
154: if g_debug then
155: hr_utility.set_location(' Leaving:'|| l_proc, 88);
156: end if;
157: --
158: return l_exchg_rate;
159: exception
159: exception
160: when others then
161: --
162: if g_debug then
163: hr_utility.set_location(' Leaving:'|| l_proc, 99);
164: end if;
165: --
166: return 1;
167: end get_exchg_rate;
186: --
187: begin
188: --
189: if g_debug then
190: hr_utility.set_location('Entering:'|| l_proc, 10);
191: end if;
192: --
193: if l_start_yy = l_end_yy then
194: l_year := l_start_yy;
200:
201: l_date := fnd_date.canonical_to_date(l_year||'/'||p_month||'/'||p_day);
202: --
203: if g_debug then
204: hr_utility.set_location(' Leaving:'|| l_proc, 88);
205: end if;
206: --
207: return l_date;
208: --
209: exception
210: when others then
211: --
212: if g_debug then
213: hr_utility.set_location(' Leaving:'|| l_proc, 99);
214: end if;
215: --
216: return p_default_date;
217: end get_valid_date;
612: --
613: begin
614: --
615: if g_debug then
616: hr_utility.set_location('Entering:'|| l_proc, 10);
617: end if;
618: --
619: if p_refresh_always = 'Y' then
620: --
618: --
619: if p_refresh_always = 'Y' then
620: --
621: if g_debug then
622: hr_utility.set_location('l_proc'|| l_proc, 17);
623: end if;
624: --
625: -- refresh. delete plans and oipls from the pl_dsgn
626: delete from ben_cwb_pl_dsgn
630: end if;
631: --
632: --
633: if g_debug then
634: hr_utility.set_location(l_proc, 20);
635: end if;
636: --
637: -- get the group plan row
638: open csr_group_pl(p_group_pl_id
675: fetch csr_grp_opt_ordr bulk collect into g_grp_opt;
676: close csr_grp_opt_ordr;
677: --
678: if g_debug then
679: hr_utility.set_location(l_proc, 30);
680: end if;
681: --
682: for pl in csr_pls(p_group_pl_id
683: ,nvl(p_effective_date,nvl(l_group_pl_row.effective_date
686: ,l_group_pl_row.business_group_id)
687: loop
688: --
689: if g_debug then
690: hr_utility.set_location(l_proc, 40);
691: end if;
692: --
693: -- first insert the oipl rows.
694: --
700: ,p_lf_evt_ocrd_dt)))
701: loop
702: --
703: if g_debug then
704: hr_utility.set_location(l_proc, 50);
705: end if;
706: --
707: -- Increment the count
708: l_opt_count := l_opt_count + 1;
838: end loop; -- of l_oipl_rows
839:
840: --
841: if g_debug then
842: hr_utility.set_location(l_proc, 60);
843: end if;
844: --
845: --insert the plan row
846: insert into ben_cwb_pl_dsgn
1010: and group_oipl_id = -1;
1011: end loop;
1012:
1013: if g_debug then
1014: hr_utility.set_location(' Leaving:'|| l_proc, 99);
1015: end if;
1016: --
1017: end; -- end of refresh_pl_dsgn
1018: