[Home] [Help]
PACKAGE BODY: APPS.HR_APPRAISAL_PERIOD_SWI
Source
1 Package Body hr_appraisal_period_swi As
2 /* $Header: pepmaswi.pkb 120.3 2006/03/27 23:58 vbala noship $ */
3 --
4 -- Package variables
5 --
6 g_package varchar2(33) := 'hr_appraisal_period_swi.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_appraisal_period >-----------------------|
10 -- ----------------------------------------------------------------------------
11 PROCEDURE create_appraisal_period
12 (p_validate in number default hr_api.g_false_num
13 ,p_effective_date in date
14 ,p_plan_id in number
15 ,p_appraisal_template_id in number
16 ,p_start_date in date
17 ,p_end_date in date
18 ,p_task_start_date in date
19 ,p_task_end_date in date
20 ,p_initiator_code in varchar2
21 ,p_appraisal_system_type in varchar2
22 ,p_appraisal_type in varchar2
23 ,p_appraisal_assmt_status in varchar2
24 ,p_auto_conc_process in varchar2
25 ,p_days_before_task_st_dt in number
26 ,p_attribute_category in varchar2 default null
27 ,p_attribute1 in varchar2 default null
28 ,p_attribute2 in varchar2 default null
29 ,p_attribute3 in varchar2 default null
30 ,p_attribute4 in varchar2 default null
31 ,p_attribute5 in varchar2 default null
32 ,p_attribute6 in varchar2 default null
33 ,p_attribute7 in varchar2 default null
34 ,p_attribute8 in varchar2 default null
35 ,p_attribute9 in varchar2 default null
36 ,p_attribute10 in varchar2 default null
37 ,p_attribute11 in varchar2 default null
38 ,p_attribute12 in varchar2 default null
39 ,p_attribute13 in varchar2 default null
40 ,p_attribute14 in varchar2 default null
41 ,p_attribute15 in varchar2 default null
42 ,p_attribute16 in varchar2 default null
43 ,p_attribute17 in varchar2 default null
44 ,p_attribute18 in varchar2 default null
45 ,p_attribute19 in varchar2 default null
46 ,p_attribute20 in varchar2 default null
47 ,p_attribute21 in varchar2 default null
48 ,p_attribute22 in varchar2 default null
49 ,p_attribute23 in varchar2 default null
50 ,p_attribute24 in varchar2 default null
51 ,p_attribute25 in varchar2 default null
52 ,p_attribute26 in varchar2 default null
53 ,p_attribute27 in varchar2 default null
54 ,p_attribute28 in varchar2 default null
55 ,p_attribute29 in varchar2 default null
56 ,p_attribute30 in varchar2 default null
57 ,p_appraisal_period_id in number
58 ,p_object_version_number out nocopy number
59 ,p_return_status out nocopy varchar2
60 ) is
61 --
62 -- Variables for API Boolean parameters
63 l_validate boolean;
64 --
65 -- Variables for IN/OUT parameters
66 --
67 -- Other variables
68 l_appraisal_period_id number;
69 l_proc varchar2(72) := g_package ||'create_appraisal_period';
70 Begin
71 hr_utility.set_location(' Entering:' || l_proc,10);
72 --
73 -- Issue a savepoint
74 --
75 savepoint create_appraisal_period_swi;
76 --
77 -- Initialise Multiple Message Detection
78 --
79 hr_multi_message.enable_message_list;
80 --
81 -- Remember IN OUT parameter IN values
82 --
83 --
84 -- Convert constant values to their corresponding boolean value
85 --
86 l_validate :=
87 hr_api.constant_to_boolean
88 (p_constant_value => p_validate);
89 --
90 -- Register Surrogate ID or user key values
91 --
92 per_pma_ins.set_base_key_value
93 (p_appraisal_period_id => p_appraisal_period_id
94 );
95 --
96 -- Call API
97 --
98 hr_appraisal_period_api.create_appraisal_period
99 (p_validate => l_validate
100 ,p_effective_date => p_effective_date
101 ,p_plan_id => p_plan_id
102 ,p_appraisal_template_id => p_appraisal_template_id
103 ,p_start_date => p_start_date
104 ,p_end_date => p_end_date
105 ,p_task_start_date => p_task_start_date
106 ,p_task_end_date => p_task_end_date
107 ,p_initiator_code => p_initiator_code
108 ,p_appraisal_system_type => p_appraisal_system_type
109 ,p_appraisal_type => p_appraisal_type
110 ,p_appraisal_assmt_status => p_appraisal_assmt_status
111 ,p_auto_conc_process => p_auto_conc_process
112 ,p_days_before_task_st_dt => p_days_before_task_st_dt
113 ,p_attribute_category => p_attribute_category
114 ,p_attribute1 => p_attribute1
115 ,p_attribute2 => p_attribute2
116 ,p_attribute3 => p_attribute3
117 ,p_attribute4 => p_attribute4
118 ,p_attribute5 => p_attribute5
119 ,p_attribute6 => p_attribute6
120 ,p_attribute7 => p_attribute7
121 ,p_attribute8 => p_attribute8
122 ,p_attribute9 => p_attribute9
123 ,p_attribute10 => p_attribute10
124 ,p_attribute11 => p_attribute11
125 ,p_attribute12 => p_attribute12
126 ,p_attribute13 => p_attribute13
127 ,p_attribute14 => p_attribute14
128 ,p_attribute15 => p_attribute15
129 ,p_attribute16 => p_attribute16
130 ,p_attribute17 => p_attribute17
131 ,p_attribute18 => p_attribute18
132 ,p_attribute19 => p_attribute19
133 ,p_attribute20 => p_attribute20
134 ,p_attribute21 => p_attribute21
135 ,p_attribute22 => p_attribute22
136 ,p_attribute23 => p_attribute23
137 ,p_attribute24 => p_attribute24
138 ,p_attribute25 => p_attribute25
139 ,p_attribute26 => p_attribute26
140 ,p_attribute27 => p_attribute27
141 ,p_attribute28 => p_attribute28
142 ,p_attribute29 => p_attribute29
143 ,p_attribute30 => p_attribute30
144 ,p_appraisal_period_id => l_appraisal_period_id
145 ,p_object_version_number => p_object_version_number
146 );
147 --
148 -- Convert API warning boolean parameter values to specific
149 -- messages and add them to Multiple Message List
150 --
151 --
152 -- Convert API non-warning boolean parameter values
153 --
154 --
155 -- Derive the API return status value based on whether
156 -- messages of any type exist in the Multiple Message List.
157 -- Also disable Multiple Message Detection.
158 --
159 p_return_status := hr_multi_message.get_return_status_disable;
160 hr_utility.set_location(' Leaving:' || l_proc,20);
161 --
162 exception
163 when hr_multi_message.error_message_exist then
164 --
165 -- Catch the Multiple Message List exception which
166 -- indicates API processing has been aborted because
167 -- at least one message exists in the list.
168 --
169 rollback to create_appraisal_period_swi;
170 --
171 -- Reset IN OUT parameters and set OUT parameters
172 --
173 p_object_version_number := null;
174 p_return_status := hr_multi_message.get_return_status_disable;
175 hr_utility.set_location(' Leaving:' || l_proc, 30);
176 when others then
177 --
178 -- When Multiple Message Detection is enabled catch
179 -- any Application specific or other unexpected
180 -- exceptions. Adding appropriate details to the
181 -- Multiple Message List. Otherwise re-raise the
182 -- error.
183 --
184 rollback to create_appraisal_period_swi;
185 if hr_multi_message.unexpected_error_add(l_proc) then
186 hr_utility.set_location(' Leaving:' || l_proc,40);
187 raise;
188 end if;
189 --
190 -- Reset IN OUT and set OUT parameters
191 --
192 p_object_version_number := null;
193 p_return_status := hr_multi_message.get_return_status_disable;
194 hr_utility.set_location(' Leaving:' || l_proc,50);
195 end create_appraisal_period;
196 -- ----------------------------------------------------------------------------
197 -- |------------------------< delete_appraisal_period >-----------------------|
198 -- ----------------------------------------------------------------------------
199 PROCEDURE delete_appraisal_period
200 (p_validate in number default hr_api.g_false_num
201 ,p_appraisal_period_id in number
202 ,p_object_version_number in number
203 ,p_return_status out nocopy varchar2
204 ) is
205 --
206 -- Variables for API Boolean parameters
207 l_validate boolean;
208 --
209 -- Variables for IN/OUT parameters
210 --
211 -- Other variables
212 l_proc varchar2(72) := g_package ||'delete_appraisal_period';
213 Begin
214 hr_utility.set_location(' Entering:' || l_proc,10);
215 --
216 -- Issue a savepoint
217 --
218 savepoint delete_appraisal_period_swi;
219 --
220 -- Initialise Multiple Message Detection
221 --
222 hr_multi_message.enable_message_list;
223 --
224 -- Remember IN OUT parameter IN values
225 --
226 --
227 -- Convert constant values to their corresponding boolean value
228 --
229 l_validate :=
230 hr_api.constant_to_boolean
231 (p_constant_value => p_validate);
232 --
233 -- Register Surrogate ID or user key values
234 --
235 --
236 -- Call API
237 --
238 hr_appraisal_period_api.delete_appraisal_period
239 (p_validate => l_validate
240 ,p_appraisal_period_id => p_appraisal_period_id
241 ,p_object_version_number => p_object_version_number
242 );
243 --
244 -- Convert API warning boolean parameter values to specific
245 -- messages and add them to Multiple Message List
246 --
247 --
248 -- Convert API non-warning boolean parameter values
249 --
250 --
251 -- Derive the API return status value based on whether
252 -- messages of any type exist in the Multiple Message List.
253 -- Also disable Multiple Message Detection.
254 --
255 p_return_status := hr_multi_message.get_return_status_disable;
256 hr_utility.set_location(' Leaving:' || l_proc,20);
257 --
258 exception
259 when hr_multi_message.error_message_exist then
260 --
261 -- Catch the Multiple Message List exception which
262 -- indicates API processing has been aborted because
263 -- at least one message exists in the list.
264 --
265 rollback to delete_appraisal_period_swi;
266 --
267 -- Reset IN OUT parameters and set OUT parameters
268 --
269 p_return_status := hr_multi_message.get_return_status_disable;
270 hr_utility.set_location(' Leaving:' || l_proc, 30);
271 when others then
272 --
273 -- When Multiple Message Detection is enabled catch
274 -- any Application specific or other unexpected
275 -- exceptions. Adding appropriate details to the
276 -- Multiple Message List. Otherwise re-raise the
277 -- error.
278 --
279 rollback to delete_appraisal_period_swi;
280 if hr_multi_message.unexpected_error_add(l_proc) then
281 hr_utility.set_location(' Leaving:' || l_proc,40);
282 raise;
283 end if;
284 --
285 -- Reset IN OUT and set OUT parameters
286 --
287 p_return_status := hr_multi_message.get_return_status_disable;
288 hr_utility.set_location(' Leaving:' || l_proc,50);
289 end delete_appraisal_period;
290 -- ----------------------------------------------------------------------------
291 -- |------------------------< update_appraisal_period >-----------------------|
292 -- ----------------------------------------------------------------------------
293 PROCEDURE update_appraisal_period
294 (p_validate in number default hr_api.g_false_num
295 ,p_effective_date in date
296 ,p_appraisal_period_id in number
297 ,p_object_version_number in out nocopy number
298 ,p_start_date in date default hr_api.g_date
299 ,p_end_date in date default hr_api.g_date
300 ,p_task_start_date in date default hr_api.g_date
301 ,p_task_end_date in date default hr_api.g_date
302 ,p_initiator_code in varchar2 default hr_api.g_varchar2
303 ,p_appraisal_system_type in varchar2 default hr_api.g_varchar2
304 ,p_appraisal_type in varchar2 default hr_api.g_varchar2
305 ,p_appraisal_assmt_status in varchar2 default hr_api.g_varchar2
306 ,p_auto_conc_process in varchar2 default hr_api.g_varchar2
307 ,p_days_before_task_st_dt in number default hr_api.g_number
308 ,p_attribute_category in varchar2 default hr_api.g_varchar2
309 ,p_attribute1 in varchar2 default hr_api.g_varchar2
310 ,p_attribute2 in varchar2 default hr_api.g_varchar2
311 ,p_attribute3 in varchar2 default hr_api.g_varchar2
312 ,p_attribute4 in varchar2 default hr_api.g_varchar2
313 ,p_attribute5 in varchar2 default hr_api.g_varchar2
314 ,p_attribute6 in varchar2 default hr_api.g_varchar2
315 ,p_attribute7 in varchar2 default hr_api.g_varchar2
316 ,p_attribute8 in varchar2 default hr_api.g_varchar2
317 ,p_attribute9 in varchar2 default hr_api.g_varchar2
318 ,p_attribute10 in varchar2 default hr_api.g_varchar2
319 ,p_attribute11 in varchar2 default hr_api.g_varchar2
320 ,p_attribute12 in varchar2 default hr_api.g_varchar2
321 ,p_attribute13 in varchar2 default hr_api.g_varchar2
322 ,p_attribute14 in varchar2 default hr_api.g_varchar2
323 ,p_attribute15 in varchar2 default hr_api.g_varchar2
324 ,p_attribute16 in varchar2 default hr_api.g_varchar2
325 ,p_attribute17 in varchar2 default hr_api.g_varchar2
326 ,p_attribute18 in varchar2 default hr_api.g_varchar2
327 ,p_attribute19 in varchar2 default hr_api.g_varchar2
328 ,p_attribute20 in varchar2 default hr_api.g_varchar2
329 ,p_attribute21 in varchar2 default hr_api.g_varchar2
330 ,p_attribute22 in varchar2 default hr_api.g_varchar2
331 ,p_attribute23 in varchar2 default hr_api.g_varchar2
332 ,p_attribute24 in varchar2 default hr_api.g_varchar2
333 ,p_attribute25 in varchar2 default hr_api.g_varchar2
334 ,p_attribute26 in varchar2 default hr_api.g_varchar2
335 ,p_attribute27 in varchar2 default hr_api.g_varchar2
336 ,p_attribute28 in varchar2 default hr_api.g_varchar2
337 ,p_attribute29 in varchar2 default hr_api.g_varchar2
338 ,p_attribute30 in varchar2 default hr_api.g_varchar2
339 ,p_return_status out nocopy varchar2
340 ) is
341 --
342 -- Variables for API Boolean parameters
343 l_validate boolean;
344 --
345 -- Variables for IN/OUT parameters
346 l_object_version_number number;
347 --
348 -- Other variables
349 l_proc varchar2(72) := g_package ||'update_appraisal_period';
350 Begin
351 hr_utility.set_location(' Entering:' || l_proc,10);
352 --
353 -- Issue a savepoint
354 --
355 savepoint update_appraisal_period_swi;
356 --
357 -- Initialise Multiple Message Detection
358 --
359 hr_multi_message.enable_message_list;
360 --
361 -- Remember IN OUT parameter IN values
362 --
363 l_object_version_number := p_object_version_number;
364 --
365 -- Convert constant values to their corresponding boolean value
366 --
367 l_validate :=
368 hr_api.constant_to_boolean
369 (p_constant_value => p_validate);
370 --
371 -- Register Surrogate ID or user key values
372 --
373 --
374 -- Call API
375 --
376 hr_appraisal_period_api.update_appraisal_period
377 (p_validate => l_validate
378 ,p_effective_date => p_effective_date
379 ,p_appraisal_period_id => p_appraisal_period_id
380 ,p_object_version_number => p_object_version_number
381 ,p_start_date => p_start_date
382 ,p_end_date => p_end_date
383 ,p_task_start_date => p_task_start_date
384 ,p_task_end_date => p_task_end_date
385 ,p_initiator_code => p_initiator_code
386 ,p_appraisal_system_type => p_appraisal_system_type
387 ,p_appraisal_type => p_appraisal_type
388 ,p_appraisal_assmt_status => p_appraisal_assmt_status
389 ,p_auto_conc_process => p_auto_conc_process
390 ,p_days_before_task_st_dt => p_days_before_task_st_dt
391 ,p_attribute_category => p_attribute_category
392 ,p_attribute1 => p_attribute1
393 ,p_attribute2 => p_attribute2
394 ,p_attribute3 => p_attribute3
395 ,p_attribute4 => p_attribute4
396 ,p_attribute5 => p_attribute5
397 ,p_attribute6 => p_attribute6
398 ,p_attribute7 => p_attribute7
399 ,p_attribute8 => p_attribute8
400 ,p_attribute9 => p_attribute9
401 ,p_attribute10 => p_attribute10
402 ,p_attribute11 => p_attribute11
403 ,p_attribute12 => p_attribute12
404 ,p_attribute13 => p_attribute13
405 ,p_attribute14 => p_attribute14
406 ,p_attribute15 => p_attribute15
407 ,p_attribute16 => p_attribute16
408 ,p_attribute17 => p_attribute17
409 ,p_attribute18 => p_attribute18
410 ,p_attribute19 => p_attribute19
411 ,p_attribute20 => p_attribute20
412 ,p_attribute21 => p_attribute21
413 ,p_attribute22 => p_attribute22
414 ,p_attribute23 => p_attribute23
415 ,p_attribute24 => p_attribute24
416 ,p_attribute25 => p_attribute25
417 ,p_attribute26 => p_attribute26
418 ,p_attribute27 => p_attribute27
419 ,p_attribute28 => p_attribute28
420 ,p_attribute29 => p_attribute29
421 ,p_attribute30 => p_attribute30
422 );
423 --
424 -- Convert API warning boolean parameter values to specific
425 -- messages and add them to Multiple Message List
426 --
427 --
428 -- Convert API non-warning boolean parameter values
429 --
430 --
431 -- Derive the API return status value based on whether
432 -- messages of any type exist in the Multiple Message List.
433 -- Also disable Multiple Message Detection.
434 --
435 p_return_status := hr_multi_message.get_return_status_disable;
436 hr_utility.set_location(' Leaving:' || l_proc,20);
437 --
438 exception
439 when hr_multi_message.error_message_exist then
440 --
441 -- Catch the Multiple Message List exception which
442 -- indicates API processing has been aborted because
443 -- at least one message exists in the list.
444 --
445 rollback to update_appraisal_period_swi;
446 --
447 -- Reset IN OUT parameters and set OUT parameters
448 --
449 p_object_version_number := l_object_version_number;
450 p_return_status := hr_multi_message.get_return_status_disable;
451 hr_utility.set_location(' Leaving:' || l_proc, 30);
452 when others then
453 --
454 -- When Multiple Message Detection is enabled catch
455 -- any Application specific or other unexpected
456 -- exceptions. Adding appropriate details to the
457 -- Multiple Message List. Otherwise re-raise the
458 -- error.
459 --
460 rollback to update_appraisal_period_swi;
461 if hr_multi_message.unexpected_error_add(l_proc) then
462 hr_utility.set_location(' Leaving:' || l_proc,40);
463 raise;
464 end if;
465 --
466 -- Reset IN OUT and set OUT parameters
467 --
468 p_object_version_number := l_object_version_number;
469 p_return_status := hr_multi_message.get_return_status_disable;
470 hr_utility.set_location(' Leaving:' || l_proc,50);
471 end update_appraisal_period;
472 end hr_appraisal_period_swi;