DBA Data[Home] [Help]
Skip to content

PACKAGE BODY: APPS.HR_DEI_UPD

Source


1 Package Body hr_dei_upd 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_upd.';  -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |------------------------------< update_dml >------------------------------|
12 -- ----------------------------------------------------------------------------
13 -- {Start Of Comments}
14 --
15 -- Description:
16 --   This procedure controls the actual dml update logic. The processing of
17 --   this procedure is:
18 --   1) Increment the object_version_number by 1 if the object_version_number
19 --      is defined as an attribute for this entity.
20 --   2) To update the specified row in the schema using the primary key in
21 --      the predicates.
22 --   3) To trap any constraint violations that may have occurred.
23 --   4) To raise any other errors.
24 --
25 -- Prerequisites:
26 --   This is an internal private procedure which must be called from the upd
27 --   procedure.
28 --
29 -- In Parameters:
30 --   A Pl/Sql record structre.
31 --
32 -- Post Success:
33 --   The specified row will be updated in the schema.
34 --
35 -- Post Failure:
36 --   If a check, unique or parent integrity constraint violation is raised the
37 --   constraint_error procedure will be called.
38 --
39 -- Developer Implementation Notes:
40 --   The update 'set' attribute list should be modified if any of your
41 --   attributes are not updateable.
42 --
43 -- Access Status:
44 --   Internal Row Handler Use Only.
45 --
46 -- {End Of Comments}
47 -- ----------------------------------------------------------------------------
48 Procedure update_dml
49   (p_rec in out nocopy hr_dei_shd.g_rec_type
50   ) is
51 --
52   l_proc  varchar2(72) := g_package||'update_dml';
53 --
54 Begin
55   hr_utility.set_location('Entering:'||l_proc, 5);
56   --
57   -- Increment the object version
58   p_rec.object_version_number := p_rec.object_version_number + 1;
59   --
60   --
61   --
62   -- Update the hr_document_extra_info Row
63   --
64   update hr_document_extra_info
65     set
66      document_extra_info_id          = p_rec.document_extra_info_id
67     ,document_type_id                = p_rec.document_type_id
68     ,document_number                 = p_rec.document_number
69     ,date_from                       = p_rec.date_from
70     ,date_to                         = p_rec.date_to
71     ,issued_by                       = p_rec.issued_by
72     ,issued_at                       = p_rec.issued_at
73     ,issued_date                     = p_rec.issued_date
74     ,issuing_authority               = p_rec.issuing_authority
75     ,verified_by                     = p_rec.verified_by
76     ,verified_date                   = p_rec.verified_date
77     ,related_object_name             = p_rec.related_object_name
78     ,related_object_id_col           = p_rec.related_object_id_col
79     ,related_object_id               = p_rec.related_object_id
80     ,dei_attribute_category          = p_rec.dei_attribute_category
81     ,dei_attribute1                  = p_rec.dei_attribute1
82     ,dei_attribute2                  = p_rec.dei_attribute2
83     ,dei_attribute3                  = p_rec.dei_attribute3
84     ,dei_attribute4                  = p_rec.dei_attribute4
85     ,dei_attribute5                  = p_rec.dei_attribute5
86     ,dei_attribute6                  = p_rec.dei_attribute6
87     ,dei_attribute7                  = p_rec.dei_attribute7
88     ,dei_attribute8                  = p_rec.dei_attribute8
89     ,dei_attribute9                  = p_rec.dei_attribute9
90     ,dei_attribute10                 = p_rec.dei_attribute10
91     ,dei_attribute11                 = p_rec.dei_attribute11
92     ,dei_attribute12                 = p_rec.dei_attribute12
93     ,dei_attribute13                 = p_rec.dei_attribute13
94     ,dei_attribute14                 = p_rec.dei_attribute14
95     ,dei_attribute15                 = p_rec.dei_attribute15
96     ,dei_attribute16                 = p_rec.dei_attribute16
97     ,dei_attribute17                 = p_rec.dei_attribute17
98     ,dei_attribute18                 = p_rec.dei_attribute18
99     ,dei_attribute19                 = p_rec.dei_attribute19
100     ,dei_attribute20                 = p_rec.dei_attribute20
101     ,dei_attribute21                 = p_rec.dei_attribute21
102     ,dei_attribute22                 = p_rec.dei_attribute22
103     ,dei_attribute23                 = p_rec.dei_attribute23
104     ,dei_attribute24                 = p_rec.dei_attribute24
105     ,dei_attribute25                 = p_rec.dei_attribute25
106     ,dei_attribute26                 = p_rec.dei_attribute26
107     ,dei_attribute27                 = p_rec.dei_attribute27
108     ,dei_attribute28                 = p_rec.dei_attribute28
109     ,dei_attribute29                 = p_rec.dei_attribute29
110     ,dei_attribute30                 = p_rec.dei_attribute30
111     ,dei_information_category        = p_rec.dei_information_category
112     ,dei_information1                = p_rec.dei_information1
113     ,dei_information2                = p_rec.dei_information2
114     ,dei_information3                = p_rec.dei_information3
115     ,dei_information4                = p_rec.dei_information4
116     ,dei_information5                = p_rec.dei_information5
117     ,dei_information6                = p_rec.dei_information6
118     ,dei_information7                = p_rec.dei_information7
119     ,dei_information8                = p_rec.dei_information8
120     ,dei_information9                = p_rec.dei_information9
121     ,dei_information10               = p_rec.dei_information10
122     ,dei_information11               = p_rec.dei_information11
123     ,dei_information12               = p_rec.dei_information12
124     ,dei_information13               = p_rec.dei_information13
125     ,dei_information14               = p_rec.dei_information14
126     ,dei_information15               = p_rec.dei_information15
127     ,dei_information16               = p_rec.dei_information16
128     ,dei_information17               = p_rec.dei_information17
129     ,dei_information18               = p_rec.dei_information18
130     ,dei_information19               = p_rec.dei_information19
131     ,dei_information20               = p_rec.dei_information20
132     ,dei_information21               = p_rec.dei_information21
133     ,dei_information22               = p_rec.dei_information22
134     ,dei_information23               = p_rec.dei_information23
135     ,dei_information24               = p_rec.dei_information24
136     ,dei_information25               = p_rec.dei_information25
137     ,dei_information26               = p_rec.dei_information26
138     ,dei_information27               = p_rec.dei_information27
139     ,dei_information28               = p_rec.dei_information28
140     ,dei_information29               = p_rec.dei_information29
141     ,dei_information30               = p_rec.dei_information30
142     ,request_id                      = p_rec.request_id
143     ,program_application_id          = p_rec.program_application_id
144     ,program_id                      = p_rec.program_id
145     ,program_update_date             = p_rec.program_update_date
146     ,object_version_number           = p_rec.object_version_number
147     where document_extra_info_id = p_rec.document_extra_info_id;
148   --
149   --
150   --
151   hr_utility.set_location(' Leaving:'||l_proc, 10);
152 --
153 Exception
154   When hr_api.check_integrity_violated Then
155     -- A check constraint has been violated
156     --
157     hr_dei_shd.constraint_error
158       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
159   When hr_api.parent_integrity_violated Then
160     -- Parent integrity has been violated
161     --
162     hr_dei_shd.constraint_error
163       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
164   When hr_api.unique_integrity_violated Then
165     -- Unique integrity has been violated
166     --
167     hr_dei_shd.constraint_error
168       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
169   When Others Then
170     --
171     Raise;
172 End update_dml;
173 --
174 -- ----------------------------------------------------------------------------
175 -- |------------------------------< pre_update >------------------------------|
176 -- ----------------------------------------------------------------------------
177 -- {Start Of Comments}
178 --
179 -- Description:
180 --   This private procedure contains any processing which is required before
181 --   the update dml.
182 --
183 -- Prerequisites:
184 --   This is an internal procedure which is called from the upd procedure.
185 --
186 -- In Parameters:
187 --   A Pl/Sql record structure.
188 --
189 -- Post Success:
190 --   Processing continues.
191 --
192 -- Post Failure:
193 --   If an error has occurred, an error message and exception wil be raised
194 --   but not handled.
195 --
196 -- Developer Implementation Notes:
197 --   Any pre-processing required before the update dml is issued should be
198 --   coded within this procedure. It is important to note that any 3rd party
199 --   maintenance should be reviewed before placing in this procedure.
200 --
201 -- Access Status:
202 --   Internal Row Handler Use Only.
203 --
204 -- {End Of Comments}
205 -- ----------------------------------------------------------------------------
206 Procedure pre_update
207   (p_rec in hr_dei_shd.g_rec_type
208   ) is
209 --
210   l_proc  varchar2(72) := g_package||'pre_update';
211 --
212 Begin
213   hr_utility.set_location('Entering:'||l_proc, 5);
214   --
215   hr_utility.set_location(' Leaving:'||l_proc, 10);
216 End pre_update;
217 --
218 -- ----------------------------------------------------------------------------
219 -- |-----------------------------< post_update >------------------------------|
220 -- ----------------------------------------------------------------------------
221 -- {Start Of Comments}
222 --
223 -- Description:
224 --   This private procedure contains any processing which is required after
225 --   the update dml.
226 --
227 -- Prerequisites:
228 --   This is an internal procedure which is called from the upd procedure.
229 --
230 -- In Parameters:
231 --   A Pl/Sql record structure.
232 --
233 -- Post Success:
234 --   Processing continues.
235 --
236 -- Post Failure:
237 --   If an error has occurred, an error message and exception will be raised
238 --   but not handled.
239 --
240 -- Developer Implementation Notes:
241 --   Any post-processing required after the update dml is issued should be
242 --   coded within this procedure. It is important to note that any 3rd party
243 --   maintenance should be reviewed before placing in this procedure.
244 --
245 -- Access Status:
246 --   Internal Row Handler Use Only.
247 --
248 -- {End Of Comments}
249 -- ----------------------------------------------------------------------------
250 Procedure post_update
251   (p_rec                          in hr_dei_shd.g_rec_type
252   ) is
253 --
254   l_proc  varchar2(72) := g_package||'post_update';
255 --
256 Begin
257   hr_utility.set_location('Entering:'||l_proc, 5);
258   begin
259     --
260     hr_dei_rku.after_update
261       (p_document_extra_info_id
262       => p_rec.document_extra_info_id
263       ,p_document_type_id
264       => p_rec.document_type_id
265       ,p_document_number
266       => p_rec.document_number
267       ,p_date_from
268       => p_rec.date_from
269       ,p_date_to
270       => p_rec.date_to
271       ,p_issued_by
272       => p_rec.issued_by
273       ,p_issued_at
274       => p_rec.issued_at
275       ,p_issued_date
276       => p_rec.issued_date
277       ,p_issuing_authority
278       => p_rec.issuing_authority
279       ,p_verified_by
280       => p_rec.verified_by
281       ,p_verified_date
282       => p_rec.verified_date
283       ,p_related_object_name
284       => p_rec.related_object_name
285       ,p_related_object_id_col
286       => p_rec.related_object_id_col
287       ,p_related_object_id
288       => p_rec.related_object_id
289       ,p_dei_attribute_category
290       => p_rec.dei_attribute_category
291       ,p_dei_attribute1
292       => p_rec.dei_attribute1
293       ,p_dei_attribute2
294       => p_rec.dei_attribute2
295       ,p_dei_attribute3
296       => p_rec.dei_attribute3
297       ,p_dei_attribute4
298       => p_rec.dei_attribute4
299       ,p_dei_attribute5
300       => p_rec.dei_attribute5
301       ,p_dei_attribute6
302       => p_rec.dei_attribute6
303       ,p_dei_attribute7
304       => p_rec.dei_attribute7
305       ,p_dei_attribute8
306       => p_rec.dei_attribute8
307       ,p_dei_attribute9
308       => p_rec.dei_attribute9
309       ,p_dei_attribute10
310       => p_rec.dei_attribute10
311       ,p_dei_attribute11
312       => p_rec.dei_attribute11
313       ,p_dei_attribute12
314       => p_rec.dei_attribute12
315       ,p_dei_attribute13
316       => p_rec.dei_attribute13
317       ,p_dei_attribute14
318       => p_rec.dei_attribute14
319       ,p_dei_attribute15
320       => p_rec.dei_attribute15
321       ,p_dei_attribute16
322       => p_rec.dei_attribute16
323       ,p_dei_attribute17
324       => p_rec.dei_attribute17
325       ,p_dei_attribute18
326       => p_rec.dei_attribute18
327       ,p_dei_attribute19
328       => p_rec.dei_attribute19
329       ,p_dei_attribute20
330       => p_rec.dei_attribute20
331       ,p_dei_attribute21
332       => p_rec.dei_attribute21
333       ,p_dei_attribute22
334       => p_rec.dei_attribute22
335       ,p_dei_attribute23
336       => p_rec.dei_attribute23
337       ,p_dei_attribute24
338       => p_rec.dei_attribute24
339       ,p_dei_attribute25
340       => p_rec.dei_attribute25
341       ,p_dei_attribute26
342       => p_rec.dei_attribute26
343       ,p_dei_attribute27
344       => p_rec.dei_attribute27
345       ,p_dei_attribute28
346       => p_rec.dei_attribute28
347       ,p_dei_attribute29
348       => p_rec.dei_attribute29
349       ,p_dei_attribute30
350       => p_rec.dei_attribute30
351       ,p_dei_information_category
352       => p_rec.dei_information_category
353       ,p_dei_information1
354       => p_rec.dei_information1
355       ,p_dei_information2
356       => p_rec.dei_information2
357       ,p_dei_information3
358       => p_rec.dei_information3
359       ,p_dei_information4
360       => p_rec.dei_information4
361       ,p_dei_information5
362       => p_rec.dei_information5
363       ,p_dei_information6
364       => p_rec.dei_information6
365       ,p_dei_information7
366       => p_rec.dei_information7
367       ,p_dei_information8
368       => p_rec.dei_information8
369       ,p_dei_information9
370       => p_rec.dei_information9
371       ,p_dei_information10
372       => p_rec.dei_information10
373       ,p_dei_information11
374       => p_rec.dei_information11
375       ,p_dei_information12
376       => p_rec.dei_information12
377       ,p_dei_information13
378       => p_rec.dei_information13
379       ,p_dei_information14
380       => p_rec.dei_information14
381       ,p_dei_information15
382       => p_rec.dei_information15
383       ,p_dei_information16
384       => p_rec.dei_information16
385       ,p_dei_information17
386       => p_rec.dei_information17
387       ,p_dei_information18
388       => p_rec.dei_information18
389       ,p_dei_information19
390       => p_rec.dei_information19
391       ,p_dei_information20
392       => p_rec.dei_information20
393       ,p_dei_information21
394       => p_rec.dei_information21
395       ,p_dei_information22
396       => p_rec.dei_information22
397       ,p_dei_information23
398       => p_rec.dei_information23
399       ,p_dei_information24
400       => p_rec.dei_information24
401       ,p_dei_information25
402       => p_rec.dei_information25
403       ,p_dei_information26
404       => p_rec.dei_information26
405       ,p_dei_information27
406       => p_rec.dei_information27
407       ,p_dei_information28
408       => p_rec.dei_information28
409       ,p_dei_information29
410       => p_rec.dei_information29
411       ,p_dei_information30
412       => p_rec.dei_information30
413       ,p_request_id
414       => p_rec.request_id
415       ,p_program_application_id
416       => p_rec.program_application_id
417       ,p_program_id
418       => p_rec.program_id
419       ,p_program_update_date
420       => p_rec.program_update_date
421       ,p_object_version_number
422       => p_rec.object_version_number
423       ,p_person_id_o
424       => hr_dei_shd.g_old_rec.person_id
425       ,p_document_type_id_o
426       => hr_dei_shd.g_old_rec.document_type_id
427       ,p_document_number_o
428       => hr_dei_shd.g_old_rec.document_number
429       ,p_date_from_o
430       => hr_dei_shd.g_old_rec.date_from
431       ,p_date_to_o
432       => hr_dei_shd.g_old_rec.date_to
433       ,p_issued_by_o
434       => hr_dei_shd.g_old_rec.issued_by
435       ,p_issued_at_o
436       => hr_dei_shd.g_old_rec.issued_at
437       ,p_issued_date_o
438       => hr_dei_shd.g_old_rec.issued_date
439       ,p_issuing_authority_o
440       => hr_dei_shd.g_old_rec.issuing_authority
441       ,p_verified_by_o
442       => hr_dei_shd.g_old_rec.verified_by
443       ,p_verified_date_o
444       => hr_dei_shd.g_old_rec.verified_date
445       ,p_related_object_name_o
446       => hr_dei_shd.g_old_rec.related_object_name
447       ,p_related_object_id_col_o
448       => hr_dei_shd.g_old_rec.related_object_id_col
449       ,p_related_object_id_o
450       => hr_dei_shd.g_old_rec.related_object_id
451       ,p_dei_attribute_category_o
452       => hr_dei_shd.g_old_rec.dei_attribute_category
453       ,p_dei_attribute1_o
454       => hr_dei_shd.g_old_rec.dei_attribute1
455       ,p_dei_attribute2_o
456       => hr_dei_shd.g_old_rec.dei_attribute2
457       ,p_dei_attribute3_o
458       => hr_dei_shd.g_old_rec.dei_attribute3
459       ,p_dei_attribute4_o
460       => hr_dei_shd.g_old_rec.dei_attribute4
461       ,p_dei_attribute5_o
462       => hr_dei_shd.g_old_rec.dei_attribute5
463       ,p_dei_attribute6_o
464       => hr_dei_shd.g_old_rec.dei_attribute6
465       ,p_dei_attribute7_o
466       => hr_dei_shd.g_old_rec.dei_attribute7
467       ,p_dei_attribute8_o
468       => hr_dei_shd.g_old_rec.dei_attribute8
469       ,p_dei_attribute9_o
470       => hr_dei_shd.g_old_rec.dei_attribute9
471       ,p_dei_attribute10_o
472       => hr_dei_shd.g_old_rec.dei_attribute10
473       ,p_dei_attribute11_o
474       => hr_dei_shd.g_old_rec.dei_attribute11
475       ,p_dei_attribute12_o
476       => hr_dei_shd.g_old_rec.dei_attribute12
477       ,p_dei_attribute13_o
478       => hr_dei_shd.g_old_rec.dei_attribute13
479       ,p_dei_attribute14_o
480       => hr_dei_shd.g_old_rec.dei_attribute14
481       ,p_dei_attribute15_o
482       => hr_dei_shd.g_old_rec.dei_attribute15
483       ,p_dei_attribute16_o
484       => hr_dei_shd.g_old_rec.dei_attribute16
485       ,p_dei_attribute17_o
486       => hr_dei_shd.g_old_rec.dei_attribute17
487       ,p_dei_attribute18_o
488       => hr_dei_shd.g_old_rec.dei_attribute18
489       ,p_dei_attribute19_o
490       => hr_dei_shd.g_old_rec.dei_attribute19
491       ,p_dei_attribute20_o
492       => hr_dei_shd.g_old_rec.dei_attribute20
493       ,p_dei_attribute21_o
494       => hr_dei_shd.g_old_rec.dei_attribute21
495       ,p_dei_attribute22_o
496       => hr_dei_shd.g_old_rec.dei_attribute22
497       ,p_dei_attribute23_o
498       => hr_dei_shd.g_old_rec.dei_attribute23
499       ,p_dei_attribute24_o
500       => hr_dei_shd.g_old_rec.dei_attribute24
501       ,p_dei_attribute25_o
502       => hr_dei_shd.g_old_rec.dei_attribute25
503       ,p_dei_attribute26_o
504       => hr_dei_shd.g_old_rec.dei_attribute26
505       ,p_dei_attribute27_o
506       => hr_dei_shd.g_old_rec.dei_attribute27
507       ,p_dei_attribute28_o
508       => hr_dei_shd.g_old_rec.dei_attribute28
509       ,p_dei_attribute29_o
510       => hr_dei_shd.g_old_rec.dei_attribute29
511       ,p_dei_attribute30_o
512       => hr_dei_shd.g_old_rec.dei_attribute30
513       ,p_dei_information_category_o
514       => hr_dei_shd.g_old_rec.dei_information_category
515       ,p_dei_information1_o
516       => hr_dei_shd.g_old_rec.dei_information1
517       ,p_dei_information2_o
518       => hr_dei_shd.g_old_rec.dei_information2
519       ,p_dei_information3_o
520       => hr_dei_shd.g_old_rec.dei_information3
521       ,p_dei_information4_o
522       => hr_dei_shd.g_old_rec.dei_information4
523       ,p_dei_information5_o
524       => hr_dei_shd.g_old_rec.dei_information5
525       ,p_dei_information6_o
526       => hr_dei_shd.g_old_rec.dei_information6
527       ,p_dei_information7_o
528       => hr_dei_shd.g_old_rec.dei_information7
529       ,p_dei_information8_o
530       => hr_dei_shd.g_old_rec.dei_information8
531       ,p_dei_information9_o
532       => hr_dei_shd.g_old_rec.dei_information9
533       ,p_dei_information10_o
534       => hr_dei_shd.g_old_rec.dei_information10
535       ,p_dei_information11_o
536       => hr_dei_shd.g_old_rec.dei_information11
537       ,p_dei_information12_o
538       => hr_dei_shd.g_old_rec.dei_information12
539       ,p_dei_information13_o
540       => hr_dei_shd.g_old_rec.dei_information13
541       ,p_dei_information14_o
542       => hr_dei_shd.g_old_rec.dei_information14
543       ,p_dei_information15_o
544       => hr_dei_shd.g_old_rec.dei_information15
545       ,p_dei_information16_o
546       => hr_dei_shd.g_old_rec.dei_information16
547       ,p_dei_information17_o
548       => hr_dei_shd.g_old_rec.dei_information17
549       ,p_dei_information18_o
550       => hr_dei_shd.g_old_rec.dei_information18
551       ,p_dei_information19_o
552       => hr_dei_shd.g_old_rec.dei_information19
553       ,p_dei_information20_o
554       => hr_dei_shd.g_old_rec.dei_information20
555       ,p_dei_information21_o
556       => hr_dei_shd.g_old_rec.dei_information21
557       ,p_dei_information22_o
558       => hr_dei_shd.g_old_rec.dei_information22
559       ,p_dei_information23_o
560       => hr_dei_shd.g_old_rec.dei_information23
561       ,p_dei_information24_o
562       => hr_dei_shd.g_old_rec.dei_information24
563       ,p_dei_information25_o
564       => hr_dei_shd.g_old_rec.dei_information25
565       ,p_dei_information26_o
566       => hr_dei_shd.g_old_rec.dei_information26
567       ,p_dei_information27_o
568       => hr_dei_shd.g_old_rec.dei_information27
569       ,p_dei_information28_o
570       => hr_dei_shd.g_old_rec.dei_information28
571       ,p_dei_information29_o
572       => hr_dei_shd.g_old_rec.dei_information29
573       ,p_dei_information30_o
574       => hr_dei_shd.g_old_rec.dei_information30
575       ,p_request_id_o
576       => hr_dei_shd.g_old_rec.request_id
577       ,p_program_application_id_o
578       => hr_dei_shd.g_old_rec.program_application_id
579       ,p_program_id_o
580       => hr_dei_shd.g_old_rec.program_id
581       ,p_program_update_date_o
582       => hr_dei_shd.g_old_rec.program_update_date
583       ,p_object_version_number_o
584       => hr_dei_shd.g_old_rec.object_version_number
585       );
586     --
587   exception
588     --
589     when hr_api.cannot_find_prog_unit then
590       --
591       hr_api.cannot_find_prog_unit_error
592         (p_module_name => 'HR_DOCUMENT_EXTRA_INFO'
593         ,p_hook_type   => 'AU');
594       --
595   end;
596   --
597   hr_utility.set_location(' Leaving:'||l_proc, 10);
598 End post_update;
599 --
600 -- ----------------------------------------------------------------------------
601 -- |-----------------------------< convert_defs >-----------------------------|
602 -- ----------------------------------------------------------------------------
603 -- {Start Of Comments}
604 --
605 -- Description:
606 --   The Convert_Defs procedure has one very important function:
607 --   It must return the record structure for the row with all system defaulted
608 --   values converted into its corresponding parameter value for update. When
609 --   we attempt to update a row through the Upd process , certain
610 --   parameters can be defaulted which enables flexibility in the calling of
611 --   the upd process (e.g. only attributes which need to be updated need to be
612 --   specified). For the upd process to determine which attributes
613 --   have NOT been specified we need to check if the parameter has a reserved
614 --   system default value. Therefore, for all parameters which have a
615 --   corresponding reserved system default mechanism specified we need to
616 --   check if a system default is being used. If a system default is being
617 --   used then we convert the defaulted value into its corresponding attribute
618 --   value held in the g_old_rec data structure.
619 --
620 -- Prerequisites:
621 --   This private function can only be called from the upd process.
622 --
623 -- In Parameters:
624 --   A Pl/Sql record structure.
625 --
626 -- Post Success:
627 --   The record structure will be returned with all system defaulted parameter
628 --   values converted into its current row attribute value.
629 --
630 -- Post Failure:
631 --   No direct error handling is required within this function. Any possible
632 --   errors within this procedure will be a PL/SQL value error due to
633 --   conversion of datatypes or data lengths.
634 --
635 -- Developer Implementation Notes:
636 --   None.
637 --
638 -- Access Status:
639 --   Internal Row Handler Use Only.
640 --
641 -- {End Of Comments}
642 -- ----------------------------------------------------------------------------
643 Procedure convert_defs
644   (p_rec in out nocopy hr_dei_shd.g_rec_type
645   ) is
646 --
647 Begin
648   --
649   -- We must now examine each argument value in the
650   -- p_rec plsql record structure
651   -- to see if a system default is being used. If a system default
652   -- is being used then we must set to the 'current' argument value.
653   --
654   If (p_rec.person_id = hr_api.g_number) then
655     p_rec.person_id :=
656     hr_dei_shd.g_old_rec.person_id;
657   End If;
658   If (p_rec.document_type_id = hr_api.g_number) then
659     p_rec.document_type_id :=
660     hr_dei_shd.g_old_rec.document_type_id;
661   End If;
662   If (p_rec.document_number = hr_api.g_varchar2) then
663     p_rec.document_number :=
664     hr_dei_shd.g_old_rec.document_number;
665   End If;
666   If (p_rec.date_from = hr_api.g_date) then
667     p_rec.date_from :=
668     hr_dei_shd.g_old_rec.date_from;
669   End If;
670   If (p_rec.date_to = hr_api.g_date) then
671     p_rec.date_to :=
672     hr_dei_shd.g_old_rec.date_to;
673   End If;
674   If (p_rec.issued_by = hr_api.g_varchar2) then
675     p_rec.issued_by :=
676     hr_dei_shd.g_old_rec.issued_by;
677   End If;
678   If (p_rec.issued_at = hr_api.g_varchar2) then
679     p_rec.issued_at :=
680     hr_dei_shd.g_old_rec.issued_at;
681   End If;
682   If (p_rec.issued_date = hr_api.g_date) then
683     p_rec.issued_date :=
684     hr_dei_shd.g_old_rec.issued_date;
685   End If;
686   If (p_rec.issuing_authority = hr_api.g_varchar2) then
687     p_rec.issuing_authority :=
688     hr_dei_shd.g_old_rec.issuing_authority;
689   End If;
690   If (p_rec.verified_by = hr_api.g_number) then
691     p_rec.verified_by :=
692     hr_dei_shd.g_old_rec.verified_by;
693   End If;
694   If (p_rec.verified_date = hr_api.g_date) then
695     p_rec.verified_date :=
696     hr_dei_shd.g_old_rec.verified_date;
697   End If;
698   If (p_rec.related_object_name = hr_api.g_varchar2) then
699     p_rec.related_object_name :=
700     hr_dei_shd.g_old_rec.related_object_name;
701   End If;
702   If (p_rec.related_object_id_col = hr_api.g_varchar2) then
703     p_rec.related_object_id_col :=
704     hr_dei_shd.g_old_rec.related_object_id_col;
705   End If;
706   If (p_rec.related_object_id = hr_api.g_number) then
707     p_rec.related_object_id :=
708     hr_dei_shd.g_old_rec.related_object_id;
709   End If;
710   If (p_rec.dei_attribute_category = hr_api.g_varchar2) then
711     p_rec.dei_attribute_category :=
712     hr_dei_shd.g_old_rec.dei_attribute_category;
713   End If;
714   If (p_rec.dei_attribute1 = hr_api.g_varchar2) then
715     p_rec.dei_attribute1 :=
716     hr_dei_shd.g_old_rec.dei_attribute1;
717   End If;
718   If (p_rec.dei_attribute2 = hr_api.g_varchar2) then
719     p_rec.dei_attribute2 :=
720     hr_dei_shd.g_old_rec.dei_attribute2;
721   End If;
722   If (p_rec.dei_attribute3 = hr_api.g_varchar2) then
723     p_rec.dei_attribute3 :=
724     hr_dei_shd.g_old_rec.dei_attribute3;
725   End If;
726   If (p_rec.dei_attribute4 = hr_api.g_varchar2) then
727     p_rec.dei_attribute4 :=
728     hr_dei_shd.g_old_rec.dei_attribute4;
729   End If;
730   If (p_rec.dei_attribute5 = hr_api.g_varchar2) then
731     p_rec.dei_attribute5 :=
732     hr_dei_shd.g_old_rec.dei_attribute5;
733   End If;
734   If (p_rec.dei_attribute6 = hr_api.g_varchar2) then
735     p_rec.dei_attribute6 :=
736     hr_dei_shd.g_old_rec.dei_attribute6;
737   End If;
738   If (p_rec.dei_attribute7 = hr_api.g_varchar2) then
739     p_rec.dei_attribute7 :=
740     hr_dei_shd.g_old_rec.dei_attribute7;
741   End If;
742   If (p_rec.dei_attribute8 = hr_api.g_varchar2) then
743     p_rec.dei_attribute8 :=
744     hr_dei_shd.g_old_rec.dei_attribute8;
745   End If;
746   If (p_rec.dei_attribute9 = hr_api.g_varchar2) then
747     p_rec.dei_attribute9 :=
748     hr_dei_shd.g_old_rec.dei_attribute9;
749   End If;
750   If (p_rec.dei_attribute10 = hr_api.g_varchar2) then
751     p_rec.dei_attribute10 :=
752     hr_dei_shd.g_old_rec.dei_attribute10;
753   End If;
754   If (p_rec.dei_attribute11 = hr_api.g_varchar2) then
755     p_rec.dei_attribute11 :=
756     hr_dei_shd.g_old_rec.dei_attribute11;
757   End If;
758   If (p_rec.dei_attribute12 = hr_api.g_varchar2) then
759     p_rec.dei_attribute12 :=
760     hr_dei_shd.g_old_rec.dei_attribute12;
761   End If;
762   If (p_rec.dei_attribute13 = hr_api.g_varchar2) then
763     p_rec.dei_attribute13 :=
764     hr_dei_shd.g_old_rec.dei_attribute13;
765   End If;
766   If (p_rec.dei_attribute14 = hr_api.g_varchar2) then
767     p_rec.dei_attribute14 :=
768     hr_dei_shd.g_old_rec.dei_attribute14;
769   End If;
770   If (p_rec.dei_attribute15 = hr_api.g_varchar2) then
771     p_rec.dei_attribute15 :=
772     hr_dei_shd.g_old_rec.dei_attribute15;
773   End If;
774   If (p_rec.dei_attribute16 = hr_api.g_varchar2) then
775     p_rec.dei_attribute16 :=
776     hr_dei_shd.g_old_rec.dei_attribute16;
777   End If;
778   If (p_rec.dei_attribute17 = hr_api.g_varchar2) then
779     p_rec.dei_attribute17 :=
780     hr_dei_shd.g_old_rec.dei_attribute17;
781   End If;
782   If (p_rec.dei_attribute18 = hr_api.g_varchar2) then
783     p_rec.dei_attribute18 :=
784     hr_dei_shd.g_old_rec.dei_attribute18;
785   End If;
786   If (p_rec.dei_attribute19 = hr_api.g_varchar2) then
787     p_rec.dei_attribute19 :=
788     hr_dei_shd.g_old_rec.dei_attribute19;
789   End If;
790   If (p_rec.dei_attribute20 = hr_api.g_varchar2) then
791     p_rec.dei_attribute20 :=
792     hr_dei_shd.g_old_rec.dei_attribute20;
793   End If;
794   If (p_rec.dei_attribute21 = hr_api.g_varchar2) then
795     p_rec.dei_attribute21 :=
796     hr_dei_shd.g_old_rec.dei_attribute21;
797   End If;
798   If (p_rec.dei_attribute22 = hr_api.g_varchar2) then
799     p_rec.dei_attribute22 :=
800     hr_dei_shd.g_old_rec.dei_attribute22;
801   End If;
802   If (p_rec.dei_attribute23 = hr_api.g_varchar2) then
803     p_rec.dei_attribute23 :=
804     hr_dei_shd.g_old_rec.dei_attribute23;
805   End If;
806   If (p_rec.dei_attribute24 = hr_api.g_varchar2) then
807     p_rec.dei_attribute24 :=
808     hr_dei_shd.g_old_rec.dei_attribute24;
809   End If;
810   If (p_rec.dei_attribute25 = hr_api.g_varchar2) then
811     p_rec.dei_attribute25 :=
812     hr_dei_shd.g_old_rec.dei_attribute25;
813   End If;
814   If (p_rec.dei_attribute26 = hr_api.g_varchar2) then
815     p_rec.dei_attribute26 :=
816     hr_dei_shd.g_old_rec.dei_attribute26;
817   End If;
818   If (p_rec.dei_attribute27 = hr_api.g_varchar2) then
819     p_rec.dei_attribute27 :=
820     hr_dei_shd.g_old_rec.dei_attribute27;
821   End If;
822   If (p_rec.dei_attribute28 = hr_api.g_varchar2) then
823     p_rec.dei_attribute28 :=
824     hr_dei_shd.g_old_rec.dei_attribute28;
825   End If;
826   If (p_rec.dei_attribute29 = hr_api.g_varchar2) then
827     p_rec.dei_attribute29 :=
828     hr_dei_shd.g_old_rec.dei_attribute29;
829   End If;
830   If (p_rec.dei_attribute30 = hr_api.g_varchar2) then
831     p_rec.dei_attribute30 :=
832     hr_dei_shd.g_old_rec.dei_attribute30;
833   End If;
834   If (p_rec.dei_information_category = hr_api.g_varchar2) then
835     p_rec.dei_information_category :=
836     hr_dei_shd.g_old_rec.dei_information_category;
837   End If;
838   If (p_rec.dei_information1 = hr_api.g_varchar2) then
839     p_rec.dei_information1 :=
840     hr_dei_shd.g_old_rec.dei_information1;
841   End If;
842   If (p_rec.dei_information2 = hr_api.g_varchar2) then
843     p_rec.dei_information2 :=
844     hr_dei_shd.g_old_rec.dei_information2;
845   End If;
846   If (p_rec.dei_information3 = hr_api.g_varchar2) then
847     p_rec.dei_information3 :=
848     hr_dei_shd.g_old_rec.dei_information3;
849   End If;
850   If (p_rec.dei_information4 = hr_api.g_varchar2) then
851     p_rec.dei_information4 :=
852     hr_dei_shd.g_old_rec.dei_information4;
853   End If;
854   If (p_rec.dei_information5 = hr_api.g_varchar2) then
855     p_rec.dei_information5 :=
856     hr_dei_shd.g_old_rec.dei_information5;
857   End If;
858   If (p_rec.dei_information6 = hr_api.g_varchar2) then
859     p_rec.dei_information6 :=
860     hr_dei_shd.g_old_rec.dei_information6;
861   End If;
862   If (p_rec.dei_information7 = hr_api.g_varchar2) then
863     p_rec.dei_information7 :=
864     hr_dei_shd.g_old_rec.dei_information7;
865   End If;
866   If (p_rec.dei_information8 = hr_api.g_varchar2) then
867     p_rec.dei_information8 :=
868     hr_dei_shd.g_old_rec.dei_information8;
869   End If;
870   If (p_rec.dei_information9 = hr_api.g_varchar2) then
871     p_rec.dei_information9 :=
872     hr_dei_shd.g_old_rec.dei_information9;
873   End If;
874   If (p_rec.dei_information10 = hr_api.g_varchar2) then
875     p_rec.dei_information10 :=
876     hr_dei_shd.g_old_rec.dei_information10;
877   End If;
878   If (p_rec.dei_information11 = hr_api.g_varchar2) then
879     p_rec.dei_information11 :=
880     hr_dei_shd.g_old_rec.dei_information11;
881   End If;
882   If (p_rec.dei_information12 = hr_api.g_varchar2) then
883     p_rec.dei_information12 :=
884     hr_dei_shd.g_old_rec.dei_information12;
885   End If;
886   If (p_rec.dei_information13 = hr_api.g_varchar2) then
887     p_rec.dei_information13 :=
888     hr_dei_shd.g_old_rec.dei_information13;
889   End If;
890   If (p_rec.dei_information14 = hr_api.g_varchar2) then
891     p_rec.dei_information14 :=
892     hr_dei_shd.g_old_rec.dei_information14;
893   End If;
894   If (p_rec.dei_information15 = hr_api.g_varchar2) then
895     p_rec.dei_information15 :=
896     hr_dei_shd.g_old_rec.dei_information15;
897   End If;
898   If (p_rec.dei_information16 = hr_api.g_varchar2) then
899     p_rec.dei_information16 :=
900     hr_dei_shd.g_old_rec.dei_information16;
901   End If;
902   If (p_rec.dei_information17 = hr_api.g_varchar2) then
903     p_rec.dei_information17 :=
904     hr_dei_shd.g_old_rec.dei_information17;
905   End If;
906   If (p_rec.dei_information18 = hr_api.g_varchar2) then
907     p_rec.dei_information18 :=
908     hr_dei_shd.g_old_rec.dei_information18;
909   End If;
910   If (p_rec.dei_information19 = hr_api.g_varchar2) then
911     p_rec.dei_information19 :=
912     hr_dei_shd.g_old_rec.dei_information19;
913   End If;
914   If (p_rec.dei_information20 = hr_api.g_varchar2) then
915     p_rec.dei_information20 :=
916     hr_dei_shd.g_old_rec.dei_information20;
917   End If;
918   If (p_rec.dei_information21 = hr_api.g_varchar2) then
919     p_rec.dei_information21 :=
920     hr_dei_shd.g_old_rec.dei_information21;
921   End If;
922   If (p_rec.dei_information22 = hr_api.g_varchar2) then
923     p_rec.dei_information22 :=
924     hr_dei_shd.g_old_rec.dei_information22;
925   End If;
926   If (p_rec.dei_information23 = hr_api.g_varchar2) then
927     p_rec.dei_information23 :=
928     hr_dei_shd.g_old_rec.dei_information23;
929   End If;
930   If (p_rec.dei_information24 = hr_api.g_varchar2) then
931     p_rec.dei_information24 :=
932     hr_dei_shd.g_old_rec.dei_information24;
933   End If;
934   If (p_rec.dei_information25 = hr_api.g_varchar2) then
935     p_rec.dei_information25 :=
936     hr_dei_shd.g_old_rec.dei_information25;
937   End If;
938   If (p_rec.dei_information26 = hr_api.g_varchar2) then
939     p_rec.dei_information26 :=
940     hr_dei_shd.g_old_rec.dei_information26;
941   End If;
942   If (p_rec.dei_information27 = hr_api.g_varchar2) then
943     p_rec.dei_information27 :=
944     hr_dei_shd.g_old_rec.dei_information27;
945   End If;
946   If (p_rec.dei_information28 = hr_api.g_varchar2) then
947     p_rec.dei_information28 :=
948     hr_dei_shd.g_old_rec.dei_information28;
949   End If;
950   If (p_rec.dei_information29 = hr_api.g_varchar2) then
951     p_rec.dei_information29 :=
952     hr_dei_shd.g_old_rec.dei_information29;
953   End If;
954   If (p_rec.dei_information30 = hr_api.g_varchar2) then
955     p_rec.dei_information30 :=
956     hr_dei_shd.g_old_rec.dei_information30;
957   End If;
958   If (p_rec.request_id = hr_api.g_number) then
959     p_rec.request_id :=
960     hr_dei_shd.g_old_rec.request_id;
961   End If;
962   If (p_rec.program_application_id = hr_api.g_number) then
963     p_rec.program_application_id :=
964     hr_dei_shd.g_old_rec.program_application_id;
965   End If;
966   If (p_rec.program_id = hr_api.g_number) then
967     p_rec.program_id :=
968     hr_dei_shd.g_old_rec.program_id;
969   End If;
970   If (p_rec.program_update_date = hr_api.g_date) then
971     p_rec.program_update_date :=
972     hr_dei_shd.g_old_rec.program_update_date;
973   End If;
974   --
975 End convert_defs;
976 --
977 -- ----------------------------------------------------------------------------
978 -- |---------------------------------< upd >----------------------------------|
979 -- ----------------------------------------------------------------------------
980 Procedure upd
981   (p_rec                          in out nocopy hr_dei_shd.g_rec_type
982   ) is
983 --
984   l_proc  varchar2(72) := g_package||'upd';
985 --
986 Begin
987   hr_utility.set_location('Entering:'||l_proc, 5);
988   --
989   -- We must lock the row which we need to update.
990   --
991   hr_dei_shd.lck
992     (p_rec.document_extra_info_id
993     ,p_rec.object_version_number
994     );
995   --
996   -- 1. During an update system defaults are used to determine if
997   --    arguments have been defaulted or not. We must therefore
998   --    derive the full record structure values to be updated.
999   --
1000   -- 2. Call the supporting update validate operations.
1001   --
1002   convert_defs(p_rec);
1003   hr_dei_bus.update_validate
1004      (p_rec
1005      );
1006   --
1007   -- Call to raise any errors on multi-message list
1008   hr_multi_message.end_validation_set;
1009   --
1010   -- Call the supporting pre-update operation
1011   --
1012   hr_dei_upd.pre_update(p_rec);
1013   --
1014   -- Update the row.
1015   --
1016   hr_dei_upd.update_dml(p_rec);
1017   --
1018   -- Call the supporting post-update operation
1019   --
1020   hr_dei_upd.post_update
1021      (p_rec
1022      );
1023   --
1024   -- Call to raise any errors on multi-message list
1025   hr_multi_message.end_validation_set;
1026 End upd;
1027 --
1028 -- ----------------------------------------------------------------------------
1029 -- |---------------------------------< upd >----------------------------------|
1030 -- ----------------------------------------------------------------------------
1031 Procedure upd
1032   (p_document_extra_info_id       in     number
1033   ,p_object_version_number        in out nocopy number
1034   ,p_document_type_id             in     number    default hr_api.g_number
1035   ,p_date_from                    in     date      default hr_api.g_date
1036   ,p_date_to                      in     date      default hr_api.g_date
1037   ,p_document_number              in     varchar2  default hr_api.g_varchar2
1038   ,p_issued_by                    in     varchar2  default hr_api.g_varchar2
1039   ,p_issued_at                    in     varchar2  default hr_api.g_varchar2
1040   ,p_issued_date                  in     date      default hr_api.g_date
1041   ,p_issuing_authority            in     varchar2  default hr_api.g_varchar2
1042   ,p_verified_by                  in     number    default hr_api.g_number
1043   ,p_verified_date                in     date      default hr_api.g_date
1044   ,p_related_object_name          in     varchar2  default hr_api.g_varchar2
1045   ,p_related_object_id_col        in     varchar2  default hr_api.g_varchar2
1046   ,p_related_object_id            in     number    default hr_api.g_number
1047   ,p_dei_attribute_category       in     varchar2  default hr_api.g_varchar2
1048   ,p_dei_attribute1               in     varchar2  default hr_api.g_varchar2
1049   ,p_dei_attribute2               in     varchar2  default hr_api.g_varchar2
1050   ,p_dei_attribute3               in     varchar2  default hr_api.g_varchar2
1051   ,p_dei_attribute4               in     varchar2  default hr_api.g_varchar2
1052   ,p_dei_attribute5               in     varchar2  default hr_api.g_varchar2
1053   ,p_dei_attribute6               in     varchar2  default hr_api.g_varchar2
1054   ,p_dei_attribute7               in     varchar2  default hr_api.g_varchar2
1055   ,p_dei_attribute8               in     varchar2  default hr_api.g_varchar2
1056   ,p_dei_attribute9               in     varchar2  default hr_api.g_varchar2
1057   ,p_dei_attribute10              in     varchar2  default hr_api.g_varchar2
1058   ,p_dei_attribute11              in     varchar2  default hr_api.g_varchar2
1059   ,p_dei_attribute12              in     varchar2  default hr_api.g_varchar2
1060   ,p_dei_attribute13              in     varchar2  default hr_api.g_varchar2
1061   ,p_dei_attribute14              in     varchar2  default hr_api.g_varchar2
1062   ,p_dei_attribute15              in     varchar2  default hr_api.g_varchar2
1063   ,p_dei_attribute16              in     varchar2  default hr_api.g_varchar2
1064   ,p_dei_attribute17              in     varchar2  default hr_api.g_varchar2
1065   ,p_dei_attribute18              in     varchar2  default hr_api.g_varchar2
1066   ,p_dei_attribute19              in     varchar2  default hr_api.g_varchar2
1067   ,p_dei_attribute20              in     varchar2  default hr_api.g_varchar2
1068   ,p_dei_attribute21              in     varchar2  default hr_api.g_varchar2
1069   ,p_dei_attribute22              in     varchar2  default hr_api.g_varchar2
1070   ,p_dei_attribute23              in     varchar2  default hr_api.g_varchar2
1071   ,p_dei_attribute24              in     varchar2  default hr_api.g_varchar2
1072   ,p_dei_attribute25              in     varchar2  default hr_api.g_varchar2
1073   ,p_dei_attribute26              in     varchar2  default hr_api.g_varchar2
1074   ,p_dei_attribute27              in     varchar2  default hr_api.g_varchar2
1075   ,p_dei_attribute28              in     varchar2  default hr_api.g_varchar2
1076   ,p_dei_attribute29              in     varchar2  default hr_api.g_varchar2
1077   ,p_dei_attribute30              in     varchar2  default hr_api.g_varchar2
1078   ,p_dei_information_category     in     varchar2  default hr_api.g_varchar2
1079   ,p_dei_information1             in     varchar2  default hr_api.g_varchar2
1080   ,p_dei_information2             in     varchar2  default hr_api.g_varchar2
1081   ,p_dei_information3             in     varchar2  default hr_api.g_varchar2
1082   ,p_dei_information4             in     varchar2  default hr_api.g_varchar2
1083   ,p_dei_information5             in     varchar2  default hr_api.g_varchar2
1084   ,p_dei_information6             in     varchar2  default hr_api.g_varchar2
1085   ,p_dei_information7             in     varchar2  default hr_api.g_varchar2
1086   ,p_dei_information8             in     varchar2  default hr_api.g_varchar2
1087   ,p_dei_information9             in     varchar2  default hr_api.g_varchar2
1088   ,p_dei_information10            in     varchar2  default hr_api.g_varchar2
1089   ,p_dei_information11            in     varchar2  default hr_api.g_varchar2
1090   ,p_dei_information12            in     varchar2  default hr_api.g_varchar2
1091   ,p_dei_information13            in     varchar2  default hr_api.g_varchar2
1092   ,p_dei_information14            in     varchar2  default hr_api.g_varchar2
1093   ,p_dei_information15            in     varchar2  default hr_api.g_varchar2
1094   ,p_dei_information16            in     varchar2  default hr_api.g_varchar2
1095   ,p_dei_information17            in     varchar2  default hr_api.g_varchar2
1096   ,p_dei_information18            in     varchar2  default hr_api.g_varchar2
1097   ,p_dei_information19            in     varchar2  default hr_api.g_varchar2
1098   ,p_dei_information20            in     varchar2  default hr_api.g_varchar2
1099   ,p_dei_information21            in     varchar2  default hr_api.g_varchar2
1100   ,p_dei_information22            in     varchar2  default hr_api.g_varchar2
1101   ,p_dei_information23            in     varchar2  default hr_api.g_varchar2
1102   ,p_dei_information24            in     varchar2  default hr_api.g_varchar2
1103   ,p_dei_information25            in     varchar2  default hr_api.g_varchar2
1104   ,p_dei_information26            in     varchar2  default hr_api.g_varchar2
1105   ,p_dei_information27            in     varchar2  default hr_api.g_varchar2
1106   ,p_dei_information28            in     varchar2  default hr_api.g_varchar2
1107   ,p_dei_information29            in     varchar2  default hr_api.g_varchar2
1108   ,p_dei_information30            in     varchar2  default hr_api.g_varchar2
1109   ,p_request_id                   in     number    default hr_api.g_number
1110   ,p_program_application_id       in     number    default hr_api.g_number
1111   ,p_program_id                   in     number    default hr_api.g_number
1112   ,p_program_update_date          in     date      default hr_api.g_date
1113   ) is
1114 --
1115   l_rec   hr_dei_shd.g_rec_type;
1116   l_proc  varchar2(72) := g_package||'upd';
1117 --
1118 Begin
1119   hr_utility.set_location('Entering:'||l_proc, 5);
1120   --
1121   -- Call conversion function to turn arguments into the
1122   -- l_rec structure.
1123   --
1124   l_rec :=
1125   hr_dei_shd.convert_args
1126   (p_document_extra_info_id
1127   ,hr_api.g_number
1128   ,p_document_type_id
1129   ,p_document_number
1130   ,p_date_from
1131   ,p_date_to
1132   ,p_issued_by
1133   ,p_issued_at
1134   ,p_issued_date
1135   ,p_issuing_authority
1136   ,p_verified_by
1137   ,p_verified_date
1138   ,p_related_object_name
1139   ,p_related_object_id_col
1140   ,p_related_object_id
1141   ,p_dei_attribute_category
1142   ,p_dei_attribute1
1143   ,p_dei_attribute2
1144   ,p_dei_attribute3
1145   ,p_dei_attribute4
1146   ,p_dei_attribute5
1147   ,p_dei_attribute6
1148   ,p_dei_attribute7
1149   ,p_dei_attribute8
1150   ,p_dei_attribute9
1151   ,p_dei_attribute10
1152   ,p_dei_attribute11
1153   ,p_dei_attribute12
1154   ,p_dei_attribute13
1155   ,p_dei_attribute14
1156   ,p_dei_attribute15
1157   ,p_dei_attribute16
1158   ,p_dei_attribute17
1159   ,p_dei_attribute18
1160   ,p_dei_attribute19
1161   ,p_dei_attribute20
1162   ,p_dei_attribute21
1163   ,p_dei_attribute22
1164   ,p_dei_attribute23
1165   ,p_dei_attribute24
1166   ,p_dei_attribute25
1167   ,p_dei_attribute26
1168   ,p_dei_attribute27
1169   ,p_dei_attribute28
1170   ,p_dei_attribute29
1171   ,p_dei_attribute30
1172   ,p_dei_information_category
1173   ,p_dei_information1
1174   ,p_dei_information2
1175   ,p_dei_information3
1176   ,p_dei_information4
1177   ,p_dei_information5
1178   ,p_dei_information6
1179   ,p_dei_information7
1180   ,p_dei_information8
1181   ,p_dei_information9
1182   ,p_dei_information10
1183   ,p_dei_information11
1184   ,p_dei_information12
1185   ,p_dei_information13
1186   ,p_dei_information14
1187   ,p_dei_information15
1188   ,p_dei_information16
1189   ,p_dei_information17
1190   ,p_dei_information18
1191   ,p_dei_information19
1192   ,p_dei_information20
1193   ,p_dei_information21
1194   ,p_dei_information22
1195   ,p_dei_information23
1196   ,p_dei_information24
1197   ,p_dei_information25
1198   ,p_dei_information26
1199   ,p_dei_information27
1200   ,p_dei_information28
1201   ,p_dei_information29
1202   ,p_dei_information30
1203   ,p_request_id
1204   ,p_program_application_id
1205   ,p_program_id
1206   ,p_program_update_date
1207   ,p_object_version_number
1208   );
1209   --
1210   -- Having converted the arguments into the
1211   -- plsql record structure we call the corresponding record
1212   -- business process.
1213   --
1214   hr_dei_upd.upd
1215      (l_rec
1216      );
1217   p_object_version_number := l_rec.object_version_number;
1218   --
1219   hr_utility.set_location(' Leaving:'||l_proc, 10);
1220 End upd;
1221 --
1222 end hr_dei_upd;