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