[Home] [Help]
PACKAGE BODY: APPS.BEN_BNFT_POOL_RLOVR_RQMT_API
Source
1 Package Body ben_Bnft_Pool_Rlovr_Rqmt_api as
2 /* $Header: bebprapi.pkb 120.0 2005/05/28 00:48:57 appldev noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' ben_Bnft_Pool_Rlovr_Rqmt_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_Bnft_Pool_Rlovr_Rqmt >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_Bnft_Pool_Rlovr_Rqmt
13 (p_validate in boolean default false
14 ,p_bnft_pool_rlovr_rqmt_id out nocopy number
15 ,p_effective_start_date out nocopy date
16 ,p_effective_end_date out nocopy date
17 ,p_no_mn_rlovr_pct_dfnd_flag in varchar2 default 'N'
18 ,p_no_mx_rlovr_pct_dfnd_flag in varchar2 default 'N'
19 ,p_no_mn_rlovr_val_dfnd_flag in varchar2 default 'N'
20 ,p_no_mx_rlovr_val_dfnd_flag in varchar2 default 'N'
21 ,p_rlovr_val_incrmt_num in number default null
22 ,p_rlovr_val_rl in number default null
23 ,p_mn_rlovr_val in number default null
24 ,p_mx_rlovr_val in number default null
25 ,p_val_rndg_cd in varchar2 default null
26 ,p_val_rndg_rl in number default null
27 ,p_pct_rndg_cd in varchar2 default null
28 ,p_pct_rndg_rl in number default null
29 ,p_prtt_elig_rlovr_rl in number default null
30 ,p_mx_rchd_dflt_ordr_num in number default null
31 ,p_pct_rlovr_incrmt_num in number default null
32 ,p_mn_rlovr_pct_num in number default null
33 ,p_mx_rlovr_pct_num in number default null
34 ,p_crs_rlovr_procg_cd in varchar2 default null
35 ,p_mx_pct_ttl_crs_cn_roll_num in number default null
36 ,p_bnft_prvdr_pool_id in number default null
37 ,p_acty_base_rt_id in number default null
38 ,p_business_group_id in number default null
39 ,p_bpr_attribute_category in varchar2 default null
40 ,p_bpr_attribute1 in varchar2 default null
41 ,p_bpr_attribute2 in varchar2 default null
42 ,p_bpr_attribute3 in varchar2 default null
43 ,p_bpr_attribute4 in varchar2 default null
44 ,p_bpr_attribute5 in varchar2 default null
45 ,p_bpr_attribute6 in varchar2 default null
46 ,p_bpr_attribute7 in varchar2 default null
47 ,p_bpr_attribute8 in varchar2 default null
48 ,p_bpr_attribute9 in varchar2 default null
49 ,p_bpr_attribute10 in varchar2 default null
50 ,p_bpr_attribute11 in varchar2 default null
51 ,p_bpr_attribute12 in varchar2 default null
52 ,p_bpr_attribute13 in varchar2 default null
53 ,p_bpr_attribute14 in varchar2 default null
54 ,p_bpr_attribute15 in varchar2 default null
55 ,p_bpr_attribute16 in varchar2 default null
56 ,p_bpr_attribute17 in varchar2 default null
57 ,p_bpr_attribute18 in varchar2 default null
58 ,p_bpr_attribute19 in varchar2 default null
59 ,p_bpr_attribute20 in varchar2 default null
60 ,p_bpr_attribute21 in varchar2 default null
61 ,p_bpr_attribute22 in varchar2 default null
62 ,p_bpr_attribute23 in varchar2 default null
63 ,p_bpr_attribute24 in varchar2 default null
64 ,p_bpr_attribute25 in varchar2 default null
65 ,p_bpr_attribute26 in varchar2 default null
66 ,p_bpr_attribute27 in varchar2 default null
67 ,p_bpr_attribute28 in varchar2 default null
68 ,p_bpr_attribute29 in varchar2 default null
69 ,p_bpr_attribute30 in varchar2 default null
70 ,p_object_version_number out nocopy number
71 ,p_effective_date in date
72 ) is
73 --
74 -- Declare cursors and local variables
75 --
76 l_bnft_pool_rlovr_rqmt_id ben_bnft_pool_rlovr_rqmt_f.bnft_pool_rlovr_rqmt_id%TYPE;
77 l_effective_start_date ben_bnft_pool_rlovr_rqmt_f.effective_start_date%TYPE;
78 l_effective_end_date ben_bnft_pool_rlovr_rqmt_f.effective_end_date%TYPE;
79 l_proc varchar2(72) := g_package||'create_Bnft_Pool_Rlovr_Rqmt';
80 l_object_version_number ben_bnft_pool_rlovr_rqmt_f.object_version_number%TYPE;
81 --
82 begin
83 --
84 hr_utility.set_location('Entering:'|| l_proc, 10);
85 --
86 -- Issue a savepoint if operating in validation only mode
87 --
88 savepoint create_Bnft_Pool_Rlovr_Rqmt;
89 --
90 hr_utility.set_location(l_proc, 20);
91 --
92 -- Process Logic
93 --
94 begin
95 --
96 -- Start of API User Hook for the before hook of create_Bnft_Pool_Rlovr_Rqmt
97 --
98 ben_Bnft_Pool_Rlovr_Rqmt_bk1.create_Bnft_Pool_Rlovr_Rqmt_b
99 (
100 p_no_mn_rlovr_pct_dfnd_flag => p_no_mn_rlovr_pct_dfnd_flag
101 ,p_no_mx_rlovr_pct_dfnd_flag => p_no_mx_rlovr_pct_dfnd_flag
102 ,p_no_mn_rlovr_val_dfnd_flag => p_no_mn_rlovr_val_dfnd_flag
103 ,p_no_mx_rlovr_val_dfnd_flag => p_no_mx_rlovr_val_dfnd_flag
104 ,p_rlovr_val_incrmt_num => p_rlovr_val_incrmt_num
105 ,p_rlovr_val_rl => p_rlovr_val_rl
106 ,p_mn_rlovr_val => p_mn_rlovr_val
107 ,p_mx_rlovr_val => p_mx_rlovr_val
108 ,p_val_rndg_cd => p_val_rndg_cd
109 ,p_val_rndg_rl => p_val_rndg_rl
110 ,p_pct_rndg_cd => p_pct_rndg_cd
111 ,p_pct_rndg_rl => p_pct_rndg_rl
112 ,p_prtt_elig_rlovr_rl => p_prtt_elig_rlovr_rl
113 ,p_mx_rchd_dflt_ordr_num => p_mx_rchd_dflt_ordr_num
114 ,p_pct_rlovr_incrmt_num => p_pct_rlovr_incrmt_num
115 ,p_mn_rlovr_pct_num => p_mn_rlovr_pct_num
116 ,p_mx_rlovr_pct_num => p_mx_rlovr_pct_num
117 ,p_crs_rlovr_procg_cd => p_crs_rlovr_procg_cd
118 ,p_mx_pct_ttl_crs_cn_roll_num => p_mx_pct_ttl_crs_cn_roll_num
119 ,p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
120 ,p_acty_base_rt_id => p_acty_base_rt_id
121 ,p_business_group_id => p_business_group_id
122 ,p_bpr_attribute_category => p_bpr_attribute_category
123 ,p_bpr_attribute1 => p_bpr_attribute1
124 ,p_bpr_attribute2 => p_bpr_attribute2
125 ,p_bpr_attribute3 => p_bpr_attribute3
126 ,p_bpr_attribute4 => p_bpr_attribute4
127 ,p_bpr_attribute5 => p_bpr_attribute5
128 ,p_bpr_attribute6 => p_bpr_attribute6
129 ,p_bpr_attribute7 => p_bpr_attribute7
130 ,p_bpr_attribute8 => p_bpr_attribute8
131 ,p_bpr_attribute9 => p_bpr_attribute9
132 ,p_bpr_attribute10 => p_bpr_attribute10
133 ,p_bpr_attribute11 => p_bpr_attribute11
134 ,p_bpr_attribute12 => p_bpr_attribute12
135 ,p_bpr_attribute13 => p_bpr_attribute13
136 ,p_bpr_attribute14 => p_bpr_attribute14
137 ,p_bpr_attribute15 => p_bpr_attribute15
138 ,p_bpr_attribute16 => p_bpr_attribute16
139 ,p_bpr_attribute17 => p_bpr_attribute17
140 ,p_bpr_attribute18 => p_bpr_attribute18
144 ,p_bpr_attribute22 => p_bpr_attribute22
141 ,p_bpr_attribute19 => p_bpr_attribute19
142 ,p_bpr_attribute20 => p_bpr_attribute20
143 ,p_bpr_attribute21 => p_bpr_attribute21
145 ,p_bpr_attribute23 => p_bpr_attribute23
146 ,p_bpr_attribute24 => p_bpr_attribute24
147 ,p_bpr_attribute25 => p_bpr_attribute25
148 ,p_bpr_attribute26 => p_bpr_attribute26
149 ,p_bpr_attribute27 => p_bpr_attribute27
150 ,p_bpr_attribute28 => p_bpr_attribute28
151 ,p_bpr_attribute29 => p_bpr_attribute29
152 ,p_bpr_attribute30 => p_bpr_attribute30
153 ,p_effective_date => trunc(p_effective_date)
154 );
155 exception
156 when hr_api.cannot_find_prog_unit then
157 hr_api.cannot_find_prog_unit_error
158 (
159 p_module_name => 'CREATE_Bnft_Pool_Rlovr_Rqmt'
160 ,p_hook_type => 'BP'
161 );
162 --
163 -- End of API User Hook for the before hook of create_Bnft_Pool_Rlovr_Rqmt
164 --
165 end;
166 --
167 ben_bpr_ins.ins
168 (
169 p_bnft_pool_rlovr_rqmt_id => l_bnft_pool_rlovr_rqmt_id
170 ,p_effective_start_date => l_effective_start_date
171 ,p_effective_end_date => l_effective_end_date
172 ,p_no_mn_rlovr_pct_dfnd_flag => p_no_mn_rlovr_pct_dfnd_flag
173 ,p_no_mx_rlovr_pct_dfnd_flag => p_no_mx_rlovr_pct_dfnd_flag
174 ,p_no_mn_rlovr_val_dfnd_flag => p_no_mn_rlovr_val_dfnd_flag
175 ,p_no_mx_rlovr_val_dfnd_flag => p_no_mx_rlovr_val_dfnd_flag
176 ,p_rlovr_val_incrmt_num => p_rlovr_val_incrmt_num
177 ,p_rlovr_val_rl => p_rlovr_val_rl
178 ,p_mn_rlovr_val => p_mn_rlovr_val
179 ,p_mx_rlovr_val => p_mx_rlovr_val
180 ,p_val_rndg_cd => p_val_rndg_cd
181 ,p_val_rndg_rl => p_val_rndg_rl
182 ,p_pct_rndg_cd => p_pct_rndg_cd
183 ,p_pct_rndg_rl => p_pct_rndg_rl
184 ,p_prtt_elig_rlovr_rl => p_prtt_elig_rlovr_rl
185 ,p_mx_rchd_dflt_ordr_num => p_mx_rchd_dflt_ordr_num
186 ,p_pct_rlovr_incrmt_num => p_pct_rlovr_incrmt_num
187 ,p_mn_rlovr_pct_num => p_mn_rlovr_pct_num
188 ,p_mx_rlovr_pct_num => p_mx_rlovr_pct_num
189 ,p_crs_rlovr_procg_cd => p_crs_rlovr_procg_cd
190 ,p_mx_pct_ttl_crs_cn_roll_num => p_mx_pct_ttl_crs_cn_roll_num
191 ,p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
192 ,p_acty_base_rt_id => p_acty_base_rt_id
193 ,p_business_group_id => p_business_group_id
194 ,p_bpr_attribute_category => p_bpr_attribute_category
195 ,p_bpr_attribute1 => p_bpr_attribute1
196 ,p_bpr_attribute2 => p_bpr_attribute2
197 ,p_bpr_attribute3 => p_bpr_attribute3
198 ,p_bpr_attribute4 => p_bpr_attribute4
199 ,p_bpr_attribute5 => p_bpr_attribute5
200 ,p_bpr_attribute6 => p_bpr_attribute6
201 ,p_bpr_attribute7 => p_bpr_attribute7
202 ,p_bpr_attribute8 => p_bpr_attribute8
203 ,p_bpr_attribute9 => p_bpr_attribute9
204 ,p_bpr_attribute10 => p_bpr_attribute10
205 ,p_bpr_attribute11 => p_bpr_attribute11
206 ,p_bpr_attribute12 => p_bpr_attribute12
207 ,p_bpr_attribute13 => p_bpr_attribute13
208 ,p_bpr_attribute14 => p_bpr_attribute14
209 ,p_bpr_attribute15 => p_bpr_attribute15
210 ,p_bpr_attribute16 => p_bpr_attribute16
211 ,p_bpr_attribute17 => p_bpr_attribute17
212 ,p_bpr_attribute18 => p_bpr_attribute18
213 ,p_bpr_attribute19 => p_bpr_attribute19
214 ,p_bpr_attribute20 => p_bpr_attribute20
215 ,p_bpr_attribute21 => p_bpr_attribute21
216 ,p_bpr_attribute22 => p_bpr_attribute22
217 ,p_bpr_attribute23 => p_bpr_attribute23
218 ,p_bpr_attribute24 => p_bpr_attribute24
219 ,p_bpr_attribute25 => p_bpr_attribute25
220 ,p_bpr_attribute26 => p_bpr_attribute26
221 ,p_bpr_attribute27 => p_bpr_attribute27
222 ,p_bpr_attribute28 => p_bpr_attribute28
223 ,p_bpr_attribute29 => p_bpr_attribute29
224 ,p_bpr_attribute30 => p_bpr_attribute30
225 ,p_object_version_number => l_object_version_number
226 ,p_effective_date => trunc(p_effective_date)
227 );
228 --
229 begin
230 --
231 -- Start of API User Hook for the after hook of create_Bnft_Pool_Rlovr_Rqmt
232 --
233 ben_Bnft_Pool_Rlovr_Rqmt_bk1.create_Bnft_Pool_Rlovr_Rqmt_a
234 (
235 p_bnft_pool_rlovr_rqmt_id => l_bnft_pool_rlovr_rqmt_id
236 ,p_effective_start_date => l_effective_start_date
237 ,p_effective_end_date => l_effective_end_date
238 ,p_no_mn_rlovr_pct_dfnd_flag => p_no_mn_rlovr_pct_dfnd_flag
239 ,p_no_mx_rlovr_pct_dfnd_flag => p_no_mx_rlovr_pct_dfnd_flag
240 ,p_no_mn_rlovr_val_dfnd_flag => p_no_mn_rlovr_val_dfnd_flag
241 ,p_no_mx_rlovr_val_dfnd_flag => p_no_mx_rlovr_val_dfnd_flag
242 ,p_rlovr_val_incrmt_num => p_rlovr_val_incrmt_num
243 ,p_rlovr_val_rl => p_rlovr_val_rl
244 ,p_mn_rlovr_val => p_mn_rlovr_val
245 ,p_mx_rlovr_val => p_mx_rlovr_val
246 ,p_val_rndg_cd => p_val_rndg_cd
247 ,p_val_rndg_rl => p_val_rndg_rl
251 ,p_mx_rchd_dflt_ordr_num => p_mx_rchd_dflt_ordr_num
248 ,p_pct_rndg_cd => p_pct_rndg_cd
249 ,p_pct_rndg_rl => p_pct_rndg_rl
250 ,p_prtt_elig_rlovr_rl => p_prtt_elig_rlovr_rl
252 ,p_pct_rlovr_incrmt_num => p_pct_rlovr_incrmt_num
253 ,p_mn_rlovr_pct_num => p_mn_rlovr_pct_num
254 ,p_mx_rlovr_pct_num => p_mx_rlovr_pct_num
255 ,p_crs_rlovr_procg_cd => p_crs_rlovr_procg_cd
256 ,p_mx_pct_ttl_crs_cn_roll_num => p_mx_pct_ttl_crs_cn_roll_num
257 ,p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
258 ,p_acty_base_rt_id => p_acty_base_rt_id
259 ,p_business_group_id => p_business_group_id
260 ,p_bpr_attribute_category => p_bpr_attribute_category
261 ,p_bpr_attribute1 => p_bpr_attribute1
262 ,p_bpr_attribute2 => p_bpr_attribute2
263 ,p_bpr_attribute3 => p_bpr_attribute3
264 ,p_bpr_attribute4 => p_bpr_attribute4
265 ,p_bpr_attribute5 => p_bpr_attribute5
266 ,p_bpr_attribute6 => p_bpr_attribute6
267 ,p_bpr_attribute7 => p_bpr_attribute7
268 ,p_bpr_attribute8 => p_bpr_attribute8
269 ,p_bpr_attribute9 => p_bpr_attribute9
270 ,p_bpr_attribute10 => p_bpr_attribute10
271 ,p_bpr_attribute11 => p_bpr_attribute11
272 ,p_bpr_attribute12 => p_bpr_attribute12
273 ,p_bpr_attribute13 => p_bpr_attribute13
274 ,p_bpr_attribute14 => p_bpr_attribute14
275 ,p_bpr_attribute15 => p_bpr_attribute15
276 ,p_bpr_attribute16 => p_bpr_attribute16
277 ,p_bpr_attribute17 => p_bpr_attribute17
278 ,p_bpr_attribute18 => p_bpr_attribute18
279 ,p_bpr_attribute19 => p_bpr_attribute19
280 ,p_bpr_attribute20 => p_bpr_attribute20
281 ,p_bpr_attribute21 => p_bpr_attribute21
282 ,p_bpr_attribute22 => p_bpr_attribute22
283 ,p_bpr_attribute23 => p_bpr_attribute23
284 ,p_bpr_attribute24 => p_bpr_attribute24
285 ,p_bpr_attribute25 => p_bpr_attribute25
286 ,p_bpr_attribute26 => p_bpr_attribute26
287 ,p_bpr_attribute27 => p_bpr_attribute27
288 ,p_bpr_attribute28 => p_bpr_attribute28
289 ,p_bpr_attribute29 => p_bpr_attribute29
290 ,p_bpr_attribute30 => p_bpr_attribute30
291 ,p_object_version_number => l_object_version_number
292 ,p_effective_date => trunc(p_effective_date)
293 );
294 exception
295 when hr_api.cannot_find_prog_unit then
296 hr_api.cannot_find_prog_unit_error
297 (p_module_name => 'CREATE_Bnft_Pool_Rlovr_Rqmt'
298 ,p_hook_type => 'AP'
299 );
300 --
301 -- End of API User Hook for the after hook of create_Bnft_Pool_Rlovr_Rqmt
302 --
303 end;
304 --
305 hr_utility.set_location(l_proc, 60);
306 --
307 -- When in validation only mode raise the Validate_Enabled exception
308 --
309 if p_validate then
310 raise hr_api.validate_enabled;
311 end if;
312 --
313 -- Set all output arguments
314 --
315 p_bnft_pool_rlovr_rqmt_id := l_bnft_pool_rlovr_rqmt_id;
316 p_effective_start_date := l_effective_start_date;
317 p_effective_end_date := l_effective_end_date;
318 p_object_version_number := l_object_version_number;
319 --
320 hr_utility.set_location(' Leaving:'||l_proc, 70);
321 --
322 exception
323 --
324 when hr_api.validate_enabled then
325 --
326 -- As the Validate_Enabled exception has been raised
327 -- we must rollback to the savepoint
328 --
329 ROLLBACK TO create_Bnft_Pool_Rlovr_Rqmt;
330 --
331 -- Only set output warning arguments
332 -- (Any key or derived arguments must be set to null
333 -- when validation only mode is being used.)
334 --
335 p_bnft_pool_rlovr_rqmt_id := null;
336 p_effective_start_date := null;
337 p_effective_end_date := null;
338 p_object_version_number := null;
339 hr_utility.set_location(' Leaving:'||l_proc, 80);
340 --
341 when others then
342 --
343 -- A validation or unexpected error has occured
344 --
345 ROLLBACK TO create_Bnft_Pool_Rlovr_Rqmt;
346 raise;
347 --
348 end create_Bnft_Pool_Rlovr_Rqmt;
349 -- ----------------------------------------------------------------------------
350 -- |------------------------< update_Bnft_Pool_Rlovr_Rqmt >--- ------------------|
351 -- ----------------------------------------------------------------------------
352 --
353 procedure update_Bnft_Pool_Rlovr_Rqmt
354 (p_validate in boolean default false
355 ,p_bnft_pool_rlovr_rqmt_id in number
356 ,p_effective_start_date out nocopy date
357 ,p_effective_end_date out nocopy date
358 ,p_no_mn_rlovr_pct_dfnd_flag in varchar2 default hr_api.g_varchar2
359 ,p_no_mx_rlovr_pct_dfnd_flag in varchar2 default hr_api.g_varchar2
360 ,p_no_mn_rlovr_val_dfnd_flag in varchar2 default hr_api.g_varchar2
361 ,p_no_mx_rlovr_val_dfnd_flag in varchar2 default hr_api.g_varchar2
362 ,p_rlovr_val_incrmt_num in number default hr_api.g_number
363 ,p_rlovr_val_rl in number default hr_api.g_number
364 ,p_mn_rlovr_val in number default hr_api.g_number
365 ,p_mx_rlovr_val in number default hr_api.g_number
369 ,p_pct_rndg_rl in number default hr_api.g_number
366 ,p_val_rndg_cd in varchar2 default hr_api.g_varchar2
367 ,p_val_rndg_rl in number default hr_api.g_number
368 ,p_pct_rndg_cd in varchar2 default hr_api.g_varchar2
370 ,p_prtt_elig_rlovr_rl in number default hr_api.g_number
371 ,p_mx_rchd_dflt_ordr_num in number default hr_api.g_number
372 ,p_pct_rlovr_incrmt_num in number default hr_api.g_number
373 ,p_mn_rlovr_pct_num in number default hr_api.g_number
374 ,p_mx_rlovr_pct_num in number default hr_api.g_number
375 ,p_crs_rlovr_procg_cd in varchar2 default hr_api.g_varchar2
376 ,p_mx_pct_ttl_crs_cn_roll_num in number default hr_api.g_number
377 ,p_bnft_prvdr_pool_id in number default hr_api.g_number
378 ,p_acty_base_rt_id in number default hr_api.g_number
379 ,p_business_group_id in number default hr_api.g_number
380 ,p_bpr_attribute_category in varchar2 default hr_api.g_varchar2
381 ,p_bpr_attribute1 in varchar2 default hr_api.g_varchar2
382 ,p_bpr_attribute2 in varchar2 default hr_api.g_varchar2
383 ,p_bpr_attribute3 in varchar2 default hr_api.g_varchar2
384 ,p_bpr_attribute4 in varchar2 default hr_api.g_varchar2
385 ,p_bpr_attribute5 in varchar2 default hr_api.g_varchar2
386 ,p_bpr_attribute6 in varchar2 default hr_api.g_varchar2
387 ,p_bpr_attribute7 in varchar2 default hr_api.g_varchar2
388 ,p_bpr_attribute8 in varchar2 default hr_api.g_varchar2
389 ,p_bpr_attribute9 in varchar2 default hr_api.g_varchar2
390 ,p_bpr_attribute10 in varchar2 default hr_api.g_varchar2
391 ,p_bpr_attribute11 in varchar2 default hr_api.g_varchar2
392 ,p_bpr_attribute12 in varchar2 default hr_api.g_varchar2
393 ,p_bpr_attribute13 in varchar2 default hr_api.g_varchar2
394 ,p_bpr_attribute14 in varchar2 default hr_api.g_varchar2
395 ,p_bpr_attribute15 in varchar2 default hr_api.g_varchar2
396 ,p_bpr_attribute16 in varchar2 default hr_api.g_varchar2
397 ,p_bpr_attribute17 in varchar2 default hr_api.g_varchar2
398 ,p_bpr_attribute18 in varchar2 default hr_api.g_varchar2
399 ,p_bpr_attribute19 in varchar2 default hr_api.g_varchar2
400 ,p_bpr_attribute20 in varchar2 default hr_api.g_varchar2
401 ,p_bpr_attribute21 in varchar2 default hr_api.g_varchar2
402 ,p_bpr_attribute22 in varchar2 default hr_api.g_varchar2
403 ,p_bpr_attribute23 in varchar2 default hr_api.g_varchar2
404 ,p_bpr_attribute24 in varchar2 default hr_api.g_varchar2
405 ,p_bpr_attribute25 in varchar2 default hr_api.g_varchar2
406 ,p_bpr_attribute26 in varchar2 default hr_api.g_varchar2
407 ,p_bpr_attribute27 in varchar2 default hr_api.g_varchar2
408 ,p_bpr_attribute28 in varchar2 default hr_api.g_varchar2
409 ,p_bpr_attribute29 in varchar2 default hr_api.g_varchar2
410 ,p_bpr_attribute30 in varchar2 default hr_api.g_varchar2
411 ,p_object_version_number in out nocopy number
412 ,p_effective_date in date
413 ,p_datetrack_mode in varchar2
414 ) is
415 --
416 -- Declare cursors and local variables
417 --
418 l_proc varchar2(72) := g_package||'update_Bnft_Pool_Rlovr_Rqmt';
419 l_object_version_number ben_bnft_pool_rlovr_rqmt_f.object_version_number%TYPE;
420 l_effective_start_date ben_bnft_pool_rlovr_rqmt_f.effective_start_date%TYPE;
421 l_effective_end_date ben_bnft_pool_rlovr_rqmt_f.effective_end_date%TYPE;
422 --
423 begin
424 --
425 hr_utility.set_location('Entering:'|| l_proc, 10);
426 --
427 -- Issue a savepoint if operating in validation only mode
428 --
429 savepoint update_Bnft_Pool_Rlovr_Rqmt;
430 --
431 hr_utility.set_location(l_proc, 20);
432 --
433 -- Process Logic
434 --
435 l_object_version_number := p_object_version_number;
436 --
437 begin
438 --
439 -- Start of API User Hook for the before hook of update_Bnft_Pool_Rlovr_Rqmt
440 --
441 ben_Bnft_Pool_Rlovr_Rqmt_bk2.update_Bnft_Pool_Rlovr_Rqmt_b
442 (
443 p_bnft_pool_rlovr_rqmt_id => p_bnft_pool_rlovr_rqmt_id
444 ,p_no_mn_rlovr_pct_dfnd_flag => p_no_mn_rlovr_pct_dfnd_flag
445 ,p_no_mx_rlovr_pct_dfnd_flag => p_no_mx_rlovr_pct_dfnd_flag
446 ,p_no_mn_rlovr_val_dfnd_flag => p_no_mn_rlovr_val_dfnd_flag
447 ,p_no_mx_rlovr_val_dfnd_flag => p_no_mx_rlovr_val_dfnd_flag
448 ,p_rlovr_val_incrmt_num => p_rlovr_val_incrmt_num
449 ,p_rlovr_val_rl => p_rlovr_val_rl
450 ,p_mn_rlovr_val => p_mn_rlovr_val
451 ,p_mx_rlovr_val => p_mx_rlovr_val
452 ,p_val_rndg_cd => p_val_rndg_cd
453 ,p_val_rndg_rl => p_val_rndg_rl
454 ,p_pct_rndg_cd => p_pct_rndg_cd
455 ,p_pct_rndg_rl => p_pct_rndg_rl
456 ,p_prtt_elig_rlovr_rl => p_prtt_elig_rlovr_rl
457 ,p_mx_rchd_dflt_ordr_num => p_mx_rchd_dflt_ordr_num
458 ,p_pct_rlovr_incrmt_num => p_pct_rlovr_incrmt_num
459 ,p_mn_rlovr_pct_num => p_mn_rlovr_pct_num
460 ,p_mx_rlovr_pct_num => p_mx_rlovr_pct_num
461 ,p_crs_rlovr_procg_cd => p_crs_rlovr_procg_cd
462 ,p_mx_pct_ttl_crs_cn_roll_num => p_mx_pct_ttl_crs_cn_roll_num
463 ,p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
467 ,p_bpr_attribute1 => p_bpr_attribute1
464 ,p_acty_base_rt_id => p_acty_base_rt_id
465 ,p_business_group_id => p_business_group_id
466 ,p_bpr_attribute_category => p_bpr_attribute_category
468 ,p_bpr_attribute2 => p_bpr_attribute2
469 ,p_bpr_attribute3 => p_bpr_attribute3
470 ,p_bpr_attribute4 => p_bpr_attribute4
471 ,p_bpr_attribute5 => p_bpr_attribute5
472 ,p_bpr_attribute6 => p_bpr_attribute6
473 ,p_bpr_attribute7 => p_bpr_attribute7
474 ,p_bpr_attribute8 => p_bpr_attribute8
475 ,p_bpr_attribute9 => p_bpr_attribute9
476 ,p_bpr_attribute10 => p_bpr_attribute10
477 ,p_bpr_attribute11 => p_bpr_attribute11
478 ,p_bpr_attribute12 => p_bpr_attribute12
479 ,p_bpr_attribute13 => p_bpr_attribute13
480 ,p_bpr_attribute14 => p_bpr_attribute14
481 ,p_bpr_attribute15 => p_bpr_attribute15
482 ,p_bpr_attribute16 => p_bpr_attribute16
483 ,p_bpr_attribute17 => p_bpr_attribute17
484 ,p_bpr_attribute18 => p_bpr_attribute18
485 ,p_bpr_attribute19 => p_bpr_attribute19
486 ,p_bpr_attribute20 => p_bpr_attribute20
487 ,p_bpr_attribute21 => p_bpr_attribute21
488 ,p_bpr_attribute22 => p_bpr_attribute22
489 ,p_bpr_attribute23 => p_bpr_attribute23
490 ,p_bpr_attribute24 => p_bpr_attribute24
491 ,p_bpr_attribute25 => p_bpr_attribute25
492 ,p_bpr_attribute26 => p_bpr_attribute26
493 ,p_bpr_attribute27 => p_bpr_attribute27
494 ,p_bpr_attribute28 => p_bpr_attribute28
495 ,p_bpr_attribute29 => p_bpr_attribute29
496 ,p_bpr_attribute30 => p_bpr_attribute30
497 ,p_object_version_number => p_object_version_number
498 ,p_effective_date => trunc(p_effective_date)
499 ,p_datetrack_mode => p_datetrack_mode
500 );
501 exception
502 when hr_api.cannot_find_prog_unit then
503 hr_api.cannot_find_prog_unit_error
504 (p_module_name => 'UPDATE_Bnft_Pool_Rlovr_Rqmt'
505 ,p_hook_type => 'BP'
506 );
507 --
508 -- End of API User Hook for the before hook of update_Bnft_Pool_Rlovr_Rqmt
509 --
510 end;
511 --
512 ben_bpr_upd.upd
513 (
514 p_bnft_pool_rlovr_rqmt_id => p_bnft_pool_rlovr_rqmt_id
515 ,p_effective_start_date => l_effective_start_date
516 ,p_effective_end_date => l_effective_end_date
517 ,p_no_mn_rlovr_pct_dfnd_flag => p_no_mn_rlovr_pct_dfnd_flag
518 ,p_no_mx_rlovr_pct_dfnd_flag => p_no_mx_rlovr_pct_dfnd_flag
519 ,p_no_mn_rlovr_val_dfnd_flag => p_no_mn_rlovr_val_dfnd_flag
520 ,p_no_mx_rlovr_val_dfnd_flag => p_no_mx_rlovr_val_dfnd_flag
521 ,p_rlovr_val_incrmt_num => p_rlovr_val_incrmt_num
522 ,p_rlovr_val_rl => p_rlovr_val_rl
523 ,p_mn_rlovr_val => p_mn_rlovr_val
524 ,p_mx_rlovr_val => p_mx_rlovr_val
525 ,p_val_rndg_cd => p_val_rndg_cd
526 ,p_val_rndg_rl => p_val_rndg_rl
527 ,p_pct_rndg_cd => p_pct_rndg_cd
528 ,p_pct_rndg_rl => p_pct_rndg_rl
529 ,p_prtt_elig_rlovr_rl => p_prtt_elig_rlovr_rl
530 ,p_mx_rchd_dflt_ordr_num => p_mx_rchd_dflt_ordr_num
531 ,p_pct_rlovr_incrmt_num => p_pct_rlovr_incrmt_num
532 ,p_mn_rlovr_pct_num => p_mn_rlovr_pct_num
533 ,p_mx_rlovr_pct_num => p_mx_rlovr_pct_num
534 ,p_crs_rlovr_procg_cd => p_crs_rlovr_procg_cd
535 ,p_mx_pct_ttl_crs_cn_roll_num => p_mx_pct_ttl_crs_cn_roll_num
536 ,p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
537 ,p_acty_base_rt_id => p_acty_base_rt_id
538 ,p_business_group_id => p_business_group_id
539 ,p_bpr_attribute_category => p_bpr_attribute_category
540 ,p_bpr_attribute1 => p_bpr_attribute1
541 ,p_bpr_attribute2 => p_bpr_attribute2
542 ,p_bpr_attribute3 => p_bpr_attribute3
543 ,p_bpr_attribute4 => p_bpr_attribute4
544 ,p_bpr_attribute5 => p_bpr_attribute5
545 ,p_bpr_attribute6 => p_bpr_attribute6
546 ,p_bpr_attribute7 => p_bpr_attribute7
547 ,p_bpr_attribute8 => p_bpr_attribute8
548 ,p_bpr_attribute9 => p_bpr_attribute9
549 ,p_bpr_attribute10 => p_bpr_attribute10
550 ,p_bpr_attribute11 => p_bpr_attribute11
551 ,p_bpr_attribute12 => p_bpr_attribute12
552 ,p_bpr_attribute13 => p_bpr_attribute13
553 ,p_bpr_attribute14 => p_bpr_attribute14
554 ,p_bpr_attribute15 => p_bpr_attribute15
555 ,p_bpr_attribute16 => p_bpr_attribute16
556 ,p_bpr_attribute17 => p_bpr_attribute17
557 ,p_bpr_attribute18 => p_bpr_attribute18
558 ,p_bpr_attribute19 => p_bpr_attribute19
559 ,p_bpr_attribute20 => p_bpr_attribute20
560 ,p_bpr_attribute21 => p_bpr_attribute21
561 ,p_bpr_attribute22 => p_bpr_attribute22
562 ,p_bpr_attribute23 => p_bpr_attribute23
563 ,p_bpr_attribute24 => p_bpr_attribute24
564 ,p_bpr_attribute25 => p_bpr_attribute25
565 ,p_bpr_attribute26 => p_bpr_attribute26
566 ,p_bpr_attribute27 => p_bpr_attribute27
570 ,p_object_version_number => l_object_version_number
567 ,p_bpr_attribute28 => p_bpr_attribute28
568 ,p_bpr_attribute29 => p_bpr_attribute29
569 ,p_bpr_attribute30 => p_bpr_attribute30
571 ,p_effective_date => trunc(p_effective_date)
572 ,p_datetrack_mode => p_datetrack_mode
573 );
574 --
575 begin
576 --
577 -- Start of API User Hook for the after hook of update_Bnft_Pool_Rlovr_Rqmt
578 --
579 ben_Bnft_Pool_Rlovr_Rqmt_bk2.update_Bnft_Pool_Rlovr_Rqmt_a
580 (
581 p_bnft_pool_rlovr_rqmt_id => p_bnft_pool_rlovr_rqmt_id
582 ,p_effective_start_date => l_effective_start_date
583 ,p_effective_end_date => l_effective_end_date
584 ,p_no_mn_rlovr_pct_dfnd_flag => p_no_mn_rlovr_pct_dfnd_flag
585 ,p_no_mx_rlovr_pct_dfnd_flag => p_no_mx_rlovr_pct_dfnd_flag
586 ,p_no_mn_rlovr_val_dfnd_flag => p_no_mn_rlovr_val_dfnd_flag
587 ,p_no_mx_rlovr_val_dfnd_flag => p_no_mx_rlovr_val_dfnd_flag
588 ,p_rlovr_val_incrmt_num => p_rlovr_val_incrmt_num
589 ,p_rlovr_val_rl => p_rlovr_val_rl
590 ,p_mn_rlovr_val => p_mn_rlovr_val
591 ,p_mx_rlovr_val => p_mx_rlovr_val
592 ,p_val_rndg_cd => p_val_rndg_cd
593 ,p_val_rndg_rl => p_val_rndg_rl
594 ,p_pct_rndg_cd => p_pct_rndg_cd
595 ,p_pct_rndg_rl => p_pct_rndg_rl
596 ,p_prtt_elig_rlovr_rl => p_prtt_elig_rlovr_rl
597 ,p_mx_rchd_dflt_ordr_num => p_mx_rchd_dflt_ordr_num
598 ,p_pct_rlovr_incrmt_num => p_pct_rlovr_incrmt_num
599 ,p_mn_rlovr_pct_num => p_mn_rlovr_pct_num
600 ,p_mx_rlovr_pct_num => p_mx_rlovr_pct_num
601 ,p_crs_rlovr_procg_cd => p_crs_rlovr_procg_cd
602 ,p_mx_pct_ttl_crs_cn_roll_num => p_mx_pct_ttl_crs_cn_roll_num
603 ,p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
604 ,p_acty_base_rt_id => p_acty_base_rt_id
605 ,p_business_group_id => p_business_group_id
606 ,p_bpr_attribute_category => p_bpr_attribute_category
607 ,p_bpr_attribute1 => p_bpr_attribute1
608 ,p_bpr_attribute2 => p_bpr_attribute2
609 ,p_bpr_attribute3 => p_bpr_attribute3
610 ,p_bpr_attribute4 => p_bpr_attribute4
611 ,p_bpr_attribute5 => p_bpr_attribute5
612 ,p_bpr_attribute6 => p_bpr_attribute6
613 ,p_bpr_attribute7 => p_bpr_attribute7
614 ,p_bpr_attribute8 => p_bpr_attribute8
615 ,p_bpr_attribute9 => p_bpr_attribute9
616 ,p_bpr_attribute10 => p_bpr_attribute10
617 ,p_bpr_attribute11 => p_bpr_attribute11
618 ,p_bpr_attribute12 => p_bpr_attribute12
619 ,p_bpr_attribute13 => p_bpr_attribute13
620 ,p_bpr_attribute14 => p_bpr_attribute14
621 ,p_bpr_attribute15 => p_bpr_attribute15
622 ,p_bpr_attribute16 => p_bpr_attribute16
623 ,p_bpr_attribute17 => p_bpr_attribute17
624 ,p_bpr_attribute18 => p_bpr_attribute18
625 ,p_bpr_attribute19 => p_bpr_attribute19
626 ,p_bpr_attribute20 => p_bpr_attribute20
627 ,p_bpr_attribute21 => p_bpr_attribute21
628 ,p_bpr_attribute22 => p_bpr_attribute22
629 ,p_bpr_attribute23 => p_bpr_attribute23
630 ,p_bpr_attribute24 => p_bpr_attribute24
631 ,p_bpr_attribute25 => p_bpr_attribute25
632 ,p_bpr_attribute26 => p_bpr_attribute26
633 ,p_bpr_attribute27 => p_bpr_attribute27
634 ,p_bpr_attribute28 => p_bpr_attribute28
635 ,p_bpr_attribute29 => p_bpr_attribute29
636 ,p_bpr_attribute30 => p_bpr_attribute30
637 ,p_object_version_number => l_object_version_number
638 ,p_effective_date => trunc(p_effective_date)
639 ,p_datetrack_mode => p_datetrack_mode
640 );
641 exception
642 when hr_api.cannot_find_prog_unit then
643 hr_api.cannot_find_prog_unit_error
644 (p_module_name => 'UPDATE_Bnft_Pool_Rlovr_Rqmt'
645 ,p_hook_type => 'AP'
646 );
647 --
648 -- End of API User Hook for the after hook of update_Bnft_Pool_Rlovr_Rqmt
649 --
650 end;
651 --
652 hr_utility.set_location(l_proc, 60);
653 --
654 -- When in validation only mode raise the Validate_Enabled exception
655 --
656 if p_validate then
657 raise hr_api.validate_enabled;
658 end if;
659 --
660 -- Set all output arguments
661 --
662 p_object_version_number := l_object_version_number;
663 p_effective_start_date := l_effective_start_date;
664 p_effective_end_date := l_effective_end_date;
665 --
666 hr_utility.set_location(' Leaving:'||l_proc, 70);
667 --
668 exception
669 --
670 when hr_api.validate_enabled then
671 --
672 -- As the Validate_Enabled exception has been raised
673 -- we must rollback to the savepoint
674 --
675 ROLLBACK TO update_Bnft_Pool_Rlovr_Rqmt;
676 --
677 -- Only set output warning arguments
678 -- (Any key or derived arguments must be set to null
679 -- when validation only mode is being used.)
680 --
681 hr_utility.set_location(' Leaving:'||l_proc, 80);
682 --
683 when others then
684 --
688 raise;
685 -- A validation or unexpected error has occured
686 --
687 ROLLBACK TO update_Bnft_Pool_Rlovr_Rqmt;
689 --
690 end update_Bnft_Pool_Rlovr_Rqmt;
691 -- ----------------------------------------------------------------------------
692 -- |------------------------< delete_Bnft_Pool_Rlovr_Rqmt >----------------------|
693 -- ----------------------------------------------------------------------------
694 --
695 procedure delete_Bnft_Pool_Rlovr_Rqmt
696 (p_validate in boolean default false
697 ,p_bnft_pool_rlovr_rqmt_id in number
698 ,p_effective_start_date out nocopy date
699 ,p_effective_end_date out nocopy date
700 ,p_object_version_number in out nocopy number
701 ,p_effective_date in date
702 ,p_datetrack_mode in varchar2
703 ) is
704 --
705 -- Declare cursors and local variables
706 --
707 l_proc varchar2(72) := g_package||'update_Bnft_Pool_Rlovr_Rqmt';
708 l_object_version_number ben_bnft_pool_rlovr_rqmt_f.object_version_number%TYPE;
709 l_effective_start_date ben_bnft_pool_rlovr_rqmt_f.effective_start_date%TYPE;
710 l_effective_end_date ben_bnft_pool_rlovr_rqmt_f.effective_end_date%TYPE;
711 --
712 begin
713 --
714 hr_utility.set_location('Entering:'|| l_proc, 10);
715 --
716 -- Issue a savepoint if operating in validation only mode
717 --
718 savepoint delete_Bnft_Pool_Rlovr_Rqmt;
719 --
720 hr_utility.set_location(l_proc, 20);
721 --
722 -- Process Logic
723 --
724 l_object_version_number := p_object_version_number;
725 --
726 --
727 begin
728 --
729 -- Start of API User Hook for the before hook of delete_Bnft_Pool_Rlovr_Rqmt
730 --
731 ben_Bnft_Pool_Rlovr_Rqmt_bk3.delete_Bnft_Pool_Rlovr_Rqmt_b
732 (
733 p_bnft_pool_rlovr_rqmt_id => p_bnft_pool_rlovr_rqmt_id
734 ,p_object_version_number => p_object_version_number
735 ,p_effective_date => trunc(p_effective_date)
736 ,p_datetrack_mode => p_datetrack_mode
737 );
738 exception
739 when hr_api.cannot_find_prog_unit then
740 hr_api.cannot_find_prog_unit_error
741 (p_module_name => 'DELETE_Bnft_Pool_Rlovr_Rqmt'
742 ,p_hook_type => 'BP'
743 );
744 --
745 -- End of API User Hook for the before hook of delete_Bnft_Pool_Rlovr_Rqmt
746 --
747 end;
748 --
749 ben_bpr_del.del
750 (
751 p_bnft_pool_rlovr_rqmt_id => p_bnft_pool_rlovr_rqmt_id
752 ,p_effective_start_date => l_effective_start_date
753 ,p_effective_end_date => l_effective_end_date
754 ,p_object_version_number => l_object_version_number
755 ,p_effective_date => p_effective_date
756 ,p_datetrack_mode => p_datetrack_mode
757 );
758 --
759 begin
760 --
761 -- Start of API User Hook for the after hook of delete_Bnft_Pool_Rlovr_Rqmt
762 --
763 ben_Bnft_Pool_Rlovr_Rqmt_bk3.delete_Bnft_Pool_Rlovr_Rqmt_a
764 (
765 p_bnft_pool_rlovr_rqmt_id => p_bnft_pool_rlovr_rqmt_id
766 ,p_effective_start_date => l_effective_start_date
767 ,p_effective_end_date => l_effective_end_date
768 ,p_object_version_number => l_object_version_number
769 ,p_effective_date => trunc(p_effective_date)
770 ,p_datetrack_mode => p_datetrack_mode
771 );
772 exception
773 when hr_api.cannot_find_prog_unit then
774 hr_api.cannot_find_prog_unit_error
775 (p_module_name => 'DELETE_Bnft_Pool_Rlovr_Rqmt'
776 ,p_hook_type => 'AP'
777 );
778 --
779 -- End of API User Hook for the after hook of delete_Bnft_Pool_Rlovr_Rqmt
780 --
781 end;
782 --
783 hr_utility.set_location(l_proc, 60);
784 --
785 -- When in validation only mode raise the Validate_Enabled exception
786 --
787 if p_validate then
788 raise hr_api.validate_enabled;
789 end if;
790 --
791 hr_utility.set_location(' Leaving:'||l_proc, 70);
792 --
793 exception
794 --
795 when hr_api.validate_enabled then
796 --
797 -- As the Validate_Enabled exception has been raised
798 -- we must rollback to the savepoint
799 --
800 ROLLBACK TO delete_Bnft_Pool_Rlovr_Rqmt;
801 --
802 -- Only set output warning arguments
803 -- (Any key or derived arguments must be set to null
804 -- when validation only mode is being used.)
805 --
806 p_effective_start_date := null;
807 p_effective_end_date := null;
808 --
809 when others then
810 --
811 -- A validation or unexpected error has occured
812 --
813 ROLLBACK TO delete_Bnft_Pool_Rlovr_Rqmt;
814 raise;
815 --
816 end delete_Bnft_Pool_Rlovr_Rqmt;
817 --
818 -- ----------------------------------------------------------------------------
819 -- |-------------------------------< lck >------------------------------------|
820 -- ----------------------------------------------------------------------------
821 --
822 procedure lck
823 (
824 p_bnft_pool_rlovr_rqmt_id in number
825 ,p_object_version_number in number
826 ,p_effective_date in date
827 ,p_datetrack_mode in varchar2
828 ,p_validation_start_date out nocopy date
829 ,p_validation_end_date out nocopy date
830 ) is
831 --
832 --
833 -- Declare cursors and local variables
834 --
835 l_proc varchar2(72) := g_package||'lck';
836 l_validation_start_date date;
837 l_validation_end_date date;
838 --
839 begin
840 --
841 hr_utility.set_location('Entering:'|| l_proc, 10);
842 --
843 ben_bpr_shd.lck
844 (
845 p_bnft_pool_rlovr_rqmt_id => p_bnft_pool_rlovr_rqmt_id
846 ,p_validation_start_date => l_validation_start_date
847 ,p_validation_end_date => l_validation_end_date
848 ,p_object_version_number => p_object_version_number
849 ,p_effective_date => p_effective_date
850 ,p_datetrack_mode => p_datetrack_mode
851 );
852 --
853 hr_utility.set_location(' Leaving:'||l_proc, 70);
854 --
855 end lck;
856 --
857 end ben_Bnft_Pool_Rlovr_Rqmt_api;