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