[Home] [Help]
PACKAGE BODY: APPS.GHR_COMPLAINANT_APPEALS_API
Source
1 Package Body ghr_complainant_appeals_api as
2 /* $Header: ghccaapi.pkb 115.1 2003/01/30 16:31:39 asubrahm noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' ghr_complaints_appeals_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |-----------------------< Create_complainant_appeal>--------------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_complainant_appeal
13 (p_validate in boolean default false
14 ,p_effective_date in date
15 ,p_complaint_id in number
16 ,p_appeal_date in date default null
17 ,p_appealed_to in varchar2 default null
18 ,p_reason_for_appeal in varchar2 default null
19 ,p_source_decision_date in date default null
20 ,p_docket_num in varchar2 default null
21 ,p_org_notified_of_appeal in date default null
22 ,p_agency_recvd_req_for_files in date default null
23 ,p_files_due in date default null
24 ,p_files_forwd in date default null
25 ,p_agcy_recvd_appellant_brief in date default null
26 ,p_agency_brief_due in date default null
27 ,p_appellant_brief_forwd_org in date default null
28 ,p_org_forwd_brief_to_agency in date default null
29 ,p_agency_brief_forwd in date default null
30 ,p_decision_date in date default null
31 ,p_dec_recvd_by_agency in date default null
32 ,p_decision in varchar2 default null
33 ,p_dec_forwd_to_org in date default null
34 ,p_agency_rfr_suspense in date default null
35 ,p_request_for_rfr in date default null
36 ,p_rfr_docket_num in varchar2 default null
37 ,p_rfr_requested_by in varchar2 default null
38 ,p_agency_rfr_due in date default null
39 ,p_rfr_forwd_to_org in date default null
40 ,p_org_forwd_rfr_to_agency in date default null
41 ,p_agency_forwd_rfr_ofo in date default null
42 ,p_rfr_decision in varchar2 default null
43 ,p_rfr_decision_date in date default null
44 ,p_agency_recvd_rfr_dec in date default null
45 ,p_rfr_decision_forwd_to_org in date default null
46 ,p_compl_appeal_id out nocopy number
47 ,p_object_version_number out nocopy number
48 ) is
49
50 --
51 -- Declare cursors and local variables
52 --
53
54 l_proc varchar2(72) := g_package||'create_complaint_appeal';
55 l_compl_appeal_id number;
56 l_object_version_number number;
57 begin
58 hr_utility.set_location('Entering:'|| l_proc, 10);
59 --
60 -- Issue a savepoint
61 --
62 savepoint create_complainant_appeal;
63 hr_utility.set_location(l_proc, 20);
64 -- Truncate the time portion from all IN date parameters
65 --
66 --
67 -- Call Before Process User Hook
68 --
69 begin
70 ghr_complainant_appeals_bk_1.create_complainant_appeal_b
71 (p_effective_date => trunc(p_effective_date)
72 ,p_complaint_id => p_complaint_id
73 ,p_appeal_date => p_appeal_date
74 ,p_appealed_to => p_appealed_to
75 ,p_reason_for_appeal => p_reason_for_appeal
76 ,p_source_decision_date => p_source_decision_date
77 ,p_docket_num => p_docket_num
78 ,p_org_notified_of_appeal => p_org_notified_of_appeal
79 ,p_agency_recvd_req_for_files => p_agency_recvd_req_for_files
80 ,p_files_due => p_files_due
81 ,p_files_forwd => p_files_forwd
82 ,p_agcy_recvd_appellant_brief => p_agcy_recvd_appellant_brief
83 ,p_agency_brief_due => p_agency_brief_due
84 ,p_appellant_brief_forwd_org => p_appellant_brief_forwd_org
85 ,p_org_forwd_brief_to_agency => p_org_forwd_brief_to_agency
86 ,p_agency_brief_forwd => p_agency_brief_forwd
87 ,p_decision_date => p_decision_date
88 ,p_dec_recvd_by_agency => p_dec_recvd_by_agency
89 ,p_decision => p_decision
90 ,p_dec_forwd_to_org => p_dec_forwd_to_org
91 ,p_agency_rfr_suspense => p_agency_rfr_suspense
92 ,p_request_for_rfr => p_request_for_rfr
93 ,p_rfr_docket_num => p_rfr_docket_num
94 ,p_rfr_requested_by => p_rfr_requested_by
95 ,p_agency_rfr_due => p_agency_rfr_due
96 ,p_rfr_forwd_to_org => p_rfr_forwd_to_org
97 ,p_org_forwd_rfr_to_agency => p_org_forwd_rfr_to_agency
98 ,p_agency_forwd_rfr_ofo => p_agency_forwd_rfr_ofo
99 ,p_rfr_decision => p_rfr_decision
100 ,p_rfr_decision_date => p_rfr_decision_date
101 ,p_agency_recvd_rfr_dec => p_agency_recvd_rfr_dec
102 ,p_rfr_decision_forwd_to_org => p_rfr_decision_forwd_to_org
103 );
104 exception
105 when hr_api.cannot_find_prog_unit then
106 hr_api.cannot_find_prog_unit_error
107 (p_module_name => 'create_complainant_appeal'
108 ,p_hook_type => 'BP'
109 );
110 end;
111 --
112 -- Validation in addition to Row Handlers
113 --
114
115 hr_utility.set_location(l_proc, 40);
116 --
117 -- Process Logic
118 --
119 ghr_cca_ins.ins
120 (
121 p_effective_date => p_effective_date
122 ,p_complaint_id => p_complaint_id
123 ,p_appeal_date => p_appeal_date
124 ,p_appealed_to => p_appealed_to
125 ,p_reason_for_appeal => p_reason_for_appeal
126 ,p_source_decision_date => p_source_decision_date
127 ,p_docket_num => p_docket_num
128 ,p_org_notified_of_appeal => p_org_notified_of_appeal
129 ,p_agency_recvd_req_for_files => p_agency_recvd_req_for_files
130 ,p_files_due => p_files_due
131 ,p_files_forwd => p_files_forwd
132 ,p_agcy_recvd_appellant_brief => p_agcy_recvd_appellant_brief
133 ,p_agency_brief_due => p_agency_brief_due
134 ,p_appellant_brief_forwd_org => p_appellant_brief_forwd_org
135 ,p_org_forwd_brief_to_agency => p_org_forwd_brief_to_agency
136 ,p_agency_brief_forwd => p_agency_brief_forwd
137 ,p_decision_date => p_decision_date
138 ,p_dec_recvd_by_agency => p_dec_recvd_by_agency
139 ,p_decision => p_decision
140 ,p_dec_forwd_to_org => p_dec_forwd_to_org
141 ,p_agency_rfr_suspense => p_agency_rfr_suspense
142 ,p_request_for_rfr => p_request_for_rfr
143 ,p_rfr_docket_num => p_rfr_docket_num
144 ,p_rfr_requested_by => p_rfr_requested_by
145 ,p_agency_rfr_due => p_agency_rfr_due
146 ,p_rfr_forwd_to_org => p_rfr_forwd_to_org
147 ,p_org_forwd_rfr_to_agency => p_org_forwd_rfr_to_agency
148 ,p_agency_forwd_rfr_ofo => p_agency_forwd_rfr_ofo
149 ,p_rfr_decision => p_rfr_decision
150 ,p_rfr_decision_date => p_rfr_decision_date
151 ,p_agency_recvd_rfr_dec => p_agency_recvd_rfr_dec
152 ,p_rfr_decision_forwd_to_org => p_rfr_decision_forwd_to_org
153 ,p_compl_appeal_id => l_compl_appeal_id
154 ,p_object_version_number => l_object_version_number
155 );
156
157 hr_utility.set_location(l_proc, 50);
158 --
159 --
160 -- Call After Process User Hook
161 --
162 begin
163 ghr_complainant_appeals_bk_1.create_complainant_appeal_a
164 (p_effective_date => trunc(p_effective_date)
165 ,p_complaint_id => p_complaint_id
166 ,p_appeal_date => p_appeal_date
167 ,p_appealed_to => p_appealed_to
168 ,p_reason_for_appeal => p_reason_for_appeal
169 ,p_source_decision_date => p_source_decision_date
170 ,p_docket_num => p_docket_num
171 ,p_org_notified_of_appeal => p_org_notified_of_appeal
172 ,p_agency_recvd_req_for_files => p_agency_recvd_req_for_files
173 ,p_files_due => p_files_due
174 ,p_files_forwd => p_files_forwd
175 ,p_agcy_recvd_appellant_brief => p_agcy_recvd_appellant_brief
176 ,p_agency_brief_due => p_agency_brief_due
177 ,p_appellant_brief_forwd_org => p_appellant_brief_forwd_org
178 ,p_org_forwd_brief_to_agency => p_org_forwd_brief_to_agency
179 ,p_agency_brief_forwd => p_agency_brief_forwd
180 ,p_decision_date => p_decision_date
181 ,p_dec_recvd_by_agency => p_dec_recvd_by_agency
182 ,p_decision => p_decision
183 ,p_dec_forwd_to_org => p_dec_forwd_to_org
184 ,p_agency_rfr_suspense => p_agency_rfr_suspense
185 ,p_request_for_rfr => p_request_for_rfr
186 ,p_rfr_docket_num => p_rfr_docket_num
187 ,p_rfr_requested_by => p_rfr_requested_by
188 ,p_agency_rfr_due => p_agency_rfr_due
189 ,p_rfr_forwd_to_org => p_rfr_forwd_to_org
190 ,p_org_forwd_rfr_to_agency => p_org_forwd_rfr_to_agency
191 ,p_agency_forwd_rfr_ofo => p_agency_forwd_rfr_ofo
192 ,p_rfr_decision => p_rfr_decision
193 ,p_rfr_decision_date => p_rfr_decision_date
194 ,p_agency_recvd_rfr_dec => p_agency_recvd_rfr_dec
195 ,p_rfr_decision_forwd_to_org => p_rfr_decision_forwd_to_org
196 ,p_compl_appeal_id => l_compl_appeal_id
197 ,p_object_version_number => l_object_version_number
198 );
199 exception
200 when hr_api.cannot_find_prog_unit then
201 hr_api.cannot_find_prog_unit_error
202 (p_module_name => 'create_complainant_appeal'
203 ,p_hook_type => 'AP'
204 );
205 end;
206 --
207 -- When in validation only mode raise the Validate_Enabled exception
208 --
209 if p_validate then
210 raise hr_api.validate_enabled;
211 end if;
212 --
213 -- Set all output arguments
214 --
215 p_compl_appeal_id := l_compl_appeal_id;
216 p_object_version_number := l_object_version_number;
217 --
218 hr_utility.set_location(' Leaving:'||l_proc, 70);
219 exception
220 when hr_api.validate_enabled then
221 --
222 -- As the Validate_Enabled exception has been raised
223 -- we must rollback to the savepoint
224 --
225 rollback to create_complainant_appeal;
226 --
227 -- Only set output warning arguments
228 -- (Any key or derived arguments must be set to null
229 -- when validation only mode is being used.)
230 --
231 -- RESET In/Out Params and SET Out Params
232 p_compl_appeal_id := null;
233 p_object_version_number := null;
234 hr_utility.set_location(' Leaving:'||l_proc, 80);
235 when others then
236 --
237 -- A validation or unexpected error has occured
238 --
239 rollback to create_complainant_appeal;
240 -- RESET In/Out Params and SET Out Params
241 p_compl_appeal_id := null;
242 p_object_version_number := null;
243 hr_utility.set_location(' Leaving:'||l_proc, 90);
244 raise;
245 end create_complainant_appeal;
246 --
247
248
249 procedure update_complainant_appeal
250 (p_validate in boolean default false
251 ,p_effective_date in date
252 ,p_compl_appeal_id in number
253 ,p_object_version_number in out nocopy number
254 ,p_complaint_id in number default hr_api.g_number
255 ,p_appeal_date in date default hr_api.g_date
256 ,p_appealed_to in varchar2 default hr_api.g_varchar2
257 ,p_reason_for_appeal in varchar2 default hr_api.g_varchar2
258 ,p_source_decision_date in date default hr_api.g_date
259 ,p_docket_num in varchar2 default hr_api.g_varchar2
260 ,p_org_notified_of_appeal in date default hr_api.g_date
261 ,p_agency_recvd_req_for_files in date default hr_api.g_date
262 ,p_files_due in date default hr_api.g_date
263 ,p_files_forwd in date default hr_api.g_date
264 ,p_agcy_recvd_appellant_brief in date default hr_api.g_date
265 ,p_agency_brief_due in date default hr_api.g_date
266 ,p_appellant_brief_forwd_org in date default hr_api.g_date
267 ,p_org_forwd_brief_to_agency in date default hr_api.g_date
268 ,p_agency_brief_forwd in date default hr_api.g_date
269 ,p_decision_date in date default hr_api.g_date
270 ,p_dec_recvd_by_agency in date default hr_api.g_date
271 ,p_decision in varchar2 default hr_api.g_varchar2
272 ,p_dec_forwd_to_org in date default hr_api.g_date
273 ,p_agency_rfr_suspense in date default hr_api.g_date
274 ,p_request_for_rfr in date default hr_api.g_date
275 ,p_rfr_docket_num in varchar2 default hr_api.g_varchar2
276 ,p_rfr_requested_by in varchar2 default hr_api.g_varchar2
277 ,p_agency_rfr_due in date default hr_api.g_date
278 ,p_rfr_forwd_to_org in date default hr_api.g_date
279 ,p_org_forwd_rfr_to_agency in date default hr_api.g_date
280 ,p_agency_forwd_rfr_ofo in date default hr_api.g_date
281 ,p_rfr_decision in varchar2 default hr_api.g_varchar2
282 ,p_rfr_decision_date in date default hr_api.g_date
283 ,p_agency_recvd_rfr_dec in date default hr_api.g_date
284 ,p_rfr_decision_forwd_to_org in date default hr_api.g_date
285 )
286
287 is
288 l_proc varchar2(72) := g_package||'update_complaint_appeal';
289 l_object_version_number number;
290 begin
291 hr_utility.set_location('Entering:'|| l_proc, 5);
292 --
293 savepoint update_complainant_appeal;
294 -- Store the original ovn in case we rollback when p_validate is true
295
296 l_object_version_number:=p_object_version_number;
297 --
298 -- Truncate the time portion from all IN date parameters
299 --
300 --
301 -- Call Before Process User Hook
302 --
303 begin
304 ghr_complainant_appeals_bk_2.update_complainant_appeal_b
305 (p_effective_date => trunc(p_effective_date)
306 ,p_complaint_id => p_complaint_id
307 ,p_appeal_date => p_appeal_date
308 ,p_appealed_to => p_appealed_to
309 ,p_reason_for_appeal => p_reason_for_appeal
310 ,p_source_decision_date => p_source_decision_date
311 ,p_docket_num => p_docket_num
312 ,p_org_notified_of_appeal => p_org_notified_of_appeal
313 ,p_agency_recvd_req_for_files => p_agency_recvd_req_for_files
314 ,p_files_due => p_files_due
315 ,p_files_forwd => p_files_forwd
316 ,p_agcy_recvd_appellant_brief => p_agcy_recvd_appellant_brief
317 ,p_agency_brief_due => p_agency_brief_due
318 ,p_appellant_brief_forwd_org => p_appellant_brief_forwd_org
319 ,p_org_forwd_brief_to_agency => p_org_forwd_brief_to_agency
320 ,p_agency_brief_forwd => p_agency_brief_forwd
321 ,p_decision_date => p_decision_date
322 ,p_dec_recvd_by_agency => p_dec_recvd_by_agency
323 ,p_decision => p_decision
324 ,p_dec_forwd_to_org => p_dec_forwd_to_org
325 ,p_agency_rfr_suspense => p_agency_rfr_suspense
326 ,p_request_for_rfr => p_request_for_rfr
327 ,p_rfr_docket_num => p_rfr_docket_num
328 ,p_rfr_requested_by => p_rfr_requested_by
329 ,p_agency_rfr_due => p_agency_rfr_due
330 ,p_rfr_forwd_to_org => p_rfr_forwd_to_org
331 ,p_org_forwd_rfr_to_agency => p_org_forwd_rfr_to_agency
332 ,p_agency_forwd_rfr_ofo => p_agency_forwd_rfr_ofo
333 ,p_rfr_decision => p_rfr_decision
334 ,p_rfr_decision_date => p_rfr_decision_date
335 ,p_agency_recvd_rfr_dec => p_agency_recvd_rfr_dec
336 ,p_rfr_decision_forwd_to_org => p_rfr_decision_forwd_to_org
337 ,p_compl_appeal_id => p_compl_appeal_id
338 ,p_object_version_number => p_object_version_number
339 );
340 exception
341 when hr_api.cannot_find_prog_unit then
342 hr_api.cannot_find_prog_unit_error
343 (p_module_name => 'update_complainant_appeal'
344 ,p_hook_type => 'BP'
345 );
346 end;
347 --
348 -- Validation in addition to Row Handlers
349
350 l_object_version_number := p_object_version_number;
351
352 hr_utility.set_location(l_proc, 6);
353
354 ghr_cca_upd.upd
355 (p_effective_date => p_effective_date
356 ,p_complaint_id => p_complaint_id
357 ,p_appeal_date => p_appeal_date
358 ,p_appealed_to => p_appealed_to
359 ,p_reason_for_appeal => p_reason_for_appeal
360 ,p_source_decision_date => p_source_decision_date
361 ,p_docket_num => p_docket_num
362 ,p_org_notified_of_appeal => p_org_notified_of_appeal
363 ,p_agency_recvd_req_for_files => p_agency_recvd_req_for_files
364 ,p_files_due => p_files_due
365 ,p_files_forwd => p_files_forwd
366 ,p_agcy_recvd_appellant_brief => p_agcy_recvd_appellant_brief
367 ,p_agency_brief_due => p_agency_brief_due
368 ,p_appellant_brief_forwd_org => p_appellant_brief_forwd_org
369 ,p_org_forwd_brief_to_agency => p_org_forwd_brief_to_agency
370 ,p_agency_brief_forwd => p_agency_brief_forwd
371 ,p_decision_date => p_decision_date
372 ,p_dec_recvd_by_agency => p_dec_recvd_by_agency
373 ,p_decision => p_decision
374 ,p_dec_forwd_to_org => p_dec_forwd_to_org
375 ,p_agency_rfr_suspense => p_agency_rfr_suspense
376 ,p_request_for_rfr => p_request_for_rfr
377 ,p_rfr_docket_num => p_rfr_docket_num
378 ,p_rfr_requested_by => p_rfr_requested_by
379 ,p_agency_rfr_due => p_agency_rfr_due
380 ,p_rfr_forwd_to_org => p_rfr_forwd_to_org
381 ,p_org_forwd_rfr_to_agency => p_org_forwd_rfr_to_agency
382 ,p_agency_forwd_rfr_ofo => p_agency_forwd_rfr_ofo
383 ,p_rfr_decision => p_rfr_decision
384 ,p_rfr_decision_date => p_rfr_decision_date
385 ,p_agency_recvd_rfr_dec => p_agency_recvd_rfr_dec
386 ,p_rfr_decision_forwd_to_org => p_rfr_decision_forwd_to_org
387 ,p_compl_appeal_id => p_compl_appeal_id
388 ,p_object_version_number => l_object_version_number
389 );
390 --
391 -- Call After Process User Hook
392 --
393 begin
394 ghr_complainant_appeals_bk_2.update_complainant_appeal_a
395 (p_effective_date => trunc(p_effective_date)
396 ,p_complaint_id => p_complaint_id
397 ,p_appeal_date => p_appeal_date
398 ,p_appealed_to => p_appealed_to
399 ,p_reason_for_appeal => p_reason_for_appeal
400 ,p_source_decision_date => p_source_decision_date
401 ,p_docket_num => p_docket_num
402 ,p_org_notified_of_appeal => p_org_notified_of_appeal
403 ,p_agency_recvd_req_for_files => p_agency_recvd_req_for_files
404 ,p_files_due => p_files_due
405 ,p_files_forwd => p_files_forwd
406 ,p_agcy_recvd_appellant_brief => p_agcy_recvd_appellant_brief
407 ,p_agency_brief_due => p_agency_brief_due
408 ,p_appellant_brief_forwd_org => p_appellant_brief_forwd_org
409 ,p_org_forwd_brief_to_agency => p_org_forwd_brief_to_agency
410 ,p_agency_brief_forwd => p_agency_brief_forwd
411 ,p_decision_date => p_decision_date
412 ,p_dec_recvd_by_agency => p_dec_recvd_by_agency
413 ,p_decision => p_decision
414 ,p_dec_forwd_to_org => p_dec_forwd_to_org
415 ,p_agency_rfr_suspense => p_agency_rfr_suspense
416 ,p_request_for_rfr => p_request_for_rfr
417 ,p_rfr_docket_num => p_rfr_docket_num
418 ,p_rfr_requested_by => p_rfr_requested_by
419 ,p_agency_rfr_due => p_agency_rfr_due
420 ,p_rfr_forwd_to_org => p_rfr_forwd_to_org
421 ,p_org_forwd_rfr_to_agency => p_org_forwd_rfr_to_agency
422 ,p_agency_forwd_rfr_ofo => p_agency_forwd_rfr_ofo
423 ,p_rfr_decision => p_rfr_decision
424 ,p_rfr_decision_date => p_rfr_decision_date
425 ,p_agency_recvd_rfr_dec => p_agency_recvd_rfr_dec
426 ,p_rfr_decision_forwd_to_org => p_rfr_decision_forwd_to_org
427 ,p_compl_appeal_id => p_compl_appeal_id
428 ,p_object_version_number => l_object_version_number
429 );
430 exception
431 when hr_api.cannot_find_prog_unit then
432 hr_api.cannot_find_prog_unit_error
433 (p_module_name => 'update_complainant_appeal'
434 ,p_hook_type => 'AP'
435 );
436 end;
437 --
438 -- When in validation only mode raise the Validate_Enabled exception
439 --
440 if p_validate then
441 raise hr_api.validate_enabled;
442 end if;
443 --
444 -- Set all output arguments
445 --
446
447 p_object_version_number := l_object_version_number;
448 --
449 hr_utility.set_location(' Leaving:'||l_proc, 70);
450 exception
451 when hr_api.validate_enabled then
452 --
453 -- As the Validate_Enabled exception has been raised
454 -- we must rollback to the savepoint
455 --
456 rollback to update_complainant_appeal;
457 -- Reset In/Out Params and SET Out Params
458 p_object_version_number:=l_object_version_number;
459 --
460 -- Only set output warning arguments
461 -- (Any key or derived arguments must be set to null
462 -- when validation only mode is being used.)
463 --
464 hr_utility.set_location(' Leaving:'||l_proc, 80);
465 when others then
466 --
467 -- A validation or unexpected error has occured
468 --
469 rollback to update_complainant_appeal;
470 -- Reset In/Out Params and SET Out Params
471 p_object_version_number:=l_object_version_number;
472 hr_utility.set_location(' Leaving:'||l_proc, 90);
473 raise;
474
475 end update_complainant_appeal;
476
477 -- ----------------------------------------------------------------------------
478 -- |-----------------------< delete_complainant_appeal >-------------------------|
479 -- ----------------------------------------------------------------------------
480 --
481 procedure delete_complainant_appeal
482 (p_validate in boolean default false
483 ,p_compl_appeal_id in number
484 ,p_object_version_number in number
485 ) is
486 --
487 -- Declare cursors and local variables
488 --
489 l_proc varchar2(72) := g_package||'delete_complaint_appeal';
490 l_exists boolean := false;
491
492 begin
493 hr_utility.set_location('Entering:'|| l_proc, 5);
494 --
495 --
496 savepoint delete_complainant_appeal;
497 --
498 -- Truncate the time portion from all IN date parameters
499 --
500
501 --
502 -- Call Before Process User Hook
503 --
504 begin
505 ghr_complainant_appeals_bk_3.delete_complainant_appeal_b
506 (p_compl_appeal_id => p_compl_appeal_id
507 ,p_object_version_number => p_object_version_number
508 );
509 exception
510 when hr_api.cannot_find_prog_unit then
511 hr_api.cannot_find_prog_unit_error
512 (p_module_name => 'delete_complainant_appeal'
513 ,p_hook_type => 'BP'
514 );
515 end;
516 --
517 -- Validation in addition to Row Handlers
518 -- Process Logic
519 ghr_cca_del.del
520 (p_compl_appeal_id => p_compl_appeal_id
521 ,p_object_version_number => p_object_version_number
522 );
523 --
524 hr_utility.set_location(l_proc, 8);
525 --
526 -- Call After Process User Hook
527 --
528 begin
529 ghr_complainant_appeals_bk_3.delete_complainant_appeal_a
530 (p_compl_appeal_id => p_compl_appeal_id
531 ,p_object_version_number => p_object_version_number
532 );
533 exception
534 when hr_api.cannot_find_prog_unit then
535 hr_api.cannot_find_prog_unit_error
536 (p_module_name => 'delete_complainant_appeal'
537 ,p_hook_type => 'AP'
538 );
539 end;
540 --
541 --
542 -- When in validation only mode raise the Validate_Enabled exception
543 --
544 if p_validate then
545 raise hr_api.validate_enabled;
546 end if;
547 --
548 hr_utility.set_location(' Leaving:'||l_proc, 11);
549 exception
550 when hr_api.validate_enabled then
551 -- we must rollback to the savepoint
552 --
553 ROLLBACK TO delete_complainant_appeal;
554 --
555 When Others then
556 ROLLBACK TO delete_complainant_appeal;
557 raise;
558
559 hr_utility.set_location(' Leaving:'||l_proc, 12);
560 end delete_complainant_appeal;
561 end ghr_complainant_appeals_api;