[Home] [Help]
PACKAGE BODY: APPS.BEN_COMM_DLVRY_MEDIA_API
Source
1 Package Body ben_Comm_Dlvry_Media_api as
2 /* $Header: becmdapi.pkb 115.3 2002/12/31 23:57:05 mmudigon ship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' ben_Comm_Dlvry_Media_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_Comm_Dlvry_Media >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_Comm_Dlvry_Media
13 (p_validate in boolean default false
14 ,p_cm_dlvry_med_typ_id out nocopy number
15 ,p_cm_dlvry_med_typ_cd in varchar2 default null
16 ,p_cm_dlvry_mthd_typ_id in number default null
17 ,p_rqd_flag in varchar2 default null
18 ,p_dflt_flag in varchar2 default null
19 ,p_business_group_id in number default null
20 ,p_cmd_attribute_category in varchar2 default null
21 ,p_cmd_attribute1 in varchar2 default null
22 ,p_cmd_attribute2 in varchar2 default null
23 ,p_cmd_attribute3 in varchar2 default null
24 ,p_cmd_attribute4 in varchar2 default null
25 ,p_cmd_attribute5 in varchar2 default null
26 ,p_cmd_attribute6 in varchar2 default null
27 ,p_cmd_attribute7 in varchar2 default null
28 ,p_cmd_attribute8 in varchar2 default null
29 ,p_cmd_attribute9 in varchar2 default null
30 ,p_cmd_attribute10 in varchar2 default null
31 ,p_cmd_attribute11 in varchar2 default null
32 ,p_cmd_attribute12 in varchar2 default null
33 ,p_cmd_attribute13 in varchar2 default null
34 ,p_cmd_attribute14 in varchar2 default null
35 ,p_cmd_attribute15 in varchar2 default null
36 ,p_cmd_attribute16 in varchar2 default null
37 ,p_cmd_attribute17 in varchar2 default null
38 ,p_cmd_attribute18 in varchar2 default null
39 ,p_cmd_attribute19 in varchar2 default null
40 ,p_cmd_attribute20 in varchar2 default null
41 ,p_cmd_attribute21 in varchar2 default null
42 ,p_cmd_attribute22 in varchar2 default null
43 ,p_cmd_attribute23 in varchar2 default null
44 ,p_cmd_attribute24 in varchar2 default null
45 ,p_cmd_attribute25 in varchar2 default null
46 ,p_cmd_attribute26 in varchar2 default null
47 ,p_cmd_attribute27 in varchar2 default null
48 ,p_cmd_attribute28 in varchar2 default null
49 ,p_cmd_attribute29 in varchar2 default null
50 ,p_cmd_attribute30 in varchar2 default null
51 ,p_object_version_number out nocopy number
52 ,p_effective_date in date
53 ) is
54 --
55 -- Declare cursors and local variables
56 --
57 l_cm_dlvry_med_typ_id ben_cm_dlvry_med_typ.cm_dlvry_med_typ_id%TYPE;
58 l_proc varchar2(72) := g_package||'create_Comm_Dlvry_Media';
59 l_object_version_number ben_cm_dlvry_med_typ.object_version_number%TYPE;
60 --
61 begin
62 --
63 hr_utility.set_location('Entering:'|| l_proc, 10);
64 --
65 -- Issue a savepoint if operating in validation only mode
66 --
67 savepoint create_Comm_Dlvry_Media;
68 --
69 hr_utility.set_location(l_proc, 20);
70 --
71 -- Process Logic
72 --
73 begin
74 --
75 -- Start of API User Hook for the before hook of create_Comm_Dlvry_Media
76 --
77 ben_Comm_Dlvry_Media_bk1.create_Comm_Dlvry_Media_b
78 (
79 p_cm_dlvry_med_typ_cd => p_cm_dlvry_med_typ_cd
80 ,p_cm_dlvry_mthd_typ_id => p_cm_dlvry_mthd_typ_id
81 ,p_rqd_flag => p_rqd_flag
82 ,p_dflt_flag => p_dflt_flag
83 ,p_business_group_id => p_business_group_id
84 ,p_cmd_attribute_category => p_cmd_attribute_category
85 ,p_cmd_attribute1 => p_cmd_attribute1
86 ,p_cmd_attribute2 => p_cmd_attribute2
87 ,p_cmd_attribute3 => p_cmd_attribute3
88 ,p_cmd_attribute4 => p_cmd_attribute4
89 ,p_cmd_attribute5 => p_cmd_attribute5
90 ,p_cmd_attribute6 => p_cmd_attribute6
91 ,p_cmd_attribute7 => p_cmd_attribute7
92 ,p_cmd_attribute8 => p_cmd_attribute8
93 ,p_cmd_attribute9 => p_cmd_attribute9
94 ,p_cmd_attribute10 => p_cmd_attribute10
95 ,p_cmd_attribute11 => p_cmd_attribute11
96 ,p_cmd_attribute12 => p_cmd_attribute12
97 ,p_cmd_attribute13 => p_cmd_attribute13
98 ,p_cmd_attribute14 => p_cmd_attribute14
99 ,p_cmd_attribute15 => p_cmd_attribute15
100 ,p_cmd_attribute16 => p_cmd_attribute16
101 ,p_cmd_attribute17 => p_cmd_attribute17
102 ,p_cmd_attribute18 => p_cmd_attribute18
103 ,p_cmd_attribute19 => p_cmd_attribute19
104 ,p_cmd_attribute20 => p_cmd_attribute20
105 ,p_cmd_attribute21 => p_cmd_attribute21
106 ,p_cmd_attribute22 => p_cmd_attribute22
107 ,p_cmd_attribute23 => p_cmd_attribute23
108 ,p_cmd_attribute24 => p_cmd_attribute24
109 ,p_cmd_attribute25 => p_cmd_attribute25
110 ,p_cmd_attribute26 => p_cmd_attribute26
111 ,p_cmd_attribute27 => p_cmd_attribute27
112 ,p_cmd_attribute28 => p_cmd_attribute28
113 ,p_cmd_attribute29 => p_cmd_attribute29
114 ,p_cmd_attribute30 => p_cmd_attribute30
115 ,p_effective_date => trunc(p_effective_date)
116 );
117 exception
118 when hr_api.cannot_find_prog_unit then
119 hr_api.cannot_find_prog_unit_error
120 (
121 p_module_name => 'CREATE_Comm_Dlvry_Media'
122 ,p_hook_type => 'BP'
123 );
124 --
125 -- End of API User Hook for the before hook of create_Comm_Dlvry_Media
126 --
127 end;
128 --
129 ben_cmd_ins.ins
130 (
131 p_cm_dlvry_med_typ_id => l_cm_dlvry_med_typ_id
132 ,p_cm_dlvry_med_typ_cd => p_cm_dlvry_med_typ_cd
133 ,p_cm_dlvry_mthd_typ_id => p_cm_dlvry_mthd_typ_id
134 ,p_rqd_flag => p_rqd_flag
135 ,p_dflt_flag => p_dflt_flag
136 ,p_business_group_id => p_business_group_id
137 ,p_cmd_attribute_category => p_cmd_attribute_category
138 ,p_cmd_attribute1 => p_cmd_attribute1
139 ,p_cmd_attribute2 => p_cmd_attribute2
140 ,p_cmd_attribute3 => p_cmd_attribute3
141 ,p_cmd_attribute4 => p_cmd_attribute4
142 ,p_cmd_attribute5 => p_cmd_attribute5
143 ,p_cmd_attribute6 => p_cmd_attribute6
144 ,p_cmd_attribute7 => p_cmd_attribute7
145 ,p_cmd_attribute8 => p_cmd_attribute8
146 ,p_cmd_attribute9 => p_cmd_attribute9
147 ,p_cmd_attribute10 => p_cmd_attribute10
148 ,p_cmd_attribute11 => p_cmd_attribute11
149 ,p_cmd_attribute12 => p_cmd_attribute12
150 ,p_cmd_attribute13 => p_cmd_attribute13
151 ,p_cmd_attribute14 => p_cmd_attribute14
152 ,p_cmd_attribute15 => p_cmd_attribute15
153 ,p_cmd_attribute16 => p_cmd_attribute16
154 ,p_cmd_attribute17 => p_cmd_attribute17
155 ,p_cmd_attribute18 => p_cmd_attribute18
156 ,p_cmd_attribute19 => p_cmd_attribute19
157 ,p_cmd_attribute20 => p_cmd_attribute20
158 ,p_cmd_attribute21 => p_cmd_attribute21
159 ,p_cmd_attribute22 => p_cmd_attribute22
160 ,p_cmd_attribute23 => p_cmd_attribute23
161 ,p_cmd_attribute24 => p_cmd_attribute24
162 ,p_cmd_attribute25 => p_cmd_attribute25
163 ,p_cmd_attribute26 => p_cmd_attribute26
164 ,p_cmd_attribute27 => p_cmd_attribute27
165 ,p_cmd_attribute28 => p_cmd_attribute28
166 ,p_cmd_attribute29 => p_cmd_attribute29
167 ,p_cmd_attribute30 => p_cmd_attribute30
168 ,p_object_version_number => l_object_version_number
169 ,p_effective_date => trunc(p_effective_date)
170 );
171 --
172 begin
173 --
174 -- Start of API User Hook for the after hook of create_Comm_Dlvry_Media
175 --
176 ben_Comm_Dlvry_Media_bk1.create_Comm_Dlvry_Media_a
177 (
178 p_cm_dlvry_med_typ_id => l_cm_dlvry_med_typ_id
179 ,p_cm_dlvry_med_typ_cd => p_cm_dlvry_med_typ_cd
180 ,p_cm_dlvry_mthd_typ_id => p_cm_dlvry_mthd_typ_id
181 ,p_rqd_flag => p_rqd_flag
182 ,p_dflt_flag => p_dflt_flag
183 ,p_business_group_id => p_business_group_id
184 ,p_cmd_attribute_category => p_cmd_attribute_category
185 ,p_cmd_attribute1 => p_cmd_attribute1
186 ,p_cmd_attribute2 => p_cmd_attribute2
187 ,p_cmd_attribute3 => p_cmd_attribute3
188 ,p_cmd_attribute4 => p_cmd_attribute4
189 ,p_cmd_attribute5 => p_cmd_attribute5
190 ,p_cmd_attribute6 => p_cmd_attribute6
191 ,p_cmd_attribute7 => p_cmd_attribute7
192 ,p_cmd_attribute8 => p_cmd_attribute8
193 ,p_cmd_attribute9 => p_cmd_attribute9
194 ,p_cmd_attribute10 => p_cmd_attribute10
195 ,p_cmd_attribute11 => p_cmd_attribute11
196 ,p_cmd_attribute12 => p_cmd_attribute12
197 ,p_cmd_attribute13 => p_cmd_attribute13
198 ,p_cmd_attribute14 => p_cmd_attribute14
199 ,p_cmd_attribute15 => p_cmd_attribute15
200 ,p_cmd_attribute16 => p_cmd_attribute16
201 ,p_cmd_attribute17 => p_cmd_attribute17
202 ,p_cmd_attribute18 => p_cmd_attribute18
203 ,p_cmd_attribute19 => p_cmd_attribute19
204 ,p_cmd_attribute20 => p_cmd_attribute20
205 ,p_cmd_attribute21 => p_cmd_attribute21
206 ,p_cmd_attribute22 => p_cmd_attribute22
207 ,p_cmd_attribute23 => p_cmd_attribute23
208 ,p_cmd_attribute24 => p_cmd_attribute24
209 ,p_cmd_attribute25 => p_cmd_attribute25
210 ,p_cmd_attribute26 => p_cmd_attribute26
211 ,p_cmd_attribute27 => p_cmd_attribute27
212 ,p_cmd_attribute28 => p_cmd_attribute28
213 ,p_cmd_attribute29 => p_cmd_attribute29
214 ,p_cmd_attribute30 => p_cmd_attribute30
215 ,p_object_version_number => l_object_version_number
216 ,p_effective_date => trunc(p_effective_date)
217 );
218 exception
219 when hr_api.cannot_find_prog_unit then
220 hr_api.cannot_find_prog_unit_error
221 (p_module_name => 'CREATE_Comm_Dlvry_Media'
222 ,p_hook_type => 'AP'
223 );
224 --
225 -- End of API User Hook for the after hook of create_Comm_Dlvry_Media
226 --
227 end;
228 --
229 hr_utility.set_location(l_proc, 60);
230 --
231 -- When in validation only mode raise the Validate_Enabled exception
232 --
233 if p_validate then
234 raise hr_api.validate_enabled;
235 end if;
236 --
237 -- Set all output arguments
238 --
239 p_cm_dlvry_med_typ_id := l_cm_dlvry_med_typ_id;
240 p_object_version_number := l_object_version_number;
241 --
242 hr_utility.set_location(' Leaving:'||l_proc, 70);
243 --
244 exception
245 --
246 when hr_api.validate_enabled then
247 --
248 -- As the Validate_Enabled exception has been raised
249 -- we must rollback to the savepoint
250 --
251 ROLLBACK TO create_Comm_Dlvry_Media;
252 --
253 -- Only set output warning arguments
254 -- (Any key or derived arguments must be set to null
255 -- when validation only mode is being used.)
256 --
257 p_cm_dlvry_med_typ_id := null;
258 p_object_version_number := null;
259 hr_utility.set_location(' Leaving:'||l_proc, 80);
260 --
261 when others then
262 --
263 -- A validation or unexpected error has occured
264 --
265 ROLLBACK TO create_Comm_Dlvry_Media;
266 raise;
267 --
268 end create_Comm_Dlvry_Media;
269 -- ----------------------------------------------------------------------------
270 -- |------------------------< update_Comm_Dlvry_Media >--- ------------------|
271 -- ----------------------------------------------------------------------------
272 --
273 procedure update_Comm_Dlvry_Media
274 (p_validate in boolean default false
275 ,p_cm_dlvry_med_typ_id in number
276 ,p_cm_dlvry_med_typ_cd in varchar2 default hr_api.g_varchar2
277 ,p_cm_dlvry_mthd_typ_id in number default hr_api.g_number
278 ,p_rqd_flag in varchar2 default hr_api.g_varchar2
279 ,p_dflt_flag in varchar2 default hr_api.g_varchar2
280 ,p_business_group_id in number default hr_api.g_number
281 ,p_cmd_attribute_category in varchar2 default hr_api.g_varchar2
282 ,p_cmd_attribute1 in varchar2 default hr_api.g_varchar2
283 ,p_cmd_attribute2 in varchar2 default hr_api.g_varchar2
284 ,p_cmd_attribute3 in varchar2 default hr_api.g_varchar2
285 ,p_cmd_attribute4 in varchar2 default hr_api.g_varchar2
286 ,p_cmd_attribute5 in varchar2 default hr_api.g_varchar2
287 ,p_cmd_attribute6 in varchar2 default hr_api.g_varchar2
288 ,p_cmd_attribute7 in varchar2 default hr_api.g_varchar2
289 ,p_cmd_attribute8 in varchar2 default hr_api.g_varchar2
290 ,p_cmd_attribute9 in varchar2 default hr_api.g_varchar2
291 ,p_cmd_attribute10 in varchar2 default hr_api.g_varchar2
292 ,p_cmd_attribute11 in varchar2 default hr_api.g_varchar2
293 ,p_cmd_attribute12 in varchar2 default hr_api.g_varchar2
294 ,p_cmd_attribute13 in varchar2 default hr_api.g_varchar2
295 ,p_cmd_attribute14 in varchar2 default hr_api.g_varchar2
296 ,p_cmd_attribute15 in varchar2 default hr_api.g_varchar2
297 ,p_cmd_attribute16 in varchar2 default hr_api.g_varchar2
298 ,p_cmd_attribute17 in varchar2 default hr_api.g_varchar2
299 ,p_cmd_attribute18 in varchar2 default hr_api.g_varchar2
300 ,p_cmd_attribute19 in varchar2 default hr_api.g_varchar2
301 ,p_cmd_attribute20 in varchar2 default hr_api.g_varchar2
302 ,p_cmd_attribute21 in varchar2 default hr_api.g_varchar2
303 ,p_cmd_attribute22 in varchar2 default hr_api.g_varchar2
304 ,p_cmd_attribute23 in varchar2 default hr_api.g_varchar2
305 ,p_cmd_attribute24 in varchar2 default hr_api.g_varchar2
306 ,p_cmd_attribute25 in varchar2 default hr_api.g_varchar2
307 ,p_cmd_attribute26 in varchar2 default hr_api.g_varchar2
308 ,p_cmd_attribute27 in varchar2 default hr_api.g_varchar2
309 ,p_cmd_attribute28 in varchar2 default hr_api.g_varchar2
310 ,p_cmd_attribute29 in varchar2 default hr_api.g_varchar2
311 ,p_cmd_attribute30 in varchar2 default hr_api.g_varchar2
312 ,p_object_version_number in out nocopy number
313 ,p_effective_date in date
314 ) is
315 --
316 -- Declare cursors and local variables
317 --
318 l_proc varchar2(72) := g_package||'update_Comm_Dlvry_Media';
319 l_object_version_number ben_cm_dlvry_med_typ.object_version_number%TYPE;
320 --
321 begin
322 --
323 hr_utility.set_location('Entering:'|| l_proc, 10);
324 --
325 -- Issue a savepoint if operating in validation only mode
326 --
327 savepoint update_Comm_Dlvry_Media;
328 --
329 hr_utility.set_location(l_proc, 20);
330 --
331 -- Process Logic
332 --
333 l_object_version_number := p_object_version_number;
334 --
335 begin
336 --
337 -- Start of API User Hook for the before hook of update_Comm_Dlvry_Media
338 --
339 ben_Comm_Dlvry_Media_bk2.update_Comm_Dlvry_Media_b
340 (
341 p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id
342 ,p_cm_dlvry_med_typ_cd => p_cm_dlvry_med_typ_cd
343 ,p_cm_dlvry_mthd_typ_id => p_cm_dlvry_mthd_typ_id
344 ,p_rqd_flag => p_rqd_flag
345 ,p_dflt_flag => p_dflt_flag
346 ,p_business_group_id => p_business_group_id
347 ,p_cmd_attribute_category => p_cmd_attribute_category
348 ,p_cmd_attribute1 => p_cmd_attribute1
349 ,p_cmd_attribute2 => p_cmd_attribute2
350 ,p_cmd_attribute3 => p_cmd_attribute3
351 ,p_cmd_attribute4 => p_cmd_attribute4
352 ,p_cmd_attribute5 => p_cmd_attribute5
353 ,p_cmd_attribute6 => p_cmd_attribute6
354 ,p_cmd_attribute7 => p_cmd_attribute7
355 ,p_cmd_attribute8 => p_cmd_attribute8
356 ,p_cmd_attribute9 => p_cmd_attribute9
357 ,p_cmd_attribute10 => p_cmd_attribute10
358 ,p_cmd_attribute11 => p_cmd_attribute11
359 ,p_cmd_attribute12 => p_cmd_attribute12
360 ,p_cmd_attribute13 => p_cmd_attribute13
361 ,p_cmd_attribute14 => p_cmd_attribute14
362 ,p_cmd_attribute15 => p_cmd_attribute15
363 ,p_cmd_attribute16 => p_cmd_attribute16
364 ,p_cmd_attribute17 => p_cmd_attribute17
365 ,p_cmd_attribute18 => p_cmd_attribute18
366 ,p_cmd_attribute19 => p_cmd_attribute19
367 ,p_cmd_attribute20 => p_cmd_attribute20
368 ,p_cmd_attribute21 => p_cmd_attribute21
369 ,p_cmd_attribute22 => p_cmd_attribute22
370 ,p_cmd_attribute23 => p_cmd_attribute23
371 ,p_cmd_attribute24 => p_cmd_attribute24
372 ,p_cmd_attribute25 => p_cmd_attribute25
373 ,p_cmd_attribute26 => p_cmd_attribute26
374 ,p_cmd_attribute27 => p_cmd_attribute27
375 ,p_cmd_attribute28 => p_cmd_attribute28
376 ,p_cmd_attribute29 => p_cmd_attribute29
377 ,p_cmd_attribute30 => p_cmd_attribute30
378 ,p_object_version_number => p_object_version_number
379 ,p_effective_date => trunc(p_effective_date)
380 );
381 exception
382 when hr_api.cannot_find_prog_unit then
383 hr_api.cannot_find_prog_unit_error
384 (p_module_name => 'UPDATE_Comm_Dlvry_Media'
385 ,p_hook_type => 'BP'
386 );
387 --
388 -- End of API User Hook for the before hook of update_Comm_Dlvry_Media
389 --
390 end;
391 --
392 ben_cmd_upd.upd
393 (
394 p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id
395 ,p_cm_dlvry_med_typ_cd => p_cm_dlvry_med_typ_cd
396 ,p_cm_dlvry_mthd_typ_id => p_cm_dlvry_mthd_typ_id
397 ,p_rqd_flag => p_rqd_flag
398 ,p_dflt_flag => p_dflt_flag
399 ,p_business_group_id => p_business_group_id
400 ,p_cmd_attribute_category => p_cmd_attribute_category
401 ,p_cmd_attribute1 => p_cmd_attribute1
402 ,p_cmd_attribute2 => p_cmd_attribute2
403 ,p_cmd_attribute3 => p_cmd_attribute3
404 ,p_cmd_attribute4 => p_cmd_attribute4
405 ,p_cmd_attribute5 => p_cmd_attribute5
406 ,p_cmd_attribute6 => p_cmd_attribute6
407 ,p_cmd_attribute7 => p_cmd_attribute7
408 ,p_cmd_attribute8 => p_cmd_attribute8
409 ,p_cmd_attribute9 => p_cmd_attribute9
410 ,p_cmd_attribute10 => p_cmd_attribute10
411 ,p_cmd_attribute11 => p_cmd_attribute11
412 ,p_cmd_attribute12 => p_cmd_attribute12
413 ,p_cmd_attribute13 => p_cmd_attribute13
414 ,p_cmd_attribute14 => p_cmd_attribute14
415 ,p_cmd_attribute15 => p_cmd_attribute15
416 ,p_cmd_attribute16 => p_cmd_attribute16
417 ,p_cmd_attribute17 => p_cmd_attribute17
418 ,p_cmd_attribute18 => p_cmd_attribute18
419 ,p_cmd_attribute19 => p_cmd_attribute19
420 ,p_cmd_attribute20 => p_cmd_attribute20
421 ,p_cmd_attribute21 => p_cmd_attribute21
422 ,p_cmd_attribute22 => p_cmd_attribute22
423 ,p_cmd_attribute23 => p_cmd_attribute23
424 ,p_cmd_attribute24 => p_cmd_attribute24
425 ,p_cmd_attribute25 => p_cmd_attribute25
426 ,p_cmd_attribute26 => p_cmd_attribute26
427 ,p_cmd_attribute27 => p_cmd_attribute27
428 ,p_cmd_attribute28 => p_cmd_attribute28
429 ,p_cmd_attribute29 => p_cmd_attribute29
430 ,p_cmd_attribute30 => p_cmd_attribute30
431 ,p_object_version_number => l_object_version_number
432 ,p_effective_date => trunc(p_effective_date)
433 );
434 --
435 begin
436 --
437 -- Start of API User Hook for the after hook of update_Comm_Dlvry_Media
438 --
439 ben_Comm_Dlvry_Media_bk2.update_Comm_Dlvry_Media_a
440 (
441 p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id
442 ,p_cm_dlvry_med_typ_cd => p_cm_dlvry_med_typ_cd
443 ,p_cm_dlvry_mthd_typ_id => p_cm_dlvry_mthd_typ_id
444 ,p_rqd_flag => p_rqd_flag
445 ,p_dflt_flag => p_dflt_flag
446 ,p_business_group_id => p_business_group_id
447 ,p_cmd_attribute_category => p_cmd_attribute_category
448 ,p_cmd_attribute1 => p_cmd_attribute1
449 ,p_cmd_attribute2 => p_cmd_attribute2
450 ,p_cmd_attribute3 => p_cmd_attribute3
451 ,p_cmd_attribute4 => p_cmd_attribute4
452 ,p_cmd_attribute5 => p_cmd_attribute5
453 ,p_cmd_attribute6 => p_cmd_attribute6
454 ,p_cmd_attribute7 => p_cmd_attribute7
455 ,p_cmd_attribute8 => p_cmd_attribute8
456 ,p_cmd_attribute9 => p_cmd_attribute9
457 ,p_cmd_attribute10 => p_cmd_attribute10
458 ,p_cmd_attribute11 => p_cmd_attribute11
459 ,p_cmd_attribute12 => p_cmd_attribute12
460 ,p_cmd_attribute13 => p_cmd_attribute13
461 ,p_cmd_attribute14 => p_cmd_attribute14
462 ,p_cmd_attribute15 => p_cmd_attribute15
463 ,p_cmd_attribute16 => p_cmd_attribute16
464 ,p_cmd_attribute17 => p_cmd_attribute17
465 ,p_cmd_attribute18 => p_cmd_attribute18
466 ,p_cmd_attribute19 => p_cmd_attribute19
467 ,p_cmd_attribute20 => p_cmd_attribute20
468 ,p_cmd_attribute21 => p_cmd_attribute21
469 ,p_cmd_attribute22 => p_cmd_attribute22
470 ,p_cmd_attribute23 => p_cmd_attribute23
471 ,p_cmd_attribute24 => p_cmd_attribute24
472 ,p_cmd_attribute25 => p_cmd_attribute25
473 ,p_cmd_attribute26 => p_cmd_attribute26
474 ,p_cmd_attribute27 => p_cmd_attribute27
475 ,p_cmd_attribute28 => p_cmd_attribute28
476 ,p_cmd_attribute29 => p_cmd_attribute29
477 ,p_cmd_attribute30 => p_cmd_attribute30
478 ,p_object_version_number => l_object_version_number
479 ,p_effective_date => trunc(p_effective_date)
480 );
481 exception
482 when hr_api.cannot_find_prog_unit then
483 hr_api.cannot_find_prog_unit_error
484 (p_module_name => 'UPDATE_Comm_Dlvry_Media'
485 ,p_hook_type => 'AP'
486 );
487 --
488 -- End of API User Hook for the after hook of update_Comm_Dlvry_Media
489 --
490 end;
491 --
492 hr_utility.set_location(l_proc, 60);
493 --
494 -- When in validation only mode raise the Validate_Enabled exception
495 --
496 if p_validate then
497 raise hr_api.validate_enabled;
498 end if;
499 --
500 -- Set all output arguments
501 --
502 p_object_version_number := l_object_version_number;
503 --
504 hr_utility.set_location(' Leaving:'||l_proc, 70);
505 --
506 exception
507 --
508 when hr_api.validate_enabled then
509 --
510 -- As the Validate_Enabled exception has been raised
511 -- we must rollback to the savepoint
512 --
513 ROLLBACK TO update_Comm_Dlvry_Media;
514 --
515 -- Only set output warning arguments
516 -- (Any key or derived arguments must be set to null
517 -- when validation only mode is being used.)
518 --
519 hr_utility.set_location(' Leaving:'||l_proc, 80);
520 --
521 when others then
522 --
523 -- A validation or unexpected error has occured
524 --
525 ROLLBACK TO update_Comm_Dlvry_Media;
526 /* Inserted for nocopy changes */
527 p_object_version_number := l_object_version_number;
528 raise;
529 --
530 end update_Comm_Dlvry_Media;
531 -- ----------------------------------------------------------------------------
532 -- |------------------------< delete_Comm_Dlvry_Media >----------------------|
533 -- ----------------------------------------------------------------------------
534 --
535 procedure delete_Comm_Dlvry_Media
536 (p_validate in boolean default false
537 ,p_cm_dlvry_med_typ_id in number
538 ,p_object_version_number in out nocopy number
539 ,p_effective_date in date
540 ) is
541 --
542 -- Declare cursors and local variables
543 --
544 l_proc varchar2(72) := g_package||'update_Comm_Dlvry_Media';
545 l_object_version_number ben_cm_dlvry_med_typ.object_version_number%TYPE;
546 --
547 begin
548 --
549 hr_utility.set_location('Entering:'|| l_proc, 10);
550 --
551 -- Issue a savepoint if operating in validation only mode
552 --
553 savepoint delete_Comm_Dlvry_Media;
554 --
555 hr_utility.set_location(l_proc, 20);
556 --
557 -- Process Logic
558 --
559 l_object_version_number := p_object_version_number;
560 --
561 --
562 begin
563 --
564 -- Start of API User Hook for the before hook of delete_Comm_Dlvry_Media
565 --
566 ben_Comm_Dlvry_Media_bk3.delete_Comm_Dlvry_Media_b
567 (
568 p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id
569 ,p_object_version_number => p_object_version_number
570 ,p_effective_date => trunc(p_effective_date)
571 );
572 exception
573 when hr_api.cannot_find_prog_unit then
574 hr_api.cannot_find_prog_unit_error
575 (p_module_name => 'DELETE_Comm_Dlvry_Media'
576 ,p_hook_type => 'BP'
577 );
578 --
579 -- End of API User Hook for the before hook of delete_Comm_Dlvry_Media
580 --
581 end;
582 --
583 ben_cmd_del.del
584 (
585 p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id
586 ,p_object_version_number => l_object_version_number
587 ,p_effective_date => p_effective_date
588 );
589 --
590 begin
591 --
592 -- Start of API User Hook for the after hook of delete_Comm_Dlvry_Media
593 --
594 ben_Comm_Dlvry_Media_bk3.delete_Comm_Dlvry_Media_a
595 (
596 p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id
597 ,p_object_version_number => l_object_version_number
598 ,p_effective_date => trunc(p_effective_date)
599 );
600 exception
601 when hr_api.cannot_find_prog_unit then
602 hr_api.cannot_find_prog_unit_error
603 (p_module_name => 'DELETE_Comm_Dlvry_Media'
604 ,p_hook_type => 'AP'
605 );
606 --
607 -- End of API User Hook for the after hook of delete_Comm_Dlvry_Media
608 --
609 end;
610 --
611 hr_utility.set_location(l_proc, 60);
612 --
613 -- When in validation only mode raise the Validate_Enabled exception
614 --
615 if p_validate then
616 raise hr_api.validate_enabled;
617 end if;
618 --
619 hr_utility.set_location(' Leaving:'||l_proc, 70);
620 --
621 exception
622 --
623 when hr_api.validate_enabled then
624 --
625 -- As the Validate_Enabled exception has been raised
626 -- we must rollback to the savepoint
627 --
628 ROLLBACK TO delete_Comm_Dlvry_Media;
629 --
630 -- Only set output warning arguments
631 -- (Any key or derived arguments must be set to null
632 -- when validation only mode is being used.)
633 --
634 --
635 when others then
636 --
637 -- A validation or unexpected error has occured
638 --
639 ROLLBACK TO delete_Comm_Dlvry_Media;
640 /* Inserted for nocopy changes */
641 p_object_version_number := l_object_version_number;
642 raise;
643 --
644 end delete_Comm_Dlvry_Media;
645 --
646 -- ----------------------------------------------------------------------------
647 -- |-------------------------------< lck >------------------------------------|
648 -- ----------------------------------------------------------------------------
649 --
650 procedure lck
651 (
652 p_cm_dlvry_med_typ_id in number
653 ,p_object_version_number in number
654 ) is
655 --
656 --
657 -- Declare cursors and local variables
658 --
659 l_proc varchar2(72) := g_package||'lck';
660 --
661 begin
662 --
663 hr_utility.set_location('Entering:'|| l_proc, 10);
664 --
665 ben_cmd_shd.lck
666 (
667 p_cm_dlvry_med_typ_id => p_cm_dlvry_med_typ_id
668 ,p_object_version_number => p_object_version_number
669 );
670 --
671 hr_utility.set_location(' Leaving:'||l_proc, 70);
672 --
673 end lck;
674 --
675 end ben_Comm_Dlvry_Media_api;