DBA Data[Home] [Help]

PACKAGE BODY: APPS.PER_CEL_INS

Source


1 Package Body per_cel_ins as
2 /* $Header: pecelrhi.pkb 120.3.12020000.3 2012/07/05 01:49:58 amnaraya ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |                     Private Global Definitions                           |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package  varchar2(33)	:= '  per_cel_ins.';  -- Global package name
9 --
10 --
11 -- The following global variables are only to be used by
12 -- the set_base_key_value and pre_insert procedures.
13 --
14 g_competence_element_id_i  number   default null;
15 --
16 -- ----------------------------------------------------------------------------
20   (p_competence_element_id  in  number) is
17 -- |------------------------< set_base_key_value >----------------------------|
18 -- ----------------------------------------------------------------------------
19 procedure set_base_key_value
21 --
22   l_proc       varchar2(72) := g_package||'set_base_key_value';
23 --
24 Begin
25   hr_utility.set_location('Entering:'||l_proc, 10);
26   --
27   per_cel_ins.g_competence_element_id_i := p_competence_element_id;
28   --
29   hr_utility.set_location(' Leaving:'||l_proc, 20);
30 End set_base_key_value;
31 --
32 -- ----------------------------------------------------------------------------
33 -- |------------------------------< insert_dml >------------------------------|
34 -- ----------------------------------------------------------------------------
35 -- {Start Of Comments}
36 --
37 -- Description:
38 --   This procedure controls the actual dml insert logic. The processing of
39 --   this procedure are as follows:
40 --   1) Initialise the object_version_number to 1 if the object_version_number
41 --      is defined as an attribute for this entity.
42 --   2) To set and unset the g_api_dml status as required (as we are about to
43 --      perform dml).
44 --   3) To insert the row into the schema.
45 --   4) To trap any constraint violations that may have occurred.
46 --   5) To raise any other errors.
47 --
48 -- Pre Conditions:
49 --   This is an internal private procedure which must be called from the ins
50 --   procedure and must have all mandatory attributes set (except the
51 --   object_version_number which is initialised within this procedure).
52 --
53 -- In Parameters:
54 --   A Pl/Sql record structre.
55 --
56 -- Post Success:
57 --   The specified row will be inserted into the schema.
58 --
59 -- Post Failure:
60 --   On the insert dml failure it is important to note that we always reset the
61 --   g_api_dml status to false.
62 --   If a check, unique or parent integrity constraint violation is raised the
63 --   constraint_error procedure will be called.
64 --   If any other error is reported, the error will be raised after the
65 --   g_api_dml status is reset.
66 --
67 -- Developer Implementation Notes:
68 --   None.
69 --
70 -- Access Status:
71 --   Internal Table Handler Use Only.
72 --
73 -- {End Of Comments}
74 -- ----------------------------------------------------------------------------
75 Procedure insert_dml(p_rec in out nocopy per_cel_shd.g_rec_type) is
76 --
77   l_proc  varchar2(72) := g_package||'insert_dml';
78 --
79 Begin
80   hr_utility.set_location('Entering:'||l_proc, 5);
81   p_rec.object_version_number := 1;  -- Initialise the object version
82   --
83   per_cel_shd.g_api_dml := true;  -- Set the api dml status
84   --
85   -- Insert the row into: per_competence_elements
86   -- ngundura added object_id and object_name in the insert statement
87   insert into per_competence_elements
88   (	competence_element_id,
89 	object_version_number,
90 	type,
91 	business_group_id,
92 	competence_id,
93 	proficiency_level_id,
94 	high_proficiency_level_id,
95 	weighting_level_id,
96 	rating_level_id,
97 	person_id,
98 	job_id,
99 	valid_grade_id,
100 	enterprise_id,
101 	position_id,
102 	organization_id,
103 	parent_competence_element_id,
104 	activity_version_id,
105 	assessment_id,
106 	assessment_type_id,
107 	mandatory,
108 	effective_date_from,
109 	effective_date_to,
110 	group_competence_type,
111 	competence_type,
112 	normal_elapse_duration,
113 	normal_elapse_duration_unit,
114 	sequence_number,
115 	source_of_proficiency_level,
116 	line_score,
117 	certification_date,
118 	certification_method,
119 	next_certification_date,
120 	comments,
121 	attribute_category,
122 	attribute1,
123 	attribute2,
124 	attribute3,
125 	attribute4,
126 	attribute5,
127 	attribute6,
128 	attribute7,
129 	attribute8,
130 	attribute9,
131 	attribute10,
132 	attribute11,
133 	attribute12,
134 	attribute13,
135 	attribute14,
136 	attribute15,
137 	attribute16,
138 	attribute17,
139 	attribute18,
140 	attribute19,
141 	attribute20,
142         object_id,
143         object_name ,
144         party_id, -- HR/TCA merge
145 	qualification_type_id,
146 	unit_standard_type,
147 	status,
148 	information_category,
149 	information1,
150 	information2,
151 	information3,
152 	information4,
153 	information5,
154 	information6,
155 	information7,
156 	information8,
157 	information9,
158 	information10,
159 	information11,
160 	information12,
161 	information13,
162 	information14,
163 	information15,
164 	information16,
165 	information17,
166 	information18,
167 	information19,
168 	information20,
169 	achieved_date,
170         appr_line_score
171   )
172   Values
173   (	p_rec.competence_element_id,
174 	p_rec.object_version_number,
175 	p_rec.type,
176 	p_rec.business_group_id,
177 	p_rec.competence_id,
178 	p_rec.proficiency_level_id,
179 	p_rec.high_proficiency_level_id,
180 	p_rec.weighting_level_id,
181 	p_rec.rating_level_id,
182 	p_rec.person_id,
186 	p_rec.position_id,
183 	p_rec.job_id,
184 	p_rec.valid_grade_id,
185 	p_rec.enterprise_id,
187 	p_rec.organization_id,
188 	p_rec.parent_competence_element_id,
189 	p_rec.activity_version_id,
190 	p_rec.assessment_id,
191 	p_rec.assessment_type_id,
192 	p_rec.mandatory,
193 	p_rec.effective_date_from,
194 	p_rec.effective_date_to,
195 	p_rec.group_competence_type,
196 	p_rec.competence_type,
197 	p_rec.normal_elapse_duration,
198 	p_rec.normal_elapse_duration_unit,
199 	p_rec.sequence_number,
200 	p_rec.source_of_proficiency_level,
201 	p_rec.line_score,
202 	p_rec.certification_date,
203 	p_rec.certification_method,
204 	p_rec.next_certification_date,
205 	p_rec.comments,
206 	p_rec.attribute_category,
207 	p_rec.attribute1,
208 	p_rec.attribute2,
209 	p_rec.attribute3,
210 	p_rec.attribute4,
211 	p_rec.attribute5,
212 	p_rec.attribute6,
213 	p_rec.attribute7,
214 	p_rec.attribute8,
215 	p_rec.attribute9,
216 	p_rec.attribute10,
217 	p_rec.attribute11,
218 	p_rec.attribute12,
219 	p_rec.attribute13,
220 	p_rec.attribute14,
221 	p_rec.attribute15,
222 	p_rec.attribute16,
223 	p_rec.attribute17,
224 	p_rec.attribute18,
225 	p_rec.attribute19,
226 	p_rec.attribute20,
227 	p_rec.object_id,
228 	p_rec.object_name,
229         p_rec.party_id,-- HR/TCA merge
230 	p_rec.qualification_type_id,
231 	p_rec.unit_standard_type,
232 	p_rec.status,
233 	p_rec.information_category,
234 	p_rec.information1,
235 	p_rec.information2,
236 	p_rec.information3,
237 	p_rec.information4,
238 	p_rec.information5,
239 	p_rec.information6,
240 	p_rec.information7,
241 	p_rec.information8,
242 	p_rec.information9,
243 	p_rec.information10,
244 	p_rec.information11,
245 	p_rec.information12,
246 	p_rec.information13,
247 	p_rec.information14,
248 	p_rec.information15,
249 	p_rec.information16,
250 	p_rec.information17,
251 	p_rec.information18,
252 	p_rec.information19,
253 	p_rec.information20,
254 	p_rec.achieved_date,
255         p_rec.appr_line_score
256   );
257   --
258   per_cel_shd.g_api_dml := false;   -- Unset the api dml status
259   --
260   hr_utility.set_location(' Leaving:'||l_proc, 10);
261 Exception
262   When hr_api.check_integrity_violated Then
263     -- A check constraint has been violated
264     per_cel_shd.g_api_dml := false;   -- Unset the api dml status
265     per_cel_shd.constraint_error
266       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
267   When hr_api.parent_integrity_violated Then
268     -- Parent integrity has been violated
269     per_cel_shd.g_api_dml := false;   -- Unset the api dml status
270     per_cel_shd.constraint_error
271       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
272   When hr_api.unique_integrity_violated Then
273     -- Unique integrity has been violated
274     per_cel_shd.g_api_dml := false;   -- Unset the api dml status
275     per_cel_shd.constraint_error
276       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
277   When Others Then
278     per_cel_shd.g_api_dml := false;   -- Unset the api dml status
279     Raise;
280 End insert_dml;
281 --
282 -- ----------------------------------------------------------------------------
283 -- |------------------------------< pre_insert >------------------------------|
284 -- ----------------------------------------------------------------------------
285 -- {Start Of Comments}
286 --
287 -- Description:
288 --   This private procedure contains any processing which is required before
289 --   the insert dml. Presently, if the entity has a corresponding primary
290 --   key which is maintained by an associating sequence, the primary key for
291 --   the entity will be populated with the next sequence value in
292 --   preparation for the insert dml.
293 --
294 -- Pre Conditions:
295 --   This is an internal procedure which is called from the ins procedure.
296 --
297 -- In Parameters:
298 --   A Pl/Sql record structre.
299 --
300 -- Post Success:
301 --   Processing continues.
302 --
303 -- Post Failure:
304 --   If an error has occurred, an error message and exception will be raised
305 --   but not handled.
306 --
307 -- Developer Implementation Notes:
308 --   Any pre-processing required before the insert dml is issued should be
309 --   coded within this procedure. As stated above, a good example is the
310 --   generation of a primary key number via a corresponding sequence.
311 --   It is important to note that any 3rd party maintenance should be reviewed
312 --   before placing in this procedure.
313 --
314 -- Access Status:
315 --   Internal Table Handler Use Only.
316 --
317 -- {End Of Comments}
318 -- ----------------------------------------------------------------------------
319 Procedure pre_insert(p_rec  in out nocopy per_cel_shd.g_rec_type) is
320 --
321   l_proc  varchar2(72) := g_package||'pre_insert';
322   l_exists varchar2(1);
323 --
324   Cursor C_Sel1 is select per_competence_elements_s.nextval from sys.dual;
325 --
326   Cursor C_Sel2 is
327          select null
328                 from per_competence_elements
329                 where competence_element_id = per_cel_ins.g_competence_element_id_i;
330 --
331 Begin
332   hr_utility.set_location('Entering:'||l_proc, 5);
333   --
334   if per_cel_ins.g_competence_element_id_i is not null then
335     --
336     -- Verify registered primary key values not already in use
337     --
338     Open C_Sel2;
339     Fetch C_Sel2 into l_exists;
340     If C_Sel2%found then
341       Close C_Sel2;
342       --
343       -- The primary key values are already in use.
344       --
345       fnd_message.set_name('PER','PER_289391_KEY_ALREADY_USED');
346       fnd_message.set_token('TABLE_NAME','per_competence_elements');
347       fnd_message.raise_error;
348     end if;
349     Close C_Sel2;
350     --
351     -- Use registered key values and clear globals
352     --
353     p_rec.competence_element_id :=
354       per_cel_ins.g_competence_element_id_i;
355     per_cel_ins.g_competence_element_id_i := null;
356     --
357   else
358     --
359     -- Select the next sequence number
360     --
361     Open C_Sel1;
362     Fetch C_Sel1 Into p_rec.competence_element_id;
363     Close C_Sel1;
364     --
365   end if;
366   hr_utility.set_location(' Leaving:'||l_proc, 10);
367 End pre_insert;
368 --
369 -- ----------------------------------------------------------------------------
370 -- |-----------------------------< post_insert >------------------------------|
371 -- ----------------------------------------------------------------------------
372 -- {Start Of Comments}
373 --
374 -- Description:
375 --   This private procedure contains any processing which is required after the
376 --   insert dml.
377 --
378 -- Pre Conditions:
379 --   This is an internal procedure which is called from the ins procedure.
380 --
381 -- In Parameters:
382 --   A Pl/Sql record structre.
383 --
384 -- Post Success:
385 --   Processing continues.
386 --
387 -- Post Failure:
388 --   If an error has occurred, an error message and exception will be raised
389 --   but not handled.
390 --
391 -- Developer Implementation Notes:
392 --   Any post-processing required after the insert dml is issued should be
393 --   coded within this procedure. It is important to note that any 3rd party
394 --   maintenance should be reviewed before placing in this procedure.
395 --
396 -- Access Status:
397 --   Internal Table Handler Use Only.
398 --
399 -- {End Of Comments}
400 -- ----------------------------------------------------------------------------
401 Procedure post_insert(p_rec in per_cel_shd.g_rec_type) is
402 --
403   l_proc  varchar2(72) := g_package||'post_insert';
404 --
405 Begin
406   hr_utility.set_location('Entering:'||l_proc, 5);
407   --
408   -- This is a hook point and the user hook for post_insert is called here.
409   -- ngundura Added object id and name as parameters to per_cel_rki.after_insert
410   begin
411      per_cel_rki.after_insert	(
412       p_competence_element_id        => p_rec.competence_element_id     ,
413       p_business_group_id            => p_rec.business_group_id         ,
414       p_object_version_number        => p_rec.object_version_number     ,
415       p_type                         => p_rec.type                      ,
416       p_competence_id                => p_rec.competence_id             ,
417 --      p_member_competence_set_id     => p_rec.member_competence_set_id  ,
418       p_proficiency_level_id         => p_rec.proficiency_level_id      ,
419       p_high_proficiency_level_id    => p_rec.high_proficiency_level_id ,
420       p_weighting_level_id           => p_rec.weighting_level_id        ,
421       p_rating_level_id              => p_rec.rating_level_id           ,
422       p_person_id                    => p_rec.person_id                 ,
423       p_enterprise_id                => p_rec.enterprise_id             ,
424       p_job_id                       => p_rec.job_id                    ,
425       p_valid_grade_id               => p_rec.valid_grade_id            ,
426       p_position_id                  => p_rec.position_id               ,
427       p_organization_id              => p_rec.organization_id           ,
428 --      p_work_item_id                 => p_rec.work_item_id              ,
429 --      p_competence_set_id            => p_rec.competence_set_id         ,
430       p_parent_competence_element_id => p_rec.parent_competence_element_id,
431       p_activity_version_id          => p_rec.activity_version_id       ,
432       p_assessment_id                => p_rec.assessment_id             ,
433       p_assessment_type_id           => p_rec.assessment_type_id        ,
434       p_mandatory                    => p_rec.mandatory                 ,
435       p_effective_date_from          => p_rec.effective_date_from       ,
436       p_effective_date_to            => p_rec.effective_date_to         ,
437       p_group_competence_type        => p_rec.group_competence_type     ,
438       p_competence_type              => p_rec.competence_type           ,
439       p_sequence_number              => p_rec.sequence_number           ,
443       p_line_score                   => p_rec.line_score                ,
440       p_normal_elapse_duration       => p_rec.normal_elapse_duration    ,
441       p_normal_elapse_duration_unit  => p_rec.normal_elapse_duration_unit ,
442       p_source_of_proficiency_level  => p_rec.source_of_proficiency_level ,
444       p_certification_date           => p_rec.certification_date        ,
445       p_certification_method         => p_rec.certification_method      ,
446       p_next_certification_date      => p_rec.next_certification_date   ,
447       p_comments                     => p_rec.comments                  ,
448       p_attribute_category           => p_rec.attribute_category        ,
449       p_attribute1                   => p_rec.attribute1   ,
450       p_attribute2                   => p_rec.attribute2   ,
451       p_attribute3                   => p_rec.attribute3   ,
452       p_attribute4                   => p_rec.attribute4   ,
453       p_attribute5                   => p_rec.attribute5   ,
454       p_attribute6                   => p_rec.attribute6   ,
455       p_attribute7                   => p_rec.attribute7   ,
456       p_attribute8                   => p_rec.attribute8   ,
457       p_attribute9                   => p_rec.attribute9   ,
458       p_attribute10                  => p_rec.attribute10  ,
459       p_attribute11                  => p_rec.attribute11  ,
460       p_attribute12                  => p_rec.attribute12  ,
461       p_attribute13                  => p_rec.attribute13  ,
462       p_attribute14                  => p_rec.attribute14  ,
463       p_attribute15                  => p_rec.attribute15  ,
464       p_attribute16                  => p_rec.attribute16  ,
465       p_attribute17                  => p_rec.attribute17  ,
466       p_attribute18                  => p_rec.attribute18  ,
467       p_attribute19                  => p_rec.attribute19  ,
468       p_attribute20                  => p_rec.attribute20  ,
469       p_object_id                    => p_rec.object_id    ,
470       p_object_name                  => p_rec.object_name  ,
471       p_party_id                     => p_rec.party_id, -- HR/TCA merge
472       -- BUG3356369
473       p_qualification_type_id        => p_rec.qualification_type_id,
474       p_unit_standard_type           => p_rec.unit_standard_type,
475       p_status                       => p_rec.status,
476       p_information_category         => p_rec.information_category ,
477       p_information1                 => p_rec.information1   ,
478       p_information2                 => p_rec.information2   ,
479       p_information3                 => p_rec.information3   ,
480       p_information4                 => p_rec.information4   ,
481       p_information5                 => p_rec.information5   ,
482       p_information6                 => p_rec.information6   ,
483       p_information7                 => p_rec.information7   ,
484       p_information8                 => p_rec.information8   ,
485       p_information9                 => p_rec.information9   ,
486       p_information10                => p_rec.information10  ,
487       p_information11                => p_rec.information11  ,
488       p_information12                => p_rec.information12  ,
489       p_information13                => p_rec.information13  ,
490       p_information14                => p_rec.information14  ,
491       p_information15                => p_rec.information15  ,
492       p_information16                => p_rec.information16  ,
493       p_information17                => p_rec.information17  ,
494       p_information18                => p_rec.information18  ,
495       p_information19                => p_rec.information19  ,
496       p_information20                => p_rec.information20  ,
497       p_achieved_date                => p_rec.achieved_date  ,
498       p_appr_line_score              => p_rec.appr_line_score
499      );
500      exception
501         when hr_api.cannot_find_prog_unit then
502              hr_api.cannot_find_prog_unit_error
503 		 (	 p_module_name => 'PER_COMPETENCE_ELEMENTS'
504 			,p_hook_type   => 'AI'
505 	        );
506   end;
507   -- End of API User Hook for post_insert.
508   --
509   hr_utility.set_location(' Leaving:'||l_proc, 10);
510 End post_insert;
511 --
512 -- ----------------------------------------------------------------------------
513 -- |---------------------------------< ins >----------------------------------|
514 -- ----------------------------------------------------------------------------
515 Procedure ins
516   (
517   p_rec        in out nocopy per_cel_shd.g_rec_type,
518   p_validate   in     boolean default false,
519   p_effective_date  in Date
520   ) is
521 --
522   l_proc  varchar2(72) := g_package||'ins';
523 --
524 Begin
525   hr_utility.set_location('Entering:'||l_proc, 5);
526   --
527   -- Determine if the business process is to be validated.
528   --
529   If p_validate then
530     --
531     -- Issue the savepoint.
532     --
533     SAVEPOINT ins_per_cel;
534   End If;
535   --
536   -- Call the supporting insert validate operations
537   --
538   per_cel_bus.insert_validate(p_rec,p_effective_date);
539   --
540   -- Call to raise any errors on multi-message list
541   hr_multi_message.end_validation_set;
542   --
543   -- Call the supporting pre-insert operation
544   --
545   pre_insert(p_rec);
546   --
547   -- Insert the row
548   --
549   insert_dml(p_rec);
550   --
551   -- Call the supporting post-insert operation
552   --
553   post_insert(p_rec);
554   --
555   -- Call to raise any errors on multi-message list
556   hr_multi_message.end_validation_set;
557   --
558   -- If we are validating then raise the Validate_Enabled exception
559   --
560   If p_validate then
561     Raise HR_Api.Validate_Enabled;
562   End If;
563   --
564   hr_utility.set_location(' Leaving:'||l_proc, 10);
565 Exception
566   When HR_Api.Validate_Enabled Then
567     --
568     -- As the Validate_Enabled exception has been raised
569     -- we must rollback to the savepoint
570     --
571     ROLLBACK TO ins_per_cel;
572 end ins;
573 --
574 -- ----------------------------------------------------------------------------
575 -- |---------------------------------< ins >----------------------------------|
576 -- ----------------------------------------------------------------------------
577 -- ngundura added object_id and name as parameters to the ins procedure.
578 Procedure ins
579   (
580   p_competence_element_id        out nocopy number,
581   p_object_version_number        out nocopy number,
582   p_type                         in varchar2,
583   p_business_group_id            in number           default null,
584   p_competence_id                in number           default null,
585   p_proficiency_level_id         in number           default null,
586   p_high_proficiency_level_id    in number           default null,
587   p_weighting_level_id           in number           default null,
588   p_rating_level_id              in number           default null,
589   p_person_id                    in number           default null,
590   p_job_id                       in number           default null,
591   p_valid_grade_id		 in number	     default null,
592   p_enterprise_id		 in number	     default null,
593   p_position_id                  in number           default null,
594   p_organization_id              in number           default null,
595   p_parent_competence_element_id in number           default null,
596   p_activity_version_id          in number           default null,
597   p_assessment_id                in number           default null,
598   p_assessment_type_id           in number           default null,
599   p_mandatory 		         in varchar2         default null,
600   p_effective_date_from          in date             default null,
601   p_effective_date_to            in date             default null,
602   p_group_competence_type        in varchar2         default null,
603   p_competence_type              in varchar2         default null,
604   p_normal_elapse_duration       in number           default null,
605   p_normal_elapse_duration_unit  in varchar2         default null,
606   p_sequence_number              in number           default null,
607   p_source_of_proficiency_level  in varchar2         default null,
608   p_line_score                   in number           default null,
609   p_certification_date           in date             default null,
610   p_certification_method         in varchar2         default null,
611   p_next_certification_date      in date             default null,
612   p_comments                     in varchar2         default null,
613   p_attribute_category           in varchar2         default null,
614   p_attribute1                   in varchar2         default null,
615   p_attribute2                   in varchar2         default null,
616   p_attribute3                   in varchar2         default null,
617   p_attribute4                   in varchar2         default null,
618   p_attribute5                   in varchar2         default null,
619   p_attribute6                   in varchar2         default null,
620   p_attribute7                   in varchar2         default null,
621   p_attribute8                   in varchar2         default null,
622   p_attribute9                   in varchar2         default null,
623   p_attribute10                  in varchar2         default null,
624   p_attribute11                  in varchar2         default null,
625   p_attribute12                  in varchar2         default null,
626   p_attribute13                  in varchar2         default null,
627   p_attribute14                  in varchar2         default null,
628   p_attribute15                  in varchar2         default null,
629   p_attribute16                  in varchar2         default null,
630   p_attribute17                  in varchar2         default null,
631   p_attribute18                  in varchar2         default null,
632   p_attribute19                  in varchar2         default null,
633   p_attribute20                  in varchar2         default null,
634   p_effective_date		 in		     date,
635   p_validate                     in boolean   	     default false,
636   p_object_id                    in number           default null,
637   p_object_name                  in varchar2         default null,
638   p_party_id                     in number           default null, -- HR/TCA merge
639   p_qualification_type_id        in number           default null,
640   p_unit_standard_type           in varchar2         default null,
641   p_status                       in varchar2         default null,
642   p_information_category         in varchar2         default null,
643   p_information1                 in varchar2         default null,
644   p_information2                 in varchar2         default null,
645   p_information3                 in varchar2         default null,
646   p_information4                 in varchar2         default null,
647   p_information5                 in varchar2         default null,
648   p_information6                 in varchar2         default null,
649   p_information7                 in varchar2         default null,
650   p_information8                 in varchar2         default null,
651   p_information9                 in varchar2         default null,
652   p_information10                in varchar2         default null,
653   p_information11                in varchar2         default null,
654   p_information12                in varchar2         default null,
655   p_information13                in varchar2         default null,
656   p_information14                in varchar2         default null,
657   p_information15                in varchar2         default null,
658   p_information16                in varchar2         default null,
659   p_information17                in varchar2         default null,
660   p_information18                in varchar2         default null,
661   p_information19                in varchar2         default null,
662   p_information20                in varchar2         default null,
663   p_achieved_date                in date             default null,
664   p_appr_line_score              in number           default null
665   ) is
666 --
667   l_rec	  per_cel_shd.g_rec_type;
668   l_proc  varchar2(72) := g_package||'ins';
669 --
670 Begin
671   hr_utility.set_location('Entering:'||l_proc, 5);
672   --
673   -- Call conversion function to turn arguments into the
674   -- p_rec structure.
675   -- ngundura added object_id and name as parameters to convert_args
676   hr_utility.set_location(p_type,99);
677   l_rec :=
678   per_cel_shd.convert_args
679   (
680   null,
681   null,
682   p_type,
683   p_business_group_id,
684   p_enterprise_id,
685   p_competence_id,
686   p_proficiency_level_id,
687   p_high_proficiency_level_id,
688   p_weighting_level_id,
689   p_rating_level_id,
690   p_person_id,
691   p_job_id,
692   p_valid_grade_id,
693   p_position_id,
694   p_organization_id,
695   p_parent_competence_element_id,
696   p_activity_version_id,
697   p_assessment_id,
698   p_assessment_type_id,
699   p_mandatory,
700   p_effective_date_from,
701   p_effective_date_to,
702   p_group_competence_type,
703   p_competence_type,
704   p_normal_elapse_duration,
705   p_normal_elapse_duration_unit,
706   p_sequence_number,
707   p_source_of_proficiency_level,
708   p_line_score,
709   p_certification_date,
710   p_certification_method,
711   p_next_certification_date,
712   p_comments,
713   p_attribute_category,
714   p_attribute1,
715   p_attribute2,
716   p_attribute3,
717   p_attribute4,
718   p_attribute5,
719   p_attribute6,
720   p_attribute7,
721   p_attribute8,
722   p_attribute9,
723   p_attribute10,
724   p_attribute11,
725   p_attribute12,
726   p_attribute13,
727   p_attribute14,
728   p_attribute15,
729   p_attribute16,
730   p_attribute17,
731   p_attribute18,
732   p_attribute19,
733   p_attribute20,
734   p_object_id,
735   p_object_name,
736   p_party_id, -- HR/TCA merge
737  -- BUG3356369
738   p_qualification_type_id,
739   p_unit_standard_type,
740   p_status,
741   p_information_category,
742   p_information1,
743   p_information2,
744   p_information3,
745   p_information4,
746   p_information5,
747   p_information6,
748   p_information7,
749   p_information8,
750   p_information9,
751   p_information10,
752   p_information11,
753   p_information12,
754   p_information13,
755   p_information14,
756   p_information15,
757   p_information16,
758   p_information17,
759   p_information18,
760   p_information19,
761   p_information20,
762   p_achieved_date,
763   p_appr_line_score
764   );
765   --
766   -- Having converted the arguments into the per_cel_rec
767   -- plsql record structure we call the corresponding record business process.
768   --
769   ins(l_rec, p_validate, p_effective_date);
770   --
771   -- As the primary key argument(s)
772   -- are specified as an OUT's we must set these values.
773   --
774   p_competence_element_id := l_rec.competence_element_id;
775   p_object_version_number := l_rec.object_version_number;
776   --
777   hr_utility.set_location(' Leaving:'||l_proc, 10);
778 End ins;
779 --
780 end per_cel_ins;