[Home] [Help]
PACKAGE BODY: APPS.PER_CEL_SHD
Source
1 Package Body per_cel_shd as
2 /* $Header: pecelrhi.pkb 120.3 2006/03/28 05:27:21 arumukhe noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- | Private Global Definitions |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package varchar2(33) := ' per_cel_shd.'; -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |------------------------< return_api_dml_status >-------------------------|
12 -- ----------------------------------------------------------------------------
13 Function return_api_dml_status Return Boolean Is
14
15 --
16 l_proc varchar2(72) := g_package||'return_api_dml_status';
17 --
18 Begin
19 hr_utility.set_location('Entering:'||l_proc, 5);
20 --
21 Return (nvl(g_api_dml, false));
22 --
23 hr_utility.set_location(' Leaving:'||l_proc, 10);
24 End return_api_dml_status;
25 --
26 -- ----------------------------------------------------------------------------
27 -- |---------------------------< constraint_error >---------------------------|
28 -- ----------------------------------------------------------------------------
29 Procedure constraint_error
30 (p_constraint_name in all_constraints.constraint_name%TYPE) Is
31 --
32 l_proc varchar2(72) := g_package||'constraint_error';
33 --
34 Begin
35 Hr_utility.set_location('Entering:'||l_proc, 5);
36 --
37 If (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK1') Then
38 hr_utility.set_message(800, 'HR_52251_CEL_COMP_ID_INVL');
39 hr_utility.set_location(l_proc,10);
40 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.COMPETENCE_ID');
41 hr_utility.raise_error;
42
43 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK2') Then
44 hr_utility.set_message(801, 'HR_51612_CEL_BUS_GROUP_ID_INVL');
45 hr_utility.set_location(l_proc,15);
46 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.BUSINESS_GROUP_ID');
47 hr_utility.raise_error;
48 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK5') Then
49
50 hr_utility.set_message(801, 'HR_51615_CEL_PROF_ID_INVL');
51 hr_utility.set_location(l_proc,30);
52 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.PROFICIENCY_LEVEL_ID');
53 hr_utility.raise_error;
54 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK6') Then
55 hr_utility.set_message(801, 'HR_51616_CEL_HG_PROF_ID_INVL');
56 hr_utility.set_location(l_proc,35);
57 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.HIGH_PROFICIENCY_LEVEL_ID');
58 hr_utility.raise_error;
59 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK7') Then
60 hr_utility.set_message(801, 'HR_51621_CEL_PERSON_ID_INVL');
61 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.PERSON_ID');
62 hr_utility.set_location(l_proc,40);
63 hr_utility.raise_error;
64 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK8') Then
65 hr_utility.set_message(801, 'HR_51620_CEL_JOB_ID_INVL');
66 hr_utility.set_location(l_proc,45);
67 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.JOB_ID');
68 hr_utility.raise_error;
69 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK9') Then
70 hr_utility.set_message(801, 'HR_51622_CEL_POSITION_ID_INVL');
71 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.POSITION_ID');
72 hr_utility.set_location(l_proc,50);
73 hr_utility.raise_error;
74 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK10') Then
75 hr_utility.set_message(801, 'HR_51623_CEL_ORG_ID_INVL');
76 hr_utility.set_location(l_proc,55);
77 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.ORGANIZATION_ID');
78 hr_utility.raise_error;
79
80 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK14') Then
81 hr_utility.set_message(801, 'HR_51628_CEL_ASS_ID_INVL');
82 hr_utility.set_location(l_proc,70);
83 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.ASSESSMENT_ID');
84 hr_utility.raise_error;
85 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK15') Then
86 hr_utility.set_message(801, 'HR_51748_CEL_ASS_TYPE_ID_INVL');
87 hr_utility.set_location(l_proc,75);
88 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.ASSESSMENT_TYPE_ID');
89 hr_utility.raise_error;
90
91 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK16') Then
92 hr_utility.set_message(801, 'HR_51631_CEL_RATE_ID_INVL');
93 hr_utility.set_location(l_proc,80);
94 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.RATING_LEVEL_ID');
95 hr_utility.raise_error;
96 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK17') Then
97 hr_utility.set_message(801, 'HR_51632_CEL_WEG_ID_INVL');
98 hr_utility.set_location(l_proc,85);
99 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.WEIGHTING_LEVEL_ID');
100 hr_utility.raise_error;
101 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK18') Then
102 hr_utility.set_message(801, 'HR_51633_CEL_PARENT_ID_INVL');
103 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.PARENT_COMPETENCE_ELEMENT_ID');
104 hr_utility.set_location(l_proc,90);
105 hr_utility.raise_error;
106 Elsif (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK19') Then
107 hr_utility.set_message(800, 'HR_52341_PER_DATE_INVL');
108 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.VALID_GRADE_ID');
109 hr_utility.set_location(l_proc,90);
110 hr_utility.raise_error;
111 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK20') Then
112 hr_utility.set_message(800, 'HR_52338_COMP_DATE_INVL');
113 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.ENTERPRISE_ID');
114 hr_utility.set_location(l_proc,90);
115 hr_utility.raise_error;
116 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK21') Then
117 hr_utility.set_message(800, 'HR_52339_COMP_ELMT_DATE_INVL');
118 hr_multi_message.add(
119 p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.EFFECTIVE_DATE_FROM'
120 ,p_associated_column2 => 'PER_COMPETENCE_ELEMENTS.EFFECTIVE_DATE_TO'
121 );
122 hr_utility.set_location(l_proc,90);
123 hr_utility.raise_error;
124 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_FK22') Then
125 hr_utility.set_message(800, 'HR_52342_GRD_DATE_INVL');
126 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.VALID_GRADE_ID');
127 hr_utility.set_location(l_proc,90);
128 hr_utility.raise_error;
129 ElsIf (p_constraint_name = 'PER_COMPETENCE_ELEMENTS_PK') Then
130
131 hr_utility.set_message(801, 'HR_51634_CEL_PRI_KEY_ID_INVL');
132 hr_utility.set_location(l_proc,95);
133 hr_multi_message.add( p_associated_column1 => 'PER_COMPETENCE_ELEMENTS.COMPETENCE_ELEMENT_ID');
134 hr_utility.raise_error;
135 Else
136 hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
137 hr_utility.set_message_token('PROCEDURE', l_proc);
138 hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
139 hr_utility.raise_error;
140 End If;
141 --
142 hr_utility.set_location(' Leaving:'||l_proc, 100);
143 End constraint_error;
144
145 --
146
147 -- ----------------------------------------------------------------------------
148 -- |-----------------------------< api_updating >-----------------------------|
149 -- ----------------------------------------------------------------------------
150 Function api_updating
151 (
152 p_competence_element_id in number,
153 p_object_version_number in number
154 ) Return Boolean Is
155 --
156 --
157 -- Cursor selects the 'current' row from the HR Schema
158 --
159 Cursor C_Sel1 is
160
161 select
162 competence_element_id,
163 object_version_number,
164 type,
165 business_group_id,
166 enterprise_id,
167 competence_id,
168 proficiency_level_id,
169 high_proficiency_level_id,
170 weighting_level_id,
171 rating_level_id,
172 person_id,
173 job_id,
174 valid_grade_id,
175 position_id,
176 organization_id,
177 parent_competence_element_id,
178 activity_version_id,
179 assessment_id,
180 assessment_type_id,
181 mandatory,
182 effective_date_from,
183 effective_date_to,
184 group_competence_type,
185 competence_type,
186 normal_elapse_duration,
187 normal_elapse_duration_unit,
188 sequence_number,
189 source_of_proficiency_level,
190 line_score,
191 certification_date,
192 certification_method,
193 next_certification_date,
194 comments,
195 attribute_category,
196 attribute1,
197 attribute2,
198 attribute3,
199 attribute4,
200 attribute5,
201 attribute6,
202 attribute7,
203 attribute8,
204 attribute9,
205 attribute10,
206 attribute11,
207 attribute12,
208 attribute13,
209 attribute14,
210 attribute15,
211 attribute16,
212 attribute17,
213 attribute18,
214 attribute19,
215 attribute20,
216 object_id,
217 object_name,
218 party_id -- HR/TCA merge
219 --
220 -- BUG3356369
221 --
222 ,qualification_type_id
223 ,unit_standard_type
224 ,status
225 ,information_category
226 ,information1
227 ,information2
228 ,information3
229 ,information4
230 ,information5
231 ,information6
232 ,information7
233 ,information8
234 ,information9
235 ,information10
236 ,information11
237 ,information12
238 ,information13
239 ,information14
240 ,information15
241 ,information16
242 ,information17
243 ,information18
244 ,information19
245 ,information20
246 ,achieved_date
247 ,appr_line_score
248 from per_competence_elements
249 where competence_element_id = p_competence_element_id;
250 --
251 l_proc varchar2(72) := g_package||'api_updating';
252 l_fct_ret boolean;
253 --
254
255 Begin
256 hr_utility.set_location('Entering:'||l_proc, 5);
257 --
258 If (
259 p_competence_element_id is null and
260 p_object_version_number is null
261 ) Then
262 --
263 -- One of the primary key arguments is null therefore we must
264 -- set the returning function value to false
265 --
266 l_fct_ret := false;
267 Else
268
269 If (
270 p_competence_element_id = g_old_rec.competence_element_id and
271 p_object_version_number = g_old_rec.object_version_number
272 ) Then
273 hr_utility.set_location(l_proc, 10);
274 --
275 -- The g_old_rec is current therefore we must
276 -- set the returning function to true
277 --
278 l_fct_ret := true;
279 Else
280 --
281 -- Select the current row into g_old_rec
282
283 --
284 Open C_Sel1;
285 Fetch C_Sel1 Into g_old_rec;
286 If C_Sel1%notfound Then
287 Close C_Sel1;
288 --
289 -- The primary key is invalid therefore we must error
290 --
291 hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
292 hr_utility.raise_error;
293 End If;
294 Close C_Sel1;
295 If (p_object_version_number <> g_old_rec.object_version_number) Then
296
297 hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
298 hr_utility.raise_error;
299 End If;
300 hr_utility.set_location(l_proc, 15);
301 l_fct_ret := true;
302 End If;
303 End If;
304 hr_utility.set_location(' Leaving:'||l_proc, 20);
305 Return (l_fct_ret);
306 --
307 End api_updating;
308 --
309 -- ----------------------------------------------------------------------------
310 -- |---------------------------------< lck >----------------------------------|
311 -- ----------------------------------------------------------------------------
312 Procedure lck
313 (
314 p_competence_element_id in number,
315 p_object_version_number in number
316 ) is
317 --
318 -- Cursor selects the 'current' row from the HR Schema
319 --
320 Cursor C_Sel1 is
321 select competence_element_id,
322 object_version_number,
323 type,
324 business_group_id,
325 enterprise_id,
326 competence_id,
327 proficiency_level_id,
328 high_proficiency_level_id,
329 weighting_level_id,
330 rating_level_id,
331 person_id,
332 job_id,
333 valid_grade_id,
334 position_id,
335 organization_id,
336 parent_competence_element_id,
337 activity_version_id,
338 assessment_id,
339 assessment_type_id,
340 mandatory,
341 effective_date_from,
342 effective_date_to,
343 group_competence_type,
344 competence_type,
345 normal_elapse_duration,
346 normal_elapse_duration_unit,
347 sequence_number,
348 source_of_proficiency_level,
349 line_score,
350 certification_date,
351 certification_method,
352 next_certification_date,
353 comments,
354 attribute_category,
355 attribute1,
356 attribute2,
357 attribute3,
358 attribute4,
362 attribute8,
359 attribute5,
360 attribute6,
361 attribute7,
363 attribute9,
364 attribute10,
365 attribute11,
366 attribute12,
367 attribute13,
368 attribute14,
369 attribute15,
370 attribute16,
371 attribute17,
372 attribute18,
373 attribute19,
374 attribute20,
375 object_id,
376 object_name,
377 party_id -- HR/TCA merge
378 --
379 -- BUG3356369
380 --
381 ,qualification_type_id
382 ,unit_standard_type
383 ,status
384 ,information_category
385 ,information1
386 ,information2
387 ,information3
388 ,information4
389 ,information5
390 ,information6
391 ,information7
392 ,information8
393 ,information9
394 ,information10
395 ,information11
396 ,information12
397 ,information13
398 ,information14
399 ,information15
400 ,information16
401 ,information17
402 ,information18
403 ,information19
404 ,information20
405 ,achieved_date
406 ,appr_line_score
407 from per_competence_elements
408 where competence_element_id = p_competence_element_id
409 for update nowait;
410 --
411 l_proc varchar2(72) := g_package||'lck';
412 --
413 Begin
414 hr_utility.set_location('Entering:'||l_proc, 5);
415 --
416
417 -- Add any mandatory argument checking here:
418 -- Example:
419 -- hr_api.mandatory_arg_error
420 -- (p_api_name => l_proc,
421 -- p_argument => 'object_version_number',
422 -- p_argument_value => p_object_version_number);
423 --
424 Open C_Sel1;
425 Fetch C_Sel1 Into g_old_rec;
426 If C_Sel1%notfound then
427 Close C_Sel1;
428 --
429 -- The primary key is invalid therefore we must error
430
431 --
432 hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
433 hr_utility.raise_error;
434 End If;
435 Close C_Sel1;
436 If (p_object_version_number <> g_old_rec.object_version_number) Then
437 hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
438 hr_utility.raise_error;
439 End If;
440 --
441 hr_utility.set_location(' Leaving:'||l_proc, 10);
442 --
443 -- We need to trap the ORA LOCK exception
444
445 --
446 Exception
447 When HR_Api.Object_Locked then
448 --
449 -- The object is locked therefore we need to supply a meaningful
450 -- error message.
451 --
452 hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
453 hr_utility.set_message_token('TABLE_NAME', 'per_competence_elements');
454 hr_utility.raise_error;
455 End lck;
456 --
457 -- ----------------------------------------------------------------------------
458
459 -- |-----------------------------< convert_args >-----------------------------|
460 -- ----------------------------------------------------------------------------
461 Function convert_args
462 (
463 p_competence_element_id in number,
464 p_object_version_number in number,
465 p_type in varchar2,
466 p_business_group_id in number,
467 p_enterprise_id in number,
468 p_competence_id in number,
469 p_proficiency_level_id in number,
470 p_high_proficiency_level_id in number,
471 p_weighting_level_id in number,
472 p_rating_level_id in number,
473 p_person_id in number,
474 p_job_id in number,
475 p_valid_grade_id in number,
476 p_position_id in number,
477 p_organization_id in number,
478 p_parent_competence_element_id in number,
479 p_activity_version_id in number,
480 p_assessment_id in number,
481 p_assessment_type_id in number,
482 p_mandatory in varchar2,
483 p_effective_date_from in date,
484 p_effective_date_to in date,
485 p_group_competence_type in varchar2,
486 p_competence_type in varchar2,
487 p_normal_elapse_duration in number,
488 p_normal_elapse_duration_unit in varchar2,
489 p_sequence_number in number,
490 p_source_of_proficiency_level in varchar2,
491 p_line_score in number,
492 p_certification_date in date,
493 p_certification_method in varchar2,
494 p_next_certification_date in date,
495 p_comments in varchar2,
496 p_attribute_category in varchar2,
497 p_attribute1 in varchar2,
498 p_attribute2 in varchar2,
499 p_attribute3 in varchar2,
500 p_attribute4 in varchar2,
501 p_attribute5 in varchar2,
502 p_attribute6 in varchar2,
503 p_attribute7 in varchar2,
504 p_attribute8 in varchar2,
505 p_attribute9 in varchar2,
509 p_attribute13 in varchar2,
506 p_attribute10 in varchar2,
507 p_attribute11 in varchar2,
508 p_attribute12 in varchar2,
510 p_attribute14 in varchar2,
511 p_attribute15 in varchar2,
512 p_attribute16 in varchar2,
513 p_attribute17 in varchar2,
514 p_attribute18 in varchar2,
515 p_attribute19 in varchar2,
516 p_attribute20 in varchar2,
517 p_object_id in number,
518 p_object_name in varchar2,
519 p_party_id in number default null -- HR/TCA merge
520 -- BUG3356369
521 ,p_qualification_type_id in number
522 ,p_unit_standard_type in varchar2
523 ,p_status in varchar2
524 ,p_information_category in varchar2
525 ,p_information1 in varchar2
526 ,p_information2 in varchar2
527 ,p_information3 in varchar2
528 ,p_information4 in varchar2
529 ,p_information5 in varchar2
530 ,p_information6 in varchar2
531 ,p_information7 in varchar2
532 ,p_information8 in varchar2
533 ,p_information9 in varchar2
534 ,p_information10 in varchar2
535 ,p_information11 in varchar2
536 ,p_information12 in varchar2
537 ,p_information13 in varchar2
538 ,p_information14 in varchar2
539 ,p_information15 in varchar2
540 ,p_information16 in varchar2
541 ,p_information17 in varchar2
542 ,p_information18 in varchar2
543 ,p_information19 in varchar2
544 ,p_information20 in varchar2
545 ,p_achieved_date in date
546 ,p_appr_line_score in number
547 )
548 Return g_rec_type is
549 --
550
551 l_rec g_rec_type;
552 l_proc varchar2(72) := g_package||'convert_args';
553 --
554 Begin
555 --
556 hr_utility.set_location('Entering:'||l_proc, 5);
557 --
558 -- Convert arguments into local l_rec structure.
559 --
560 l_rec.competence_element_id := p_competence_element_id;
561 l_rec.object_version_number := p_object_version_number;
562 l_rec.type := p_type;
563 l_rec.business_group_id := p_business_group_id;
564 l_rec.enterprise_id := p_enterprise_id;
565 l_rec.competence_id := p_competence_id;
566 l_rec.proficiency_level_id := p_proficiency_level_id;
567 l_rec.high_proficiency_level_id := p_high_proficiency_level_id;
568 l_rec.weighting_level_id := p_weighting_level_id;
569 l_rec.rating_level_id := p_rating_level_id;
570 l_rec.person_id := p_person_id;
571 l_rec.job_id := p_job_id;
572 l_rec.valid_grade_id := p_valid_grade_id;
573 l_rec.position_id := p_position_id;
574 l_rec.organization_id := p_organization_id;
575 l_rec.parent_competence_element_id := p_parent_competence_element_id;
576 l_rec.activity_version_id := p_activity_version_id;
577 l_rec.assessment_id := p_assessment_id;
578 l_rec.assessment_type_id := p_assessment_type_id;
579 l_rec.mandatory := p_mandatory;
580 l_rec.effective_date_from := p_effective_date_from;
581 l_rec.effective_date_to := p_effective_date_to;
582 l_rec.group_competence_type := p_group_competence_type;
583 l_rec.competence_type := p_competence_type;
584 l_rec.normal_elapse_duration := p_normal_elapse_duration;
585 l_rec.normal_elapse_duration_unit := p_normal_elapse_duration_unit;
586 l_rec.sequence_number := p_sequence_number;
587 l_rec.source_of_proficiency_level := p_source_of_proficiency_level;
588 l_rec.line_score := p_line_score;
589 l_rec.certification_date := p_certification_date;
590 l_rec.certification_method := p_certification_method;
591 l_rec.next_certification_date := p_next_certification_date;
592 l_rec.comments := p_comments;
593 l_rec.attribute_category := p_attribute_category;
594 l_rec.attribute1 := p_attribute1;
595 l_rec.attribute2 := p_attribute2;
596 l_rec.attribute3 := p_attribute3;
597 l_rec.attribute4 := p_attribute4;
598 l_rec.attribute5 := p_attribute5;
599 l_rec.attribute6 := p_attribute6;
600 l_rec.attribute7 := p_attribute7;
601 l_rec.attribute8 := p_attribute8;
602 l_rec.attribute9 := p_attribute9;
603 l_rec.attribute10 := p_attribute10;
604 l_rec.attribute11 := p_attribute11;
605 l_rec.attribute12 := p_attribute12;
606 l_rec.attribute13 := p_attribute13;
607 l_rec.attribute14 := p_attribute14;
608 l_rec.attribute15 := p_attribute15;
609 l_rec.attribute16 := p_attribute16;
610 l_rec.attribute17 := p_attribute17;
611 l_rec.attribute18 := p_attribute18;
612 l_rec.attribute19 := p_attribute19;
613 l_rec.attribute20 := p_attribute20;
614 l_rec.object_id := p_object_id;
615 l_rec.object_name := p_object_name;
616 l_rec.party_id := p_party_id; -- HR/TCA merge
617 -- BUG3356369
618 l_rec.qualification_type_id := p_qualification_type_id;
619 l_rec.unit_standard_type := p_unit_standard_type;
620 l_rec.status := p_status;
621 l_rec.information_category := p_information_category;
622 l_rec.information1 := p_information1;
623 l_rec.information2 := p_information2;
624 l_rec.information3 := p_information3;
625 l_rec.information4 := p_information4;
626 l_rec.information5 := p_information5;
627 l_rec.information6 := p_information6;
628 l_rec.information7 := p_information7;
629 l_rec.information8 := p_information8;
630 l_rec.information9 := p_information9;
631 l_rec.information10 := p_information10;
632 l_rec.information11 := p_information11;
633 l_rec.information12 := p_information12;
634 l_rec.information13 := p_information13;
635 l_rec.information14 := p_information14;
636 l_rec.information15 := p_information15;
637 l_rec.information16 := p_information16;
641 l_rec.information20 := p_information20;
638 l_rec.information17 := p_information17;
639 l_rec.information18 := p_information18;
640 l_rec.information19 := p_information19;
642 l_rec.achieved_date := p_achieved_date;
643 l_rec.appr_line_score := p_appr_line_score;
644
645 -- ngundura added object_id and object_name
646 -- Return the plsql record structure.
647 --
648 hr_utility.set_location(' Leaving:'||l_proc, 10);
649 Return(l_rec);
650 --
651 End convert_args;
652 --
653 end per_cel_shd;