[Home] [Help]
PACKAGE BODY: APPS.BEN_BENEFIT_PRVDR_POOL_API
Source
1 Package Body ben_Benefit_Prvdr_Pool_api as
2 /* $Header: bebppapi.pkb 120.0 2005/05/28 00:48:09 appldev noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' ben_Benefit_Prvdr_Pool_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_Benefit_Prvdr_Pool >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_Benefit_Prvdr_Pool
13 (p_validate in boolean default false
14 ,p_bnft_prvdr_pool_id out nocopy number
15 ,p_effective_start_date out nocopy date
16 ,p_effective_end_date out nocopy date
17 ,p_name in varchar2 default null
18 ,p_pgm_pool_flag in varchar2 default 'N'
19 ,p_excs_alwys_fftd_flag in varchar2 default 'N'
20 ,p_use_for_pgm_pool_flag in varchar2 default 'N'
21 ,p_pct_rndg_cd in varchar2 default null
22 ,p_pct_rndg_rl in number default null
23 ,p_val_rndg_cd in varchar2 default null
24 ,p_val_rndg_rl in number default null
25 ,p_dflt_excs_trtmt_cd in varchar2 default null
26 ,p_dflt_excs_trtmt_rl in number default null
27 ,p_rlovr_rstrcn_cd in varchar2 default null
28 ,p_no_mn_dstrbl_pct_flag in varchar2 default 'N'
29 ,p_no_mn_dstrbl_val_flag in varchar2 default 'N'
30 ,p_no_mx_dstrbl_pct_flag in varchar2 default 'N'
31 ,p_no_mx_dstrbl_val_flag in varchar2 default 'N'
32 ,p_auto_alct_excs_flag in varchar2 default 'N'
33 ,p_alws_ngtv_crs_flag in varchar2 default 'N'
34 ,p_uses_net_crs_mthd_flag in varchar2 default 'N'
35 ,p_mx_dfcit_pct_pool_crs_num in number default null
36 ,p_mx_dfcit_pct_comp_num in number default null
37 ,p_comp_lvl_fctr_id in number default null
38 ,p_mn_dstrbl_pct_num in number default null
39 ,p_mn_dstrbl_val in number default null
40 ,p_mx_dstrbl_pct_num in number default null
41 ,p_mx_dstrbl_val in number default null
42 ,p_excs_trtmt_cd in varchar2 default null
43 ,p_ptip_id in number default null
44 ,p_plip_id in number default null
45 ,p_pgm_id in number default null
46 ,p_oiplip_id in number default null
47 ,p_cmbn_plip_id in number default null
48 ,p_cmbn_ptip_id in number default null
49 ,p_cmbn_ptip_opt_id in number default null
50 ,p_business_group_id in number default null
51 ,p_bpp_attribute_category in varchar2 default null
52 ,p_bpp_attribute1 in varchar2 default null
53 ,p_bpp_attribute2 in varchar2 default null
54 ,p_bpp_attribute3 in varchar2 default null
55 ,p_bpp_attribute4 in varchar2 default null
56 ,p_bpp_attribute5 in varchar2 default null
57 ,p_bpp_attribute6 in varchar2 default null
58 ,p_bpp_attribute7 in varchar2 default null
59 ,p_bpp_attribute8 in varchar2 default null
60 ,p_bpp_attribute9 in varchar2 default null
61 ,p_bpp_attribute10 in varchar2 default null
62 ,p_bpp_attribute11 in varchar2 default null
63 ,p_bpp_attribute12 in varchar2 default null
64 ,p_bpp_attribute13 in varchar2 default null
65 ,p_bpp_attribute14 in varchar2 default null
66 ,p_bpp_attribute15 in varchar2 default null
67 ,p_bpp_attribute16 in varchar2 default null
68 ,p_bpp_attribute17 in varchar2 default null
69 ,p_bpp_attribute18 in varchar2 default null
70 ,p_bpp_attribute19 in varchar2 default null
71 ,p_bpp_attribute20 in varchar2 default null
72 ,p_bpp_attribute21 in varchar2 default null
73 ,p_bpp_attribute22 in varchar2 default null
74 ,p_bpp_attribute23 in varchar2 default null
75 ,p_bpp_attribute24 in varchar2 default null
76 ,p_bpp_attribute25 in varchar2 default null
77 ,p_bpp_attribute26 in varchar2 default null
78 ,p_bpp_attribute27 in varchar2 default null
79 ,p_bpp_attribute28 in varchar2 default null
80 ,p_bpp_attribute29 in varchar2 default null
81 ,p_bpp_attribute30 in varchar2 default null
82 ,p_object_version_number out nocopy number
83 ,p_effective_date in date
84 ) is
85 --
86 -- Declare cursors and local variables
87 --
88 l_bnft_prvdr_pool_id ben_bnft_prvdr_pool_f.bnft_prvdr_pool_id%TYPE;
89 l_effective_start_date ben_bnft_prvdr_pool_f.effective_start_date%TYPE;
90 l_effective_end_date ben_bnft_prvdr_pool_f.effective_end_date%TYPE;
91 l_proc varchar2(72) := g_package||'create_Benefit_Prvdr_Pool';
92 l_object_version_number ben_bnft_prvdr_pool_f.object_version_number%TYPE;
93 --
94 begin
95 --
96 hr_utility.set_location('Entering:'|| l_proc, 10);
97 --
98 -- Issue a savepoint if operating in validation only mode
99 --
100 savepoint create_Benefit_Prvdr_Pool;
101 --
102 hr_utility.set_location(l_proc, 20);
103 --
104 -- Process Logic
105 --
106 begin
107 --
108 -- Start of API User Hook for the before hook of create_Benefit_Prvdr_Pool
109 --
110 ben_Benefit_Prvdr_Pool_bk1.create_Benefit_Prvdr_Pool_b
111 (
112 p_name => p_name
113 ,p_pgm_pool_flag => p_pgm_pool_flag
114 ,p_excs_alwys_fftd_flag => p_excs_alwys_fftd_flag
115 ,p_use_for_pgm_pool_flag => p_use_for_pgm_pool_flag
116 ,p_pct_rndg_cd => p_pct_rndg_cd
117 ,p_pct_rndg_rl => p_pct_rndg_rl
118 ,p_val_rndg_cd => p_val_rndg_cd
119 ,p_val_rndg_rl => p_val_rndg_rl
120 ,p_dflt_excs_trtmt_cd => p_dflt_excs_trtmt_cd
121 ,p_dflt_excs_trtmt_rl => p_dflt_excs_trtmt_rl
122 ,p_rlovr_rstrcn_cd => p_rlovr_rstrcn_cd
123 ,p_no_mn_dstrbl_pct_flag => p_no_mn_dstrbl_pct_flag
124 ,p_no_mn_dstrbl_val_flag => p_no_mn_dstrbl_val_flag
125 ,p_no_mx_dstrbl_pct_flag => p_no_mx_dstrbl_pct_flag
126 ,p_no_mx_dstrbl_val_flag => p_no_mx_dstrbl_val_flag
127 ,p_auto_alct_excs_flag => p_auto_alct_excs_flag
128 ,p_alws_ngtv_crs_flag => p_alws_ngtv_crs_flag
129 ,p_uses_net_crs_mthd_flag => p_uses_net_crs_mthd_flag
130 ,p_mx_dfcit_pct_pool_crs_num => p_mx_dfcit_pct_pool_crs_num
131 ,p_mx_dfcit_pct_comp_num => p_mx_dfcit_pct_comp_num
132 ,p_comp_lvl_fctr_id => p_comp_lvl_fctr_id
133 ,p_mn_dstrbl_pct_num => p_mn_dstrbl_pct_num
134 ,p_mn_dstrbl_val => p_mn_dstrbl_val
135 ,p_mx_dstrbl_pct_num => p_mx_dstrbl_pct_num
136 ,p_mx_dstrbl_val => p_mx_dstrbl_val
137 ,p_excs_trtmt_cd => p_excs_trtmt_cd
138 ,p_ptip_id => p_ptip_id
139 ,p_plip_id => p_plip_id
140 ,p_pgm_id => p_pgm_id
141 ,p_oiplip_id => p_oiplip_id
142 ,p_cmbn_plip_id => p_cmbn_plip_id
143 ,p_cmbn_ptip_id => p_cmbn_ptip_id
144 ,p_cmbn_ptip_opt_id => p_cmbn_ptip_opt_id
145 ,p_business_group_id => p_business_group_id
146 ,p_bpp_attribute_category => p_bpp_attribute_category
147 ,p_bpp_attribute1 => p_bpp_attribute1
148 ,p_bpp_attribute2 => p_bpp_attribute2
149 ,p_bpp_attribute3 => p_bpp_attribute3
150 ,p_bpp_attribute4 => p_bpp_attribute4
151 ,p_bpp_attribute5 => p_bpp_attribute5
152 ,p_bpp_attribute6 => p_bpp_attribute6
153 ,p_bpp_attribute7 => p_bpp_attribute7
154 ,p_bpp_attribute8 => p_bpp_attribute8
155 ,p_bpp_attribute9 => p_bpp_attribute9
156 ,p_bpp_attribute10 => p_bpp_attribute10
157 ,p_bpp_attribute11 => p_bpp_attribute11
158 ,p_bpp_attribute12 => p_bpp_attribute12
159 ,p_bpp_attribute13 => p_bpp_attribute13
160 ,p_bpp_attribute14 => p_bpp_attribute14
161 ,p_bpp_attribute15 => p_bpp_attribute15
162 ,p_bpp_attribute16 => p_bpp_attribute16
163 ,p_bpp_attribute17 => p_bpp_attribute17
164 ,p_bpp_attribute18 => p_bpp_attribute18
165 ,p_bpp_attribute19 => p_bpp_attribute19
166 ,p_bpp_attribute20 => p_bpp_attribute20
167 ,p_bpp_attribute21 => p_bpp_attribute21
168 ,p_bpp_attribute22 => p_bpp_attribute22
169 ,p_bpp_attribute23 => p_bpp_attribute23
170 ,p_bpp_attribute24 => p_bpp_attribute24
171 ,p_bpp_attribute25 => p_bpp_attribute25
172 ,p_bpp_attribute26 => p_bpp_attribute26
173 ,p_bpp_attribute27 => p_bpp_attribute27
174 ,p_bpp_attribute28 => p_bpp_attribute28
175 ,p_bpp_attribute29 => p_bpp_attribute29
176 ,p_bpp_attribute30 => p_bpp_attribute30
177 ,p_effective_date => trunc(p_effective_date)
178 );
179 exception
180 when hr_api.cannot_find_prog_unit then
181 hr_api.cannot_find_prog_unit_error
182 (
183 p_module_name => 'CREATE_Benefit_Prvdr_Pool'
184 ,p_hook_type => 'BP'
185 );
186 --
187 -- End of API User Hook for the before hook of create_Benefit_Prvdr_Pool
188 --
189 end;
190 --
191 ben_bpp_ins.ins
192 (
193 p_bnft_prvdr_pool_id => l_bnft_prvdr_pool_id
194 ,p_effective_start_date => l_effective_start_date
195 ,p_effective_end_date => l_effective_end_date
196 ,p_name => p_name
197 ,p_pgm_pool_flag => p_pgm_pool_flag
198 ,p_excs_alwys_fftd_flag => p_excs_alwys_fftd_flag
199 ,p_use_for_pgm_pool_flag => p_use_for_pgm_pool_flag
200 ,p_pct_rndg_cd => p_pct_rndg_cd
201 ,p_pct_rndg_rl => p_pct_rndg_rl
202 ,p_val_rndg_cd => p_val_rndg_cd
203 ,p_val_rndg_rl => p_val_rndg_rl
204 ,p_dflt_excs_trtmt_cd => p_dflt_excs_trtmt_cd
205 ,p_dflt_excs_trtmt_rl => p_dflt_excs_trtmt_rl
206 ,p_rlovr_rstrcn_cd => p_rlovr_rstrcn_cd
207 ,p_no_mn_dstrbl_pct_flag => p_no_mn_dstrbl_pct_flag
208 ,p_no_mn_dstrbl_val_flag => p_no_mn_dstrbl_val_flag
209 ,p_no_mx_dstrbl_pct_flag => p_no_mx_dstrbl_pct_flag
210 ,p_no_mx_dstrbl_val_flag => p_no_mx_dstrbl_val_flag
211 ,p_auto_alct_excs_flag => p_auto_alct_excs_flag
212 ,p_alws_ngtv_crs_flag => p_alws_ngtv_crs_flag
213 ,p_uses_net_crs_mthd_flag => p_uses_net_crs_mthd_flag
214 ,p_mx_dfcit_pct_pool_crs_num => p_mx_dfcit_pct_pool_crs_num
215 ,p_mx_dfcit_pct_comp_num => p_mx_dfcit_pct_comp_num
216 ,p_comp_lvl_fctr_id => p_comp_lvl_fctr_id
217 ,p_mn_dstrbl_pct_num => p_mn_dstrbl_pct_num
218 ,p_mn_dstrbl_val => p_mn_dstrbl_val
219 ,p_mx_dstrbl_pct_num => p_mx_dstrbl_pct_num
220 ,p_mx_dstrbl_val => p_mx_dstrbl_val
221 ,p_excs_trtmt_cd => p_excs_trtmt_cd
222 ,p_ptip_id => p_ptip_id
223 ,p_plip_id => p_plip_id
224 ,p_pgm_id => p_pgm_id
225 ,p_oiplip_id => p_oiplip_id
226 ,p_cmbn_plip_id => p_cmbn_plip_id
227 ,p_cmbn_ptip_id => p_cmbn_ptip_id
228 ,p_cmbn_ptip_opt_id => p_cmbn_ptip_opt_id
229 ,p_business_group_id => p_business_group_id
230 ,p_bpp_attribute_category => p_bpp_attribute_category
231 ,p_bpp_attribute1 => p_bpp_attribute1
232 ,p_bpp_attribute2 => p_bpp_attribute2
233 ,p_bpp_attribute3 => p_bpp_attribute3
234 ,p_bpp_attribute4 => p_bpp_attribute4
235 ,p_bpp_attribute5 => p_bpp_attribute5
236 ,p_bpp_attribute6 => p_bpp_attribute6
237 ,p_bpp_attribute7 => p_bpp_attribute7
238 ,p_bpp_attribute8 => p_bpp_attribute8
239 ,p_bpp_attribute9 => p_bpp_attribute9
240 ,p_bpp_attribute10 => p_bpp_attribute10
241 ,p_bpp_attribute11 => p_bpp_attribute11
242 ,p_bpp_attribute12 => p_bpp_attribute12
243 ,p_bpp_attribute13 => p_bpp_attribute13
244 ,p_bpp_attribute14 => p_bpp_attribute14
245 ,p_bpp_attribute15 => p_bpp_attribute15
246 ,p_bpp_attribute16 => p_bpp_attribute16
247 ,p_bpp_attribute17 => p_bpp_attribute17
248 ,p_bpp_attribute18 => p_bpp_attribute18
249 ,p_bpp_attribute19 => p_bpp_attribute19
253 ,p_bpp_attribute23 => p_bpp_attribute23
250 ,p_bpp_attribute20 => p_bpp_attribute20
251 ,p_bpp_attribute21 => p_bpp_attribute21
252 ,p_bpp_attribute22 => p_bpp_attribute22
254 ,p_bpp_attribute24 => p_bpp_attribute24
255 ,p_bpp_attribute25 => p_bpp_attribute25
256 ,p_bpp_attribute26 => p_bpp_attribute26
257 ,p_bpp_attribute27 => p_bpp_attribute27
258 ,p_bpp_attribute28 => p_bpp_attribute28
259 ,p_bpp_attribute29 => p_bpp_attribute29
260 ,p_bpp_attribute30 => p_bpp_attribute30
261 ,p_object_version_number => l_object_version_number
262 ,p_effective_date => trunc(p_effective_date)
263 );
264 --
265 begin
266 --
267 -- Start of API User Hook for the after hook of create_Benefit_Prvdr_Pool
268 --
269 ben_Benefit_Prvdr_Pool_bk1.create_Benefit_Prvdr_Pool_a
270 (
271 p_bnft_prvdr_pool_id => l_bnft_prvdr_pool_id
272 ,p_effective_start_date => l_effective_start_date
273 ,p_effective_end_date => l_effective_end_date
274 ,p_name => p_name
275 ,p_pgm_pool_flag => p_pgm_pool_flag
276 ,p_excs_alwys_fftd_flag => p_excs_alwys_fftd_flag
277 ,p_use_for_pgm_pool_flag => p_use_for_pgm_pool_flag
278 ,p_pct_rndg_cd => p_pct_rndg_cd
279 ,p_pct_rndg_rl => p_pct_rndg_rl
280 ,p_val_rndg_cd => p_val_rndg_cd
281 ,p_val_rndg_rl => p_val_rndg_rl
282 ,p_dflt_excs_trtmt_cd => p_dflt_excs_trtmt_cd
283 ,p_dflt_excs_trtmt_rl => p_dflt_excs_trtmt_rl
284 ,p_rlovr_rstrcn_cd => p_rlovr_rstrcn_cd
285 ,p_no_mn_dstrbl_pct_flag => p_no_mn_dstrbl_pct_flag
286 ,p_no_mn_dstrbl_val_flag => p_no_mn_dstrbl_val_flag
287 ,p_no_mx_dstrbl_pct_flag => p_no_mx_dstrbl_pct_flag
288 ,p_no_mx_dstrbl_val_flag => p_no_mx_dstrbl_val_flag
289 ,p_auto_alct_excs_flag => p_auto_alct_excs_flag
290 ,p_alws_ngtv_crs_flag => p_alws_ngtv_crs_flag
291 ,p_uses_net_crs_mthd_flag => p_uses_net_crs_mthd_flag
292 ,p_mx_dfcit_pct_pool_crs_num => p_mx_dfcit_pct_pool_crs_num
293 ,p_mx_dfcit_pct_comp_num => p_mx_dfcit_pct_comp_num
294 ,p_comp_lvl_fctr_id => p_comp_lvl_fctr_id
295 ,p_mn_dstrbl_pct_num => p_mn_dstrbl_pct_num
296 ,p_mn_dstrbl_val => p_mn_dstrbl_val
297 ,p_mx_dstrbl_pct_num => p_mx_dstrbl_pct_num
298 ,p_mx_dstrbl_val => p_mx_dstrbl_val
299 ,p_excs_trtmt_cd => p_excs_trtmt_cd
300 ,p_ptip_id => p_ptip_id
301 ,p_plip_id => p_plip_id
302 ,p_pgm_id => p_pgm_id
303 ,p_oiplip_id => p_oiplip_id
304 ,p_cmbn_plip_id => p_cmbn_plip_id
305 ,p_cmbn_ptip_id => p_cmbn_ptip_id
306 ,p_cmbn_ptip_opt_id => p_cmbn_ptip_opt_id
307 ,p_business_group_id => p_business_group_id
308 ,p_bpp_attribute_category => p_bpp_attribute_category
309 ,p_bpp_attribute1 => p_bpp_attribute1
310 ,p_bpp_attribute2 => p_bpp_attribute2
311 ,p_bpp_attribute3 => p_bpp_attribute3
312 ,p_bpp_attribute4 => p_bpp_attribute4
313 ,p_bpp_attribute5 => p_bpp_attribute5
314 ,p_bpp_attribute6 => p_bpp_attribute6
315 ,p_bpp_attribute7 => p_bpp_attribute7
316 ,p_bpp_attribute8 => p_bpp_attribute8
317 ,p_bpp_attribute9 => p_bpp_attribute9
318 ,p_bpp_attribute10 => p_bpp_attribute10
319 ,p_bpp_attribute11 => p_bpp_attribute11
320 ,p_bpp_attribute12 => p_bpp_attribute12
321 ,p_bpp_attribute13 => p_bpp_attribute13
322 ,p_bpp_attribute14 => p_bpp_attribute14
323 ,p_bpp_attribute15 => p_bpp_attribute15
324 ,p_bpp_attribute16 => p_bpp_attribute16
325 ,p_bpp_attribute17 => p_bpp_attribute17
326 ,p_bpp_attribute18 => p_bpp_attribute18
327 ,p_bpp_attribute19 => p_bpp_attribute19
328 ,p_bpp_attribute20 => p_bpp_attribute20
329 ,p_bpp_attribute21 => p_bpp_attribute21
330 ,p_bpp_attribute22 => p_bpp_attribute22
331 ,p_bpp_attribute23 => p_bpp_attribute23
332 ,p_bpp_attribute24 => p_bpp_attribute24
333 ,p_bpp_attribute25 => p_bpp_attribute25
334 ,p_bpp_attribute26 => p_bpp_attribute26
335 ,p_bpp_attribute27 => p_bpp_attribute27
336 ,p_bpp_attribute28 => p_bpp_attribute28
337 ,p_bpp_attribute29 => p_bpp_attribute29
338 ,p_bpp_attribute30 => p_bpp_attribute30
339 ,p_object_version_number => l_object_version_number
340 ,p_effective_date => trunc(p_effective_date)
341 );
342 exception
343 when hr_api.cannot_find_prog_unit then
344 hr_api.cannot_find_prog_unit_error
348 --
345 (p_module_name => 'CREATE_Benefit_Prvdr_Pool'
346 ,p_hook_type => 'AP'
347 );
349 -- End of API User Hook for the after hook of create_Benefit_Prvdr_Pool
350 --
351 end;
352 --
353 hr_utility.set_location(l_proc, 60);
354 --
355 -- When in validation only mode raise the Validate_Enabled exception
356 --
357 if p_validate then
358 raise hr_api.validate_enabled;
359 end if;
360 --
361 -- Set all output arguments
362 --
363 p_bnft_prvdr_pool_id := l_bnft_prvdr_pool_id;
364 p_effective_start_date := l_effective_start_date;
365 p_effective_end_date := l_effective_end_date;
366 p_object_version_number := l_object_version_number;
367 --
368 hr_utility.set_location(' Leaving:'||l_proc, 70);
369 --
370 exception
371 --
372 when hr_api.validate_enabled then
373 --
374 -- As the Validate_Enabled exception has been raised
375 -- we must rollback to the savepoint
376 --
377 ROLLBACK TO create_Benefit_Prvdr_Pool;
378 --
379 -- Only set output warning arguments
380 -- (Any key or derived arguments must be set to null
381 -- when validation only mode is being used.)
382 --
383 p_bnft_prvdr_pool_id := null;
384 p_effective_start_date := null;
385 p_effective_end_date := null;
386 p_object_version_number := null;
387 hr_utility.set_location(' Leaving:'||l_proc, 80);
388 --
389 when others then
390 --
391 -- A validation or unexpected error has occured
392 --
393 ROLLBACK TO create_Benefit_Prvdr_Pool;
394 raise;
395 --
396 end create_Benefit_Prvdr_Pool;
397 -- ----------------------------------------------------------------------------
398 -- |------------------------< update_Benefit_Prvdr_Pool >--- ------------------|
399 -- ----------------------------------------------------------------------------
400 --
401 procedure update_Benefit_Prvdr_Pool
402 (p_validate in boolean default false
403 ,p_bnft_prvdr_pool_id in number
404 ,p_effective_start_date out nocopy date
405 ,p_effective_end_date out nocopy date
406 ,p_name in varchar2 default hr_api.g_varchar2
407 ,p_pgm_pool_flag in varchar2 default hr_api.g_varchar2
408 ,p_excs_alwys_fftd_flag in varchar2 default hr_api.g_varchar2
409 ,p_use_for_pgm_pool_flag in varchar2 default hr_api.g_varchar2
410 ,p_pct_rndg_cd in varchar2 default hr_api.g_varchar2
411 ,p_pct_rndg_rl in number default hr_api.g_number
412 ,p_val_rndg_cd in varchar2 default hr_api.g_varchar2
413 ,p_val_rndg_rl in number default hr_api.g_number
414 ,p_dflt_excs_trtmt_cd in varchar2 default hr_api.g_varchar2
415 ,p_dflt_excs_trtmt_rl in number default hr_api.g_number
416 ,p_rlovr_rstrcn_cd in varchar2 default hr_api.g_varchar2
417 ,p_no_mn_dstrbl_pct_flag in varchar2 default hr_api.g_varchar2
418 ,p_no_mn_dstrbl_val_flag in varchar2 default hr_api.g_varchar2
419 ,p_no_mx_dstrbl_pct_flag in varchar2 default hr_api.g_varchar2
420 ,p_no_mx_dstrbl_val_flag in varchar2 default hr_api.g_varchar2
421 ,p_auto_alct_excs_flag in varchar2 default hr_api.g_varchar2
422 ,p_alws_ngtv_crs_flag in varchar2 default hr_api.g_varchar2
423 ,p_uses_net_crs_mthd_flag in varchar2 default hr_api.g_varchar2
424 ,p_mx_dfcit_pct_pool_crs_num in number default hr_api.g_number
425 ,p_mx_dfcit_pct_comp_num in number default hr_api.g_number
426 ,p_comp_lvl_fctr_id in number default hr_api.g_number
427 ,p_mn_dstrbl_pct_num in number default hr_api.g_number
428 ,p_mn_dstrbl_val in number default hr_api.g_number
429 ,p_mx_dstrbl_pct_num in number default hr_api.g_number
430 ,p_mx_dstrbl_val in number default hr_api.g_number
431 ,p_excs_trtmt_cd in varchar2 default hr_api.g_varchar2
432 ,p_ptip_id in number default hr_api.g_number
433 ,p_plip_id in number default hr_api.g_number
434 ,p_pgm_id in number default hr_api.g_number
435 ,p_oiplip_id in number default hr_api.g_number
436 ,p_cmbn_plip_id in number default hr_api.g_number
437 ,p_cmbn_ptip_id in number default hr_api.g_number
438 ,p_cmbn_ptip_opt_id in number default hr_api.g_number
439 ,p_business_group_id in number default hr_api.g_number
440 ,p_bpp_attribute_category in varchar2 default hr_api.g_varchar2
441 ,p_bpp_attribute1 in varchar2 default hr_api.g_varchar2
442 ,p_bpp_attribute2 in varchar2 default hr_api.g_varchar2
443 ,p_bpp_attribute3 in varchar2 default hr_api.g_varchar2
444 ,p_bpp_attribute4 in varchar2 default hr_api.g_varchar2
445 ,p_bpp_attribute5 in varchar2 default hr_api.g_varchar2
446 ,p_bpp_attribute6 in varchar2 default hr_api.g_varchar2
447 ,p_bpp_attribute7 in varchar2 default hr_api.g_varchar2
448 ,p_bpp_attribute8 in varchar2 default hr_api.g_varchar2
449 ,p_bpp_attribute9 in varchar2 default hr_api.g_varchar2
453 ,p_bpp_attribute13 in varchar2 default hr_api.g_varchar2
450 ,p_bpp_attribute10 in varchar2 default hr_api.g_varchar2
451 ,p_bpp_attribute11 in varchar2 default hr_api.g_varchar2
452 ,p_bpp_attribute12 in varchar2 default hr_api.g_varchar2
454 ,p_bpp_attribute14 in varchar2 default hr_api.g_varchar2
455 ,p_bpp_attribute15 in varchar2 default hr_api.g_varchar2
456 ,p_bpp_attribute16 in varchar2 default hr_api.g_varchar2
457 ,p_bpp_attribute17 in varchar2 default hr_api.g_varchar2
458 ,p_bpp_attribute18 in varchar2 default hr_api.g_varchar2
459 ,p_bpp_attribute19 in varchar2 default hr_api.g_varchar2
460 ,p_bpp_attribute20 in varchar2 default hr_api.g_varchar2
461 ,p_bpp_attribute21 in varchar2 default hr_api.g_varchar2
462 ,p_bpp_attribute22 in varchar2 default hr_api.g_varchar2
463 ,p_bpp_attribute23 in varchar2 default hr_api.g_varchar2
464 ,p_bpp_attribute24 in varchar2 default hr_api.g_varchar2
465 ,p_bpp_attribute25 in varchar2 default hr_api.g_varchar2
466 ,p_bpp_attribute26 in varchar2 default hr_api.g_varchar2
467 ,p_bpp_attribute27 in varchar2 default hr_api.g_varchar2
468 ,p_bpp_attribute28 in varchar2 default hr_api.g_varchar2
469 ,p_bpp_attribute29 in varchar2 default hr_api.g_varchar2
470 ,p_bpp_attribute30 in varchar2 default hr_api.g_varchar2
471 ,p_object_version_number in out nocopy number
472 ,p_effective_date in date
473 ,p_datetrack_mode in varchar2
474 ) is
475 --
476 -- Declare cursors and local variables
477 --
478 l_proc varchar2(72) := g_package||'update_Benefit_Prvdr_Pool';
479 l_object_version_number ben_bnft_prvdr_pool_f.object_version_number%TYPE;
480 l_effective_start_date ben_bnft_prvdr_pool_f.effective_start_date%TYPE;
481 l_effective_end_date ben_bnft_prvdr_pool_f.effective_end_date%TYPE;
482 --
483 begin
484 --
485 hr_utility.set_location('Entering:'|| l_proc, 10);
486 --
487 -- Issue a savepoint if operating in validation only mode
488 --
489 savepoint update_Benefit_Prvdr_Pool;
490 --
491 hr_utility.set_location(l_proc, 20);
492 --
493 -- Process Logic
494 --
495 l_object_version_number := p_object_version_number;
496 --
497 begin
498 --
499 -- Start of API User Hook for the before hook of update_Benefit_Prvdr_Pool
500 --
501 ben_Benefit_Prvdr_Pool_bk2.update_Benefit_Prvdr_Pool_b
502 (
503 p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
504 ,p_name => p_name
505 ,p_pgm_pool_flag => p_pgm_pool_flag
506 ,p_excs_alwys_fftd_flag => p_excs_alwys_fftd_flag
507 ,p_use_for_pgm_pool_flag => p_use_for_pgm_pool_flag
508 ,p_pct_rndg_cd => p_pct_rndg_cd
509 ,p_pct_rndg_rl => p_pct_rndg_rl
510 ,p_val_rndg_cd => p_val_rndg_cd
511 ,p_val_rndg_rl => p_val_rndg_rl
512 ,p_dflt_excs_trtmt_cd => p_dflt_excs_trtmt_cd
513 ,p_dflt_excs_trtmt_rl => p_dflt_excs_trtmt_rl
514 ,p_rlovr_rstrcn_cd => p_rlovr_rstrcn_cd
515 ,p_no_mn_dstrbl_pct_flag => p_no_mn_dstrbl_pct_flag
516 ,p_no_mn_dstrbl_val_flag => p_no_mn_dstrbl_val_flag
517 ,p_no_mx_dstrbl_pct_flag => p_no_mx_dstrbl_pct_flag
518 ,p_no_mx_dstrbl_val_flag => p_no_mx_dstrbl_val_flag
519 ,p_auto_alct_excs_flag => p_auto_alct_excs_flag
520 ,p_alws_ngtv_crs_flag => p_alws_ngtv_crs_flag
521 ,p_uses_net_crs_mthd_flag => p_uses_net_crs_mthd_flag
522 ,p_mx_dfcit_pct_pool_crs_num => p_mx_dfcit_pct_pool_crs_num
523 ,p_mx_dfcit_pct_comp_num => p_mx_dfcit_pct_comp_num
524 ,p_comp_lvl_fctr_id => p_comp_lvl_fctr_id
525 ,p_mn_dstrbl_pct_num => p_mn_dstrbl_pct_num
526 ,p_mn_dstrbl_val => p_mn_dstrbl_val
527 ,p_mx_dstrbl_pct_num => p_mx_dstrbl_pct_num
528 ,p_mx_dstrbl_val => p_mx_dstrbl_val
529 ,p_excs_trtmt_cd => p_excs_trtmt_cd
530 ,p_ptip_id => p_ptip_id
531 ,p_plip_id => p_plip_id
532 ,p_pgm_id => p_pgm_id
533 ,p_oiplip_id => p_oiplip_id
534 ,p_cmbn_plip_id => p_cmbn_plip_id
535 ,p_cmbn_ptip_id => p_cmbn_ptip_id
536 ,p_cmbn_ptip_opt_id => p_cmbn_ptip_opt_id
537 ,p_business_group_id => p_business_group_id
538 ,p_bpp_attribute_category => p_bpp_attribute_category
539 ,p_bpp_attribute1 => p_bpp_attribute1
540 ,p_bpp_attribute2 => p_bpp_attribute2
541 ,p_bpp_attribute3 => p_bpp_attribute3
542 ,p_bpp_attribute4 => p_bpp_attribute4
543 ,p_bpp_attribute5 => p_bpp_attribute5
544 ,p_bpp_attribute6 => p_bpp_attribute6
545 ,p_bpp_attribute7 => p_bpp_attribute7
546 ,p_bpp_attribute8 => p_bpp_attribute8
547 ,p_bpp_attribute9 => p_bpp_attribute9
548 ,p_bpp_attribute10 => p_bpp_attribute10
552 ,p_bpp_attribute14 => p_bpp_attribute14
549 ,p_bpp_attribute11 => p_bpp_attribute11
550 ,p_bpp_attribute12 => p_bpp_attribute12
551 ,p_bpp_attribute13 => p_bpp_attribute13
553 ,p_bpp_attribute15 => p_bpp_attribute15
554 ,p_bpp_attribute16 => p_bpp_attribute16
555 ,p_bpp_attribute17 => p_bpp_attribute17
556 ,p_bpp_attribute18 => p_bpp_attribute18
557 ,p_bpp_attribute19 => p_bpp_attribute19
558 ,p_bpp_attribute20 => p_bpp_attribute20
559 ,p_bpp_attribute21 => p_bpp_attribute21
560 ,p_bpp_attribute22 => p_bpp_attribute22
561 ,p_bpp_attribute23 => p_bpp_attribute23
562 ,p_bpp_attribute24 => p_bpp_attribute24
563 ,p_bpp_attribute25 => p_bpp_attribute25
564 ,p_bpp_attribute26 => p_bpp_attribute26
565 ,p_bpp_attribute27 => p_bpp_attribute27
566 ,p_bpp_attribute28 => p_bpp_attribute28
567 ,p_bpp_attribute29 => p_bpp_attribute29
568 ,p_bpp_attribute30 => p_bpp_attribute30
569 ,p_object_version_number => p_object_version_number
570 ,p_effective_date => trunc(p_effective_date)
571 ,p_datetrack_mode => p_datetrack_mode
572 );
573 exception
574 when hr_api.cannot_find_prog_unit then
575 hr_api.cannot_find_prog_unit_error
576 (p_module_name => 'UPDATE_Benefit_Prvdr_Pool'
577 ,p_hook_type => 'BP'
578 );
579 --
580 -- End of API User Hook for the before hook of update_Benefit_Prvdr_Pool
581 --
582 end;
583 --
584 hr_utility.set_location('deficit: '||p_mx_dfcit_pct_comp_num, 20);
585 ben_bpp_upd.upd
586 (
587 p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
588 ,p_effective_start_date => l_effective_start_date
589 ,p_effective_end_date => l_effective_end_date
590 ,p_name => p_name
591 ,p_pgm_pool_flag => p_pgm_pool_flag
592 ,p_excs_alwys_fftd_flag => p_excs_alwys_fftd_flag
593 ,p_use_for_pgm_pool_flag => p_use_for_pgm_pool_flag
594 ,p_pct_rndg_cd => p_pct_rndg_cd
595 ,p_pct_rndg_rl => p_pct_rndg_rl
596 ,p_val_rndg_cd => p_val_rndg_cd
597 ,p_val_rndg_rl => p_val_rndg_rl
598 ,p_dflt_excs_trtmt_cd => p_dflt_excs_trtmt_cd
599 ,p_dflt_excs_trtmt_rl => p_dflt_excs_trtmt_rl
600 ,p_rlovr_rstrcn_cd => p_rlovr_rstrcn_cd
601 ,p_no_mn_dstrbl_pct_flag => p_no_mn_dstrbl_pct_flag
602 ,p_no_mn_dstrbl_val_flag => p_no_mn_dstrbl_val_flag
603 ,p_no_mx_dstrbl_pct_flag => p_no_mx_dstrbl_pct_flag
604 ,p_no_mx_dstrbl_val_flag => p_no_mx_dstrbl_val_flag
605 ,p_auto_alct_excs_flag => p_auto_alct_excs_flag
606 ,p_alws_ngtv_crs_flag => p_alws_ngtv_crs_flag
607 ,p_uses_net_crs_mthd_flag => p_uses_net_crs_mthd_flag
608 ,p_mx_dfcit_pct_pool_crs_num => p_mx_dfcit_pct_pool_crs_num
609 ,p_mx_dfcit_pct_comp_num => p_mx_dfcit_pct_comp_num
610 ,p_comp_lvl_fctr_id => p_comp_lvl_fctr_id
611 ,p_mn_dstrbl_pct_num => p_mn_dstrbl_pct_num
612 ,p_mn_dstrbl_val => p_mn_dstrbl_val
613 ,p_mx_dstrbl_pct_num => p_mx_dstrbl_pct_num
614 ,p_mx_dstrbl_val => p_mx_dstrbl_val
615 ,p_excs_trtmt_cd => p_excs_trtmt_cd
616 ,p_ptip_id => p_ptip_id
617 ,p_plip_id => p_plip_id
618 ,p_pgm_id => p_pgm_id
619 ,p_oiplip_id => p_oiplip_id
620 ,p_cmbn_plip_id => p_cmbn_plip_id
621 ,p_cmbn_ptip_id => p_cmbn_ptip_id
622 ,p_cmbn_ptip_opt_id => p_cmbn_ptip_opt_id
623 ,p_business_group_id => p_business_group_id
624 ,p_bpp_attribute_category => p_bpp_attribute_category
625 ,p_bpp_attribute1 => p_bpp_attribute1
626 ,p_bpp_attribute2 => p_bpp_attribute2
627 ,p_bpp_attribute3 => p_bpp_attribute3
628 ,p_bpp_attribute4 => p_bpp_attribute4
629 ,p_bpp_attribute5 => p_bpp_attribute5
630 ,p_bpp_attribute6 => p_bpp_attribute6
631 ,p_bpp_attribute7 => p_bpp_attribute7
632 ,p_bpp_attribute8 => p_bpp_attribute8
633 ,p_bpp_attribute9 => p_bpp_attribute9
634 ,p_bpp_attribute10 => p_bpp_attribute10
635 ,p_bpp_attribute11 => p_bpp_attribute11
636 ,p_bpp_attribute12 => p_bpp_attribute12
637 ,p_bpp_attribute13 => p_bpp_attribute13
638 ,p_bpp_attribute14 => p_bpp_attribute14
639 ,p_bpp_attribute15 => p_bpp_attribute15
640 ,p_bpp_attribute16 => p_bpp_attribute16
641 ,p_bpp_attribute17 => p_bpp_attribute17
642 ,p_bpp_attribute18 => p_bpp_attribute18
643 ,p_bpp_attribute19 => p_bpp_attribute19
644 ,p_bpp_attribute20 => p_bpp_attribute20
645 ,p_bpp_attribute21 => p_bpp_attribute21
646 ,p_bpp_attribute22 => p_bpp_attribute22
650 ,p_bpp_attribute26 => p_bpp_attribute26
647 ,p_bpp_attribute23 => p_bpp_attribute23
648 ,p_bpp_attribute24 => p_bpp_attribute24
649 ,p_bpp_attribute25 => p_bpp_attribute25
651 ,p_bpp_attribute27 => p_bpp_attribute27
652 ,p_bpp_attribute28 => p_bpp_attribute28
653 ,p_bpp_attribute29 => p_bpp_attribute29
654 ,p_bpp_attribute30 => p_bpp_attribute30
655 ,p_object_version_number => l_object_version_number
656 ,p_effective_date => trunc(p_effective_date)
657 ,p_datetrack_mode => p_datetrack_mode
658 );
659 --
660 begin
661 --
662 -- Start of API User Hook for the after hook of update_Benefit_Prvdr_Pool
663 --
664 ben_Benefit_Prvdr_Pool_bk2.update_Benefit_Prvdr_Pool_a
665 (
666 p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
667 ,p_effective_start_date => l_effective_start_date
668 ,p_effective_end_date => l_effective_end_date
669 ,p_name => p_name
670 ,p_pgm_pool_flag => p_pgm_pool_flag
671 ,p_excs_alwys_fftd_flag => p_excs_alwys_fftd_flag
672 ,p_use_for_pgm_pool_flag => p_use_for_pgm_pool_flag
673 ,p_pct_rndg_cd => p_pct_rndg_cd
674 ,p_pct_rndg_rl => p_pct_rndg_rl
675 ,p_val_rndg_cd => p_val_rndg_cd
676 ,p_val_rndg_rl => p_val_rndg_rl
677 ,p_dflt_excs_trtmt_cd => p_dflt_excs_trtmt_cd
678 ,p_dflt_excs_trtmt_rl => p_dflt_excs_trtmt_rl
679 ,p_rlovr_rstrcn_cd => p_rlovr_rstrcn_cd
680 ,p_no_mn_dstrbl_pct_flag => p_no_mn_dstrbl_pct_flag
681 ,p_no_mn_dstrbl_val_flag => p_no_mn_dstrbl_val_flag
682 ,p_no_mx_dstrbl_pct_flag => p_no_mx_dstrbl_pct_flag
683 ,p_no_mx_dstrbl_val_flag => p_no_mx_dstrbl_val_flag
684 ,p_auto_alct_excs_flag => p_auto_alct_excs_flag
685 ,p_alws_ngtv_crs_flag => p_alws_ngtv_crs_flag
686 ,p_uses_net_crs_mthd_flag => p_uses_net_crs_mthd_flag
687 ,p_mx_dfcit_pct_pool_crs_num => p_mx_dfcit_pct_pool_crs_num
688 ,p_mx_dfcit_pct_comp_num => p_mx_dfcit_pct_comp_num
689 ,p_comp_lvl_fctr_id => p_comp_lvl_fctr_id
690 ,p_mn_dstrbl_pct_num => p_mn_dstrbl_pct_num
691 ,p_mn_dstrbl_val => p_mn_dstrbl_val
692 ,p_mx_dstrbl_pct_num => p_mx_dstrbl_pct_num
693 ,p_mx_dstrbl_val => p_mx_dstrbl_val
694 ,p_excs_trtmt_cd => p_excs_trtmt_cd
695 ,p_ptip_id => p_ptip_id
696 ,p_plip_id => p_plip_id
697 ,p_pgm_id => p_pgm_id
698 ,p_oiplip_id => p_oiplip_id
699 ,p_cmbn_plip_id => p_cmbn_plip_id
700 ,p_cmbn_ptip_id => p_cmbn_ptip_id
701 ,p_cmbn_ptip_opt_id => p_cmbn_ptip_opt_id
702 ,p_business_group_id => p_business_group_id
703 ,p_bpp_attribute_category => p_bpp_attribute_category
704 ,p_bpp_attribute1 => p_bpp_attribute1
705 ,p_bpp_attribute2 => p_bpp_attribute2
706 ,p_bpp_attribute3 => p_bpp_attribute3
707 ,p_bpp_attribute4 => p_bpp_attribute4
708 ,p_bpp_attribute5 => p_bpp_attribute5
709 ,p_bpp_attribute6 => p_bpp_attribute6
710 ,p_bpp_attribute7 => p_bpp_attribute7
711 ,p_bpp_attribute8 => p_bpp_attribute8
712 ,p_bpp_attribute9 => p_bpp_attribute9
713 ,p_bpp_attribute10 => p_bpp_attribute10
714 ,p_bpp_attribute11 => p_bpp_attribute11
715 ,p_bpp_attribute12 => p_bpp_attribute12
716 ,p_bpp_attribute13 => p_bpp_attribute13
717 ,p_bpp_attribute14 => p_bpp_attribute14
718 ,p_bpp_attribute15 => p_bpp_attribute15
719 ,p_bpp_attribute16 => p_bpp_attribute16
720 ,p_bpp_attribute17 => p_bpp_attribute17
721 ,p_bpp_attribute18 => p_bpp_attribute18
722 ,p_bpp_attribute19 => p_bpp_attribute19
723 ,p_bpp_attribute20 => p_bpp_attribute20
724 ,p_bpp_attribute21 => p_bpp_attribute21
725 ,p_bpp_attribute22 => p_bpp_attribute22
726 ,p_bpp_attribute23 => p_bpp_attribute23
727 ,p_bpp_attribute24 => p_bpp_attribute24
728 ,p_bpp_attribute25 => p_bpp_attribute25
729 ,p_bpp_attribute26 => p_bpp_attribute26
730 ,p_bpp_attribute27 => p_bpp_attribute27
731 ,p_bpp_attribute28 => p_bpp_attribute28
732 ,p_bpp_attribute29 => p_bpp_attribute29
733 ,p_bpp_attribute30 => p_bpp_attribute30
734 ,p_object_version_number => l_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 => 'UPDATE_Benefit_Prvdr_Pool'
742 ,p_hook_type => 'AP'
746 --
743 );
744 --
745 -- End of API User Hook for the after hook of update_Benefit_Prvdr_Pool
747 end;
748 --
749 hr_utility.set_location(l_proc, 60);
750 --
751 -- When in validation only mode raise the Validate_Enabled exception
752 --
753 if p_validate then
754 raise hr_api.validate_enabled;
755 end if;
756 --
757 -- Set all output arguments
758 --
759 p_object_version_number := l_object_version_number;
760 p_effective_start_date := l_effective_start_date;
761 p_effective_end_date := l_effective_end_date;
762 --
763 hr_utility.set_location(' Leaving:'||l_proc, 70);
764 --
765 exception
766 --
767 when hr_api.validate_enabled then
768 --
769 -- As the Validate_Enabled exception has been raised
770 -- we must rollback to the savepoint
771 --
772 ROLLBACK TO update_Benefit_Prvdr_Pool;
773 --
774 -- Only set output warning arguments
775 -- (Any key or derived arguments must be set to null
776 -- when validation only mode is being used.)
777 --
778 hr_utility.set_location(' Leaving:'||l_proc, 80);
779 --
780 when others then
781 --
782 -- A validation or unexpected error has occured
783 --
784 ROLLBACK TO update_Benefit_Prvdr_Pool;
785 raise;
786 --
787 end update_Benefit_Prvdr_Pool;
788 -- ----------------------------------------------------------------------------
789 -- |------------------------< delete_Benefit_Prvdr_Pool >----------------------|
790 -- ----------------------------------------------------------------------------
791 --
792 procedure delete_Benefit_Prvdr_Pool
793 (p_validate in boolean default false
794 ,p_bnft_prvdr_pool_id in number
795 ,p_effective_start_date out nocopy date
796 ,p_effective_end_date out nocopy date
797 ,p_object_version_number in out nocopy number
798 ,p_effective_date in date
799 ,p_datetrack_mode in varchar2
800 ) is
801 --
802 -- Declare cursors and local variables
803 --
804 l_proc varchar2(72) := g_package||'update_Benefit_Prvdr_Pool';
805 l_object_version_number ben_bnft_prvdr_pool_f.object_version_number%TYPE;
806 l_effective_start_date ben_bnft_prvdr_pool_f.effective_start_date%TYPE;
807 l_effective_end_date ben_bnft_prvdr_pool_f.effective_end_date%TYPE;
808 --
809 begin
810 --
811 hr_utility.set_location('Entering:'|| l_proc, 10);
812 --
813 -- Issue a savepoint if operating in validation only mode
814 --
815 savepoint delete_Benefit_Prvdr_Pool;
816 --
817 hr_utility.set_location(l_proc, 20);
818 --
819 -- Process Logic
820 --
821 l_object_version_number := p_object_version_number;
822 --
823 --
824 begin
825 --
826 -- Start of API User Hook for the before hook of delete_Benefit_Prvdr_Pool
827 --
828 ben_Benefit_Prvdr_Pool_bk3.delete_Benefit_Prvdr_Pool_b
829 (
830 p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
831 ,p_object_version_number => p_object_version_number
832 ,p_effective_date => trunc(p_effective_date)
833 ,p_datetrack_mode => p_datetrack_mode
834 );
835 exception
836 when hr_api.cannot_find_prog_unit then
837 hr_api.cannot_find_prog_unit_error
838 (p_module_name => 'DELETE_Benefit_Prvdr_Pool'
839 ,p_hook_type => 'BP'
840 );
841 --
842 -- End of API User Hook for the before hook of delete_Benefit_Prvdr_Pool
843 --
844 end;
845 --
846 ben_bpp_del.del
847 (
848 p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
849 ,p_effective_start_date => l_effective_start_date
850 ,p_effective_end_date => l_effective_end_date
851 ,p_object_version_number => l_object_version_number
852 ,p_effective_date => p_effective_date
853 ,p_datetrack_mode => p_datetrack_mode
854 );
855 --
856 begin
857 --
858 -- Start of API User Hook for the after hook of delete_Benefit_Prvdr_Pool
859 --
860 ben_Benefit_Prvdr_Pool_bk3.delete_Benefit_Prvdr_Pool_a
861 (
862 p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
863 ,p_effective_start_date => l_effective_start_date
864 ,p_effective_end_date => l_effective_end_date
865 ,p_object_version_number => l_object_version_number
866 ,p_effective_date => trunc(p_effective_date)
867 ,p_datetrack_mode => p_datetrack_mode
868 );
869 exception
870 when hr_api.cannot_find_prog_unit then
871 hr_api.cannot_find_prog_unit_error
872 (p_module_name => 'DELETE_Benefit_Prvdr_Pool'
873 ,p_hook_type => 'AP'
874 );
875 --
876 -- End of API User Hook for the after hook of delete_Benefit_Prvdr_Pool
877 --
878 end;
879 --
880 hr_utility.set_location(l_proc, 60);
881 --
882 -- When in validation only mode raise the Validate_Enabled exception
883 --
884 if p_validate then
885 raise hr_api.validate_enabled;
886 end if;
887 --
891 --
888 hr_utility.set_location(' Leaving:'||l_proc, 70);
889 --
890 exception
892 when hr_api.validate_enabled then
893 --
894 -- As the Validate_Enabled exception has been raised
895 -- we must rollback to the savepoint
896 --
897 ROLLBACK TO delete_Benefit_Prvdr_Pool;
898 --
899 -- Only set output warning arguments
900 -- (Any key or derived arguments must be set to null
901 -- when validation only mode is being used.)
902 --
903 p_effective_start_date := null;
904 p_effective_end_date := null;
905 --
906 when others then
907 --
908 -- A validation or unexpected error has occured
909 --
910 ROLLBACK TO delete_Benefit_Prvdr_Pool;
911 raise;
912 --
913 end delete_Benefit_Prvdr_Pool;
914 --
915 -- ----------------------------------------------------------------------------
916 -- |-------------------------------< lck >------------------------------------|
917 -- ----------------------------------------------------------------------------
918 --
919 procedure lck
920 (
921 p_bnft_prvdr_pool_id in number
922 ,p_object_version_number in number
923 ,p_effective_date in date
924 ,p_datetrack_mode in varchar2
925 ,p_validation_start_date out nocopy date
926 ,p_validation_end_date out nocopy date
927 ) is
928 --
929 --
930 -- Declare cursors and local variables
931 --
932 l_proc varchar2(72) := g_package||'lck';
933 l_validation_start_date date;
934 l_validation_end_date date;
935 --
936 begin
937 --
938 hr_utility.set_location('Entering:'|| l_proc, 10);
939 --
940 ben_bpp_shd.lck
941 (
942 p_bnft_prvdr_pool_id => p_bnft_prvdr_pool_id
943 ,p_validation_start_date => l_validation_start_date
944 ,p_validation_end_date => l_validation_end_date
945 ,p_object_version_number => p_object_version_number
946 ,p_effective_date => p_effective_date
947 ,p_datetrack_mode => p_datetrack_mode
948 );
949 --
950 hr_utility.set_location(' Leaving:'||l_proc, 70);
951 --
952 end lck;
953 --
954 end ben_Benefit_Prvdr_Pool_api;