[Home] [Help]
PACKAGE BODY: APPS.HR_DEI_INS
Source
1 Package Body hr_dei_ins as
2 /* $Header: hrdeirhi.pkb 120.1.12010000.3 2010/05/20 12:01:59 tkghosh ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- | Private Global Definitions |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package varchar2(33) := ' hr_dei_ins.'; -- Global package name
9 --
10 -- The following global variables are only to be used by
11 -- the set_base_key_value and pre_insert procedures.
12 --
13 g_document_extra_info_id_i number default null;
14 --
15 -- ----------------------------------------------------------------------------
16 -- |------------------------< set_base_key_value >----------------------------|
17 -- ----------------------------------------------------------------------------
18 procedure set_base_key_value
19 (p_document_extra_info_id in number) is
20 --
21 l_proc varchar2(72) := g_package||'set_base_key_value';
22 --
23 Begin
24 hr_utility.set_location('Entering:'||l_proc, 10);
25 --
26 hr_dei_ins.g_document_extra_info_id_i := p_document_extra_info_id;
27 --
28 hr_utility.set_location(' Leaving:'||l_proc, 20);
29 End set_base_key_value;
30 --
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 insert the row into the schema.
43 -- 3) To trap any constraint violations that may have occurred.
44 -- 4) To raise any other errors.
45 --
46 -- Prerequisites:
47 -- This is an internal private procedure which must be called from the ins
48 -- procedure and must have all mandatory attributes set (except the
49 -- object_version_number which is initialised within this procedure).
50 --
51 -- In Parameters:
52 -- A Pl/Sql record structre.
53 --
54 -- Post Success:
55 -- The specified row will be inserted into the schema.
56 --
57 -- Post Failure:
58 -- If a check, unique or parent integrity constraint violation is raised the
59 -- constraint_error procedure will be called.
60 --
61 -- Developer Implementation Notes:
62 -- None.
63 --
64 -- Access Status:
65 -- Internal Row Handler Use Only.
66 --
67 -- {End Of Comments}
68 -- ----------------------------------------------------------------------------
69 Procedure insert_dml
70 (p_rec in out nocopy hr_dei_shd.g_rec_type
71 ) is
72 --
76 hr_utility.set_location('Entering:'||l_proc, 5);
73 l_proc varchar2(72) := g_package||'insert_dml';
74 --
75 Begin
77 p_rec.object_version_number := 1; -- Initialise the object version
78 --
79 --
80 --
81 -- Insert the row into: hr_document_extra_info
82 --
83 insert into hr_document_extra_info
84 (document_extra_info_id
85 ,person_id
86 ,document_type_id
87 ,document_number
88 ,date_from
89 ,date_to
90 ,issued_by
91 ,issued_at
92 ,issued_date
93 ,issuing_authority
94 ,verified_by
95 ,verified_date
96 ,related_object_name
97 ,related_object_id_col
98 ,related_object_id
99 ,dei_attribute_category
100 ,dei_attribute1
101 ,dei_attribute2
102 ,dei_attribute3
103 ,dei_attribute4
104 ,dei_attribute5
105 ,dei_attribute6
106 ,dei_attribute7
107 ,dei_attribute8
108 ,dei_attribute9
109 ,dei_attribute10
110 ,dei_attribute11
111 ,dei_attribute12
112 ,dei_attribute13
113 ,dei_attribute14
114 ,dei_attribute15
115 ,dei_attribute16
116 ,dei_attribute17
117 ,dei_attribute18
118 ,dei_attribute19
119 ,dei_attribute20
120 ,dei_attribute21
121 ,dei_attribute22
122 ,dei_attribute23
123 ,dei_attribute24
124 ,dei_attribute25
125 ,dei_attribute26
126 ,dei_attribute27
127 ,dei_attribute28
128 ,dei_attribute29
129 ,dei_attribute30
130 ,dei_information_category
131 ,dei_information1
132 ,dei_information2
133 ,dei_information3
134 ,dei_information4
135 ,dei_information5
136 ,dei_information6
137 ,dei_information7
138 ,dei_information8
139 ,dei_information9
140 ,dei_information10
141 ,dei_information11
142 ,dei_information12
143 ,dei_information13
144 ,dei_information14
145 ,dei_information15
146 ,dei_information16
147 ,dei_information17
148 ,dei_information18
149 ,dei_information19
150 ,dei_information20
151 ,dei_information21
152 ,dei_information22
153 ,dei_information23
154 ,dei_information24
155 ,dei_information25
156 ,dei_information26
157 ,dei_information27
158 ,dei_information28
159 ,dei_information29
160 ,dei_information30
161 ,request_id
162 ,program_application_id
163 ,program_id
164 ,program_update_date
165 ,object_version_number
166 )
167 Values
168 (p_rec.document_extra_info_id
169 ,p_rec.person_id
170 ,p_rec.document_type_id
171 ,p_rec.document_number
172 ,p_rec.date_from
173 ,p_rec.date_to
174 ,p_rec.issued_by
175 ,p_rec.issued_at
176 ,p_rec.issued_date
177 ,p_rec.issuing_authority
178 ,p_rec.verified_by
179 ,p_rec.verified_date
180 ,p_rec.related_object_name
181 ,p_rec.related_object_id_col
182 ,p_rec.related_object_id
183 ,p_rec.dei_attribute_category
184 ,p_rec.dei_attribute1
185 ,p_rec.dei_attribute2
186 ,p_rec.dei_attribute3
187 ,p_rec.dei_attribute4
188 ,p_rec.dei_attribute5
189 ,p_rec.dei_attribute6
190 ,p_rec.dei_attribute7
191 ,p_rec.dei_attribute8
192 ,p_rec.dei_attribute9
193 ,p_rec.dei_attribute10
194 ,p_rec.dei_attribute11
195 ,p_rec.dei_attribute12
196 ,p_rec.dei_attribute13
197 ,p_rec.dei_attribute14
198 ,p_rec.dei_attribute15
199 ,p_rec.dei_attribute16
200 ,p_rec.dei_attribute17
201 ,p_rec.dei_attribute18
202 ,p_rec.dei_attribute19
203 ,p_rec.dei_attribute20
204 ,p_rec.dei_attribute21
205 ,p_rec.dei_attribute22
206 ,p_rec.dei_attribute23
207 ,p_rec.dei_attribute24
208 ,p_rec.dei_attribute25
209 ,p_rec.dei_attribute26
210 ,p_rec.dei_attribute27
211 ,p_rec.dei_attribute28
212 ,p_rec.dei_attribute29
213 ,p_rec.dei_attribute30
214 ,p_rec.dei_information_category
215 ,p_rec.dei_information1
216 ,p_rec.dei_information2
217 ,p_rec.dei_information3
218 ,p_rec.dei_information4
219 ,p_rec.dei_information5
220 ,p_rec.dei_information6
221 ,p_rec.dei_information7
222 ,p_rec.dei_information8
223 ,p_rec.dei_information9
224 ,p_rec.dei_information10
225 ,p_rec.dei_information11
226 ,p_rec.dei_information12
227 ,p_rec.dei_information13
228 ,p_rec.dei_information14
229 ,p_rec.dei_information15
230 ,p_rec.dei_information16
231 ,p_rec.dei_information17
232 ,p_rec.dei_information18
233 ,p_rec.dei_information19
234 ,p_rec.dei_information20
235 ,p_rec.dei_information21
236 ,p_rec.dei_information22
237 ,p_rec.dei_information23
238 ,p_rec.dei_information24
239 ,p_rec.dei_information25
240 ,p_rec.dei_information26
241 ,p_rec.dei_information27
242 ,p_rec.dei_information28
243 ,p_rec.dei_information29
244 ,p_rec.dei_information30
245 ,p_rec.request_id
246 ,p_rec.program_application_id
247 ,p_rec.program_id
248 ,p_rec.program_update_date
249 ,p_rec.object_version_number
250 );
251 --
252 --
253 --
254 hr_utility.set_location(' Leaving:'||l_proc, 10);
258 --
255 Exception
256 When hr_api.check_integrity_violated Then
257 -- A check constraint has been violated
259 hr_dei_shd.constraint_error
260 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
261 When hr_api.parent_integrity_violated Then
262 -- Parent integrity has been violated
263 --
264 hr_dei_shd.constraint_error
265 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
266 When hr_api.unique_integrity_violated Then
267 -- Unique integrity has been violated
268 --
269 hr_dei_shd.constraint_error
270 (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
271 When Others Then
272 --
273 Raise;
274 End insert_dml;
275 --
276 -- ----------------------------------------------------------------------------
277 -- |------------------------------< pre_insert >------------------------------|
278 -- ----------------------------------------------------------------------------
279 -- {Start Of Comments}
280 --
281 -- Description:
282 -- This private procedure contains any processing which is required before
283 -- the insert dml. Presently, if the entity has a corresponding primary
284 -- key which is maintained by an associating sequence, the primary key for
285 -- the entity will be populated with the next sequence value in
286 -- preparation for the insert dml.
287 --
288 -- Prerequisites:
289 -- This is an internal procedure which is called from the ins procedure.
290 --
291 -- In Parameters:
292 -- A Pl/Sql record structure.
293 --
294 -- Post Success:
295 -- Processing continues.
296 --
297 -- Post Failure:
298 -- If an error has occurred, an error message and exception will be raised
299 -- but not handled.
300 --
301 -- Developer Implementation Notes:
302 -- Any pre-processing required before the insert dml is issued should be
303 -- coded within this procedure. As stated above, a good example is the
304 -- generation of a primary key number via a corresponding sequence.
305 -- It is important to note that any 3rd party maintenance should be reviewed
306 -- before placing in this procedure.
307 --
308 -- Access Status:
309 -- Internal Row Handler Use Only.
310 --
311 -- {End Of Comments}
312 -- ----------------------------------------------------------------------------
313 Procedure pre_insert
314 (p_rec in out nocopy hr_dei_shd.g_rec_type
315 ) is
316 --
317 Cursor C_Sel1 is select hr_document_extra_info_s.nextval from sys.dual;
318 --
319 Cursor C_Sel2 is
320 Select null
321 from hr_document_extra_info
322 where document_extra_info_id =
323 hr_dei_ins.g_document_extra_info_id_i;
324 --
325 l_proc varchar2(72) := g_package||'pre_insert';
326 l_exists varchar2(1);
327 --
328 Begin
329 hr_utility.set_location('Entering:'||l_proc, 5);
330 --
331 If (hr_dei_ins.g_document_extra_info_id_i is not null) Then
332 --
333 -- Verify registered primary key values not already in use
334 --
335 Open C_Sel2;
336 Fetch C_Sel2 into l_exists;
337 If C_Sel2%found Then
338 Close C_Sel2;
339 --
340 -- The primary key values are already in use.
341 --
342 fnd_message.set_name('PER','PER_289391_KEY_ALREADY_USED');
343 fnd_message.set_token('TABLE_NAME','hr_document_extra_info');
344 fnd_message.raise_error;
345 End If;
346 Close C_Sel2;
347 --
348 -- Use registered key values and clear globals
349 --
350 p_rec.document_extra_info_id :=
351 hr_dei_ins.g_document_extra_info_id_i;
352 hr_dei_ins.g_document_extra_info_id_i := null;
353 Else
354 --
355 -- No registerd key values, so select the next sequence number
356 --
357 --
358 -- Select the next sequence number
359 --
360 Open C_Sel1;
361 Fetch C_Sel1 Into p_rec.document_extra_info_id;
362 Close C_Sel1;
363 End If;
364 --
365 hr_utility.set_location(' Leaving:'||l_proc, 10);
366 End pre_insert;
367 --
368 -- ----------------------------------------------------------------------------
369 -- |-----------------------------< post_insert >------------------------------|
370 -- ----------------------------------------------------------------------------
371 -- {Start Of Comments}
372 --
373 -- Description:
374 -- This private procedure contains any processing which is required after
375 -- the insert dml.
376 --
377 -- Prerequisites:
378 -- This is an internal procedure which is called from the ins procedure.
379 --
380 -- In Parameters:
381 -- A Pl/Sql record structre.
382 --
383 -- Post Success:
384 -- Processing continues.
385 --
386 -- Post Failure:
387 -- If an error has occurred, an error message and exception will be raised
388 -- but not handled.
389 --
390 -- Developer Implementation Notes:
391 -- Any post-processing required after the insert dml is issued should be
392 -- coded within this procedure. It is important to note that any 3rd party
393 -- maintenance should be reviewed before placing in this procedure.
394 --
395 -- Access Status:
396 -- Internal Row Handler Use Only.
397 --
398 -- {End Of Comments}
399 -- ----------------------------------------------------------------------------
400 Procedure post_insert
401 (p_rec in hr_dei_shd.g_rec_type
402 ) is
403 --
404 l_proc varchar2(72) := g_package||'post_insert';
405 --
406 Begin
407 hr_utility.set_location('Entering:'||l_proc, 5);
408 begin
409 --
410 hr_dei_rki.after_insert
414 => p_rec.person_id
411 (p_document_extra_info_id
412 => p_rec.document_extra_info_id
413 ,p_person_id
415 ,p_document_type_id
416 => p_rec.document_type_id
417 ,p_document_number
418 => p_rec.document_number
419 ,p_date_from
420 => p_rec.date_from
421 ,p_date_to
422 => p_rec.date_to
423 ,p_issued_by
424 => p_rec.issued_by
425 ,p_issued_at
426 => p_rec.issued_at
427 ,p_issued_date
428 => p_rec.issued_date
429 ,p_issuing_authority
430 => p_rec.issuing_authority
431 ,p_verified_by
432 => p_rec.verified_by
433 ,p_verified_date
434 => p_rec.verified_date
435 ,p_related_object_name
436 => p_rec.related_object_name
437 ,p_related_object_id_col
438 => p_rec.related_object_id_col
439 ,p_related_object_id
440 => p_rec.related_object_id
441 ,p_dei_attribute_category
442 => p_rec.dei_attribute_category
443 ,p_dei_attribute1
444 => p_rec.dei_attribute1
445 ,p_dei_attribute2
446 => p_rec.dei_attribute2
447 ,p_dei_attribute3
448 => p_rec.dei_attribute3
449 ,p_dei_attribute4
450 => p_rec.dei_attribute4
451 ,p_dei_attribute5
452 => p_rec.dei_attribute5
453 ,p_dei_attribute6
454 => p_rec.dei_attribute6
455 ,p_dei_attribute7
456 => p_rec.dei_attribute7
457 ,p_dei_attribute8
458 => p_rec.dei_attribute8
459 ,p_dei_attribute9
460 => p_rec.dei_attribute9
461 ,p_dei_attribute10
462 => p_rec.dei_attribute10
463 ,p_dei_attribute11
464 => p_rec.dei_attribute11
465 ,p_dei_attribute12
466 => p_rec.dei_attribute12
467 ,p_dei_attribute13
468 => p_rec.dei_attribute13
469 ,p_dei_attribute14
470 => p_rec.dei_attribute14
471 ,p_dei_attribute15
472 => p_rec.dei_attribute15
473 ,p_dei_attribute16
474 => p_rec.dei_attribute16
475 ,p_dei_attribute17
476 => p_rec.dei_attribute17
477 ,p_dei_attribute18
478 => p_rec.dei_attribute18
479 ,p_dei_attribute19
480 => p_rec.dei_attribute19
481 ,p_dei_attribute20
482 => p_rec.dei_attribute20
483 ,p_dei_attribute21
484 => p_rec.dei_attribute21
485 ,p_dei_attribute22
486 => p_rec.dei_attribute22
487 ,p_dei_attribute23
488 => p_rec.dei_attribute23
489 ,p_dei_attribute24
490 => p_rec.dei_attribute24
491 ,p_dei_attribute25
492 => p_rec.dei_attribute25
493 ,p_dei_attribute26
494 => p_rec.dei_attribute26
495 ,p_dei_attribute27
496 => p_rec.dei_attribute27
497 ,p_dei_attribute28
498 => p_rec.dei_attribute28
499 ,p_dei_attribute29
500 => p_rec.dei_attribute29
501 ,p_dei_attribute30
502 => p_rec.dei_attribute30
503 ,p_dei_information_category
504 => p_rec.dei_information_category
505 ,p_dei_information1
506 => p_rec.dei_information1
507 ,p_dei_information2
508 => p_rec.dei_information2
509 ,p_dei_information3
510 => p_rec.dei_information3
511 ,p_dei_information4
512 => p_rec.dei_information4
513 ,p_dei_information5
514 => p_rec.dei_information5
515 ,p_dei_information6
516 => p_rec.dei_information6
517 ,p_dei_information7
518 => p_rec.dei_information7
519 ,p_dei_information8
520 => p_rec.dei_information8
521 ,p_dei_information9
522 => p_rec.dei_information9
523 ,p_dei_information10
524 => p_rec.dei_information10
525 ,p_dei_information11
526 => p_rec.dei_information11
527 ,p_dei_information12
528 => p_rec.dei_information12
529 ,p_dei_information13
530 => p_rec.dei_information13
531 ,p_dei_information14
532 => p_rec.dei_information14
533 ,p_dei_information15
534 => p_rec.dei_information15
535 ,p_dei_information16
536 => p_rec.dei_information16
537 ,p_dei_information17
538 => p_rec.dei_information17
539 ,p_dei_information18
540 => p_rec.dei_information18
541 ,p_dei_information19
542 => p_rec.dei_information19
543 ,p_dei_information20
544 => p_rec.dei_information20
545 ,p_dei_information21
546 => p_rec.dei_information21
547 ,p_dei_information22
548 => p_rec.dei_information22
549 ,p_dei_information23
550 => p_rec.dei_information23
551 ,p_dei_information24
552 => p_rec.dei_information24
553 ,p_dei_information25
554 => p_rec.dei_information25
555 ,p_dei_information26
556 => p_rec.dei_information26
557 ,p_dei_information27
558 => p_rec.dei_information27
559 ,p_dei_information28
560 => p_rec.dei_information28
561 ,p_dei_information29
562 => p_rec.dei_information29
563 ,p_dei_information30
564 => p_rec.dei_information30
565 ,p_request_id
566 => p_rec.request_id
567 ,p_program_application_id
568 => p_rec.program_application_id
569 ,p_program_id
570 => p_rec.program_id
571 ,p_program_update_date
572 => p_rec.program_update_date
573 ,p_object_version_number
574 => p_rec.object_version_number
575 );
576 --
577 exception
578 --
582 (p_module_name => 'HR_DOCUMENT_EXTRA_INFO'
579 when hr_api.cannot_find_prog_unit then
580 --
581 hr_api.cannot_find_prog_unit_error
583 ,p_hook_type => 'AI');
584 --
585 end;
586 --
587 hr_utility.set_location(' Leaving:'||l_proc, 10);
588 End post_insert;
589 --
590 -- ----------------------------------------------------------------------------
591 -- |---------------------------------< ins >----------------------------------|
592 -- ----------------------------------------------------------------------------
593 Procedure ins
594 (p_rec in out nocopy hr_dei_shd.g_rec_type
595 ) is
596 --
597 l_proc varchar2(72) := g_package||'ins';
598 --
599 Begin
600 hr_utility.set_location('Entering:'||l_proc, 5);
601 --
602 -- Call the supporting insert validate operations
603 --
604 hr_dei_bus.insert_validate
605 (p_rec
606 );
607 --
608 -- Call to raise any errors on multi-message list
609 hr_multi_message.end_validation_set;
610 --
611 -- Call the supporting pre-insert operation
612 --
613 hr_dei_ins.pre_insert(p_rec);
614 --
615 -- Insert the row
616 --
617 hr_dei_ins.insert_dml(p_rec);
618 --
619 -- Call the supporting post-insert operation
620 --
621 hr_dei_ins.post_insert
622 (p_rec
623 );
624 --
625 -- Call to raise any errors on multi-message list
626 hr_multi_message.end_validation_set;
627 --
628 hr_utility.set_location('Leaving:'||l_proc, 20);
629 end ins;
630 --
631 -- ----------------------------------------------------------------------------
632 -- |---------------------------------< ins >----------------------------------|
633 -- ----------------------------------------------------------------------------
634 Procedure ins
635 (p_person_id in number
636 ,p_document_type_id in number
637 ,p_date_from in date
638 ,p_date_to in date
639 ,p_document_number in varchar2 default null
640 ,p_issued_by in varchar2 default null
641 ,p_issued_at in varchar2 default null
642 ,p_issued_date in date default null
643 ,p_issuing_authority in varchar2 default null
644 ,p_verified_by in number default null
645 ,p_verified_date in date default null
646 ,p_related_object_name in varchar2 default null
647 ,p_related_object_id_col in varchar2 default null
648 ,p_related_object_id in number default null
649 ,p_dei_attribute_category in varchar2 default null
650 ,p_dei_attribute1 in varchar2 default null
651 ,p_dei_attribute2 in varchar2 default null
652 ,p_dei_attribute3 in varchar2 default null
653 ,p_dei_attribute4 in varchar2 default null
654 ,p_dei_attribute5 in varchar2 default null
655 ,p_dei_attribute6 in varchar2 default null
656 ,p_dei_attribute7 in varchar2 default null
657 ,p_dei_attribute8 in varchar2 default null
658 ,p_dei_attribute9 in varchar2 default null
659 ,p_dei_attribute10 in varchar2 default null
660 ,p_dei_attribute11 in varchar2 default null
661 ,p_dei_attribute12 in varchar2 default null
662 ,p_dei_attribute13 in varchar2 default null
663 ,p_dei_attribute14 in varchar2 default null
664 ,p_dei_attribute15 in varchar2 default null
665 ,p_dei_attribute16 in varchar2 default null
666 ,p_dei_attribute17 in varchar2 default null
667 ,p_dei_attribute18 in varchar2 default null
668 ,p_dei_attribute19 in varchar2 default null
669 ,p_dei_attribute20 in varchar2 default null
670 ,p_dei_attribute21 in varchar2 default null
671 ,p_dei_attribute22 in varchar2 default null
672 ,p_dei_attribute23 in varchar2 default null
673 ,p_dei_attribute24 in varchar2 default null
674 ,p_dei_attribute25 in varchar2 default null
675 ,p_dei_attribute26 in varchar2 default null
676 ,p_dei_attribute27 in varchar2 default null
677 ,p_dei_attribute28 in varchar2 default null
678 ,p_dei_attribute29 in varchar2 default null
679 ,p_dei_attribute30 in varchar2 default null
680 ,p_dei_information_category in varchar2 default null
681 ,p_dei_information1 in varchar2 default null
682 ,p_dei_information2 in varchar2 default null
683 ,p_dei_information3 in varchar2 default null
684 ,p_dei_information4 in varchar2 default null
685 ,p_dei_information5 in varchar2 default null
686 ,p_dei_information6 in varchar2 default null
687 ,p_dei_information7 in varchar2 default null
688 ,p_dei_information8 in varchar2 default null
689 ,p_dei_information9 in varchar2 default null
690 ,p_dei_information10 in varchar2 default null
691 ,p_dei_information11 in varchar2 default null
692 ,p_dei_information12 in varchar2 default null
693 ,p_dei_information13 in varchar2 default null
694 ,p_dei_information14 in varchar2 default null
695 ,p_dei_information15 in varchar2 default null
696 ,p_dei_information16 in varchar2 default null
697 ,p_dei_information17 in varchar2 default null
698 ,p_dei_information18 in varchar2 default null
699 ,p_dei_information19 in varchar2 default null
700 ,p_dei_information20 in varchar2 default null
701 ,p_dei_information21 in varchar2 default null
702 ,p_dei_information22 in varchar2 default null
703 ,p_dei_information23 in varchar2 default null
704 ,p_dei_information24 in varchar2 default null
705 ,p_dei_information25 in varchar2 default null
706 ,p_dei_information26 in varchar2 default null
707 ,p_dei_information27 in varchar2 default null
708 ,p_dei_information28 in varchar2 default null
709 ,p_dei_information29 in varchar2 default null
710 ,p_dei_information30 in varchar2 default null
711 ,p_request_id in number default null
712 ,p_program_application_id in number default null
713 ,p_program_id in number default null
714 ,p_program_update_date in date default null
715 ,p_document_extra_info_id out nocopy number
716 ,p_object_version_number out nocopy number
717 ) is
718 --
719 l_rec hr_dei_shd.g_rec_type;
720 l_proc varchar2(72) := g_package||'ins';
721 --
722 Begin
723 hr_utility.set_location('Entering:'||l_proc, 5);
724 --
725 -- Call conversion function to turn arguments into the
726 -- p_rec structure.
727 --
728 l_rec :=
729 hr_dei_shd.convert_args
730 (null
731 ,p_person_id
732 ,p_document_type_id
733 ,p_document_number
734 ,p_date_from
735 ,p_date_to
736 ,p_issued_by
737 ,p_issued_at
738 ,p_issued_date
739 ,p_issuing_authority
740 ,p_verified_by
741 ,p_verified_date
742 ,p_related_object_name
743 ,p_related_object_id_col
744 ,p_related_object_id
745 ,p_dei_attribute_category
746 ,p_dei_attribute1
747 ,p_dei_attribute2
748 ,p_dei_attribute3
749 ,p_dei_attribute4
750 ,p_dei_attribute5
751 ,p_dei_attribute6
752 ,p_dei_attribute7
753 ,p_dei_attribute8
754 ,p_dei_attribute9
755 ,p_dei_attribute10
756 ,p_dei_attribute11
757 ,p_dei_attribute12
758 ,p_dei_attribute13
759 ,p_dei_attribute14
760 ,p_dei_attribute15
761 ,p_dei_attribute16
762 ,p_dei_attribute17
763 ,p_dei_attribute18
764 ,p_dei_attribute19
765 ,p_dei_attribute20
766 ,p_dei_attribute21
767 ,p_dei_attribute22
768 ,p_dei_attribute23
769 ,p_dei_attribute24
770 ,p_dei_attribute25
771 ,p_dei_attribute26
772 ,p_dei_attribute27
773 ,p_dei_attribute28
774 ,p_dei_attribute29
775 ,p_dei_attribute30
776 ,p_dei_information_category
777 ,p_dei_information1
778 ,p_dei_information2
779 ,p_dei_information3
780 ,p_dei_information4
781 ,p_dei_information5
782 ,p_dei_information6
783 ,p_dei_information7
784 ,p_dei_information8
785 ,p_dei_information9
786 ,p_dei_information10
787 ,p_dei_information11
788 ,p_dei_information12
789 ,p_dei_information13
790 ,p_dei_information14
791 ,p_dei_information15
792 ,p_dei_information16
793 ,p_dei_information17
794 ,p_dei_information18
795 ,p_dei_information19
796 ,p_dei_information20
797 ,p_dei_information21
798 ,p_dei_information22
799 ,p_dei_information23
800 ,p_dei_information24
801 ,p_dei_information25
802 ,p_dei_information26
803 ,p_dei_information27
804 ,p_dei_information28
805 ,p_dei_information29
806 ,p_dei_information30
807 ,p_request_id
808 ,p_program_application_id
809 ,p_program_id
810 ,p_program_update_date
811 ,null
812 );
813 --
814 -- Having converted the arguments into the hr_dei_rec
815 -- plsql record structure we call the corresponding record business process.
816 --
817 hr_dei_ins.ins
818 (l_rec
819 );
820 --
821 -- As the primary key argument(s)
822 -- are specified as an OUT's we must set these values.
823 --
824 p_document_extra_info_id := l_rec.document_extra_info_id;
825 p_object_version_number := l_rec.object_version_number;
826 --
827 hr_utility.set_location(' Leaving:'||l_proc, 10);
828 End ins;
829 --
830 end hr_dei_ins;