DBA Data[Home] [Help]

PACKAGE BODY: APPS.PER_PJO_UPD

Source


1 Package Body per_pjo_upd as
2 /* $Header: pepjorhi.pkb 120.1 2008/07/08 13:06:55 brsinha noship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |                     Private Global Definitions                           |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package  varchar2(33) := '  per_pjo_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 set and unset the g_api_dml status as required (as we are about to
21 --      perform dml).
22 --   3) To update the specified row in the schema using the primary key in
23 --      the predicates.
24 --   4) To trap any constraint violations that may have occurred.
25 --   5) To raise any other errors.
26 --
27 -- Prerequisites:
28 --   This is an internal private procedure which must be called from the upd
29 --   procedure.
30 --
31 -- In Parameters:
32 --   A Pl/Sql record structre.
33 --
34 -- Post Success:
35 --   The specified row will be updated in the schema.
36 --
37 -- Post Failure:
38 --   On the update dml failure it is important to note that we always reset the
39 --   g_api_dml status to false.
40 --   If a check, unique or parent integrity constraint violation is raised the
41 --   constraint_error procedure will be called.
42 --   If any other error is reported, the error will be raised after the
43 --   g_api_dml status is reset.
44 --
45 -- Developer Implementation Notes:
46 --   The update 'set' attribute list should be modified if any of your
47 --   attributes are not updateable.
48 --
49 -- Access Status:
50 --   Internal Row Handler Use Only.
51 --
52 -- {End Of Comments}
53 -- ----------------------------------------------------------------------------
54 Procedure update_dml
55   (p_rec in out nocopy per_pjo_shd.g_rec_type
56   ) is
57 --
58   l_proc  varchar2(72) := g_package||'update_dml';
59 --
60 Begin
61   hr_utility.set_location('Entering:'||l_proc, 5);
62   --
63   -- Increment the object version
64   p_rec.object_version_number := p_rec.object_version_number + 1;
65   --
66   --
67   --
68   -- Update the per_previous_jobs Row
69   --
70   update per_previous_jobs
71     set
72      previous_job_id                 = p_rec.previous_job_id
73     ,previous_employer_id            = p_rec.previous_employer_id
74     ,start_date                      = p_rec.start_date
75     ,end_date                        = p_rec.end_date
76     ,period_years                    = p_rec.period_years
77     ,period_days                     = p_rec.period_days
78     ,job_name                        = p_rec.job_name
79     ,employment_category             = p_rec.employment_category
80     ,description                     = p_rec.description
81     ,pjo_attribute_category          = p_rec.pjo_attribute_category
82     ,pjo_attribute1                  = p_rec.pjo_attribute1
83     ,pjo_attribute2                  = p_rec.pjo_attribute2
84     ,pjo_attribute3                  = p_rec.pjo_attribute3
85     ,pjo_attribute4                  = p_rec.pjo_attribute4
86     ,pjo_attribute5                  = p_rec.pjo_attribute5
87     ,pjo_attribute6                  = p_rec.pjo_attribute6
88     ,pjo_attribute7                  = p_rec.pjo_attribute7
89     ,pjo_attribute8                  = p_rec.pjo_attribute8
90     ,pjo_attribute9                  = p_rec.pjo_attribute9
91     ,pjo_attribute10                 = p_rec.pjo_attribute10
92     ,pjo_attribute11                 = p_rec.pjo_attribute11
93     ,pjo_attribute12                 = p_rec.pjo_attribute12
94     ,pjo_attribute13                 = p_rec.pjo_attribute13
95     ,pjo_attribute14                 = p_rec.pjo_attribute14
96     ,pjo_attribute15                 = p_rec.pjo_attribute15
97     ,pjo_attribute16                 = p_rec.pjo_attribute16
98     ,pjo_attribute17                 = p_rec.pjo_attribute17
99     ,pjo_attribute18                 = p_rec.pjo_attribute18
100     ,pjo_attribute19                 = p_rec.pjo_attribute19
101     ,pjo_attribute20                 = p_rec.pjo_attribute20
102     ,pjo_attribute21                 = p_rec.pjo_attribute21
103     ,pjo_attribute22                 = p_rec.pjo_attribute22
104     ,pjo_attribute23                 = p_rec.pjo_attribute23
105     ,pjo_attribute24                 = p_rec.pjo_attribute24
106     ,pjo_attribute25                 = p_rec.pjo_attribute25
107     ,pjo_attribute26                 = p_rec.pjo_attribute26
108     ,pjo_attribute27                 = p_rec.pjo_attribute27
109     ,pjo_attribute28                 = p_rec.pjo_attribute28
110     ,pjo_attribute29                 = p_rec.pjo_attribute29
111     ,pjo_attribute30                 = p_rec.pjo_attribute30
112     ,pjo_information_category        = p_rec.pjo_information_category
113     ,pjo_information1                = p_rec.pjo_information1
114     ,pjo_information2                = p_rec.pjo_information2
115     ,pjo_information3                = p_rec.pjo_information3
116     ,pjo_information4                = p_rec.pjo_information4
117     ,pjo_information5                = p_rec.pjo_information5
118     ,pjo_information6                = p_rec.pjo_information6
119     ,pjo_information7                = p_rec.pjo_information7
120     ,pjo_information8                = p_rec.pjo_information8
121     ,pjo_information9                = p_rec.pjo_information9
122     ,pjo_information10               = p_rec.pjo_information10
123     ,pjo_information11               = p_rec.pjo_information11
124     ,pjo_information12               = p_rec.pjo_information12
125     ,pjo_information13               = p_rec.pjo_information13
126     ,pjo_information14               = p_rec.pjo_information14
127     ,pjo_information15               = p_rec.pjo_information15
128     ,pjo_information16               = p_rec.pjo_information16
129     ,pjo_information17               = p_rec.pjo_information17
130     ,pjo_information18               = p_rec.pjo_information18
131     ,pjo_information19               = p_rec.pjo_information19
132     ,pjo_information20               = p_rec.pjo_information20
133     ,pjo_information21               = p_rec.pjo_information21
134     ,pjo_information22               = p_rec.pjo_information22
135     ,pjo_information23               = p_rec.pjo_information23
136     ,pjo_information24               = p_rec.pjo_information24
137     ,pjo_information25               = p_rec.pjo_information25
138     ,pjo_information26               = p_rec.pjo_information26
139     ,pjo_information27               = p_rec.pjo_information27
140     ,pjo_information28               = p_rec.pjo_information28
141     ,pjo_information29               = p_rec.pjo_information29
142     ,pjo_information30               = p_rec.pjo_information30
143     ,object_version_number           = p_rec.object_version_number
144     ,all_assignments                 = p_rec.all_assignments
145     ,period_months                   = p_rec.period_months
146     where previous_job_id = p_rec.previous_job_id;
147   --
148   --
149   --
150   hr_utility.set_location(' Leaving:'||l_proc, 10);
151 --
152 Exception
153   When hr_api.check_integrity_violated Then
154     -- A check constraint has been violated
155     --
156     per_pjo_shd.constraint_error
157       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
158   When hr_api.parent_integrity_violated Then
159     -- Parent integrity has been violated
160     --
161     per_pjo_shd.constraint_error
162       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
163   When hr_api.unique_integrity_violated Then
164     -- Unique integrity has been violated
165     --
166     per_pjo_shd.constraint_error
167       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
168   When Others Then
169     --
170     Raise;
171 End update_dml;
172 --
173 -- ----------------------------------------------------------------------------
174 -- |------------------------------< pre_update >------------------------------|
175 -- ----------------------------------------------------------------------------
176 -- {Start Of Comments}
177 --
178 -- Description:
179 --   This private procedure contains any processing which is required before
180 --   the update dml.
181 --
182 -- Prerequisites:
183 --   This is an internal procedure which is called from the upd procedure.
184 --
185 -- In Parameters:
186 --   A Pl/Sql record structure.
187 --
188 -- Post Success:
189 --   Processing continues.
190 --
191 -- Post Failure:
192 --   If an error has occurred, an error message and exception wil be raised
193 --   but not handled.
194 --
195 -- Developer Implementation Notes:
196 --   Any pre-processing required before the update dml is issued should be
197 --   coded within this procedure. It is important to note that any 3rd party
198 --   maintenance should be reviewed before placing in this procedure.
199 --
200 -- Access Status:
201 --   Internal Row Handler Use Only.
202 --
203 -- {End Of Comments}
204 -- ----------------------------------------------------------------------------
205 Procedure pre_update
206   (p_rec in per_pjo_shd.g_rec_type
207   ) is
208 --
209   l_proc  varchar2(72) := g_package||'pre_update';
210 --
211 Begin
212   hr_utility.set_location('Entering:'||l_proc, 5);
213   --
214   hr_utility.set_location(' Leaving:'||l_proc, 10);
215 End pre_update;
216 --
217 -- ----------------------------------------------------------------------------
218 -- |-----------------------------< post_update >------------------------------|
219 -- ----------------------------------------------------------------------------
220 -- {Start Of Comments}
221 --
222 -- Description:
223 --   This private procedure contains any processing which is required after
224 --   the update dml.
225 --
226 -- Prerequisites:
227 --   This is an internal procedure which is called from the upd procedure.
228 --
229 -- In Parameters:
230 --   A Pl/Sql record structure.
231 --
232 -- Post Success:
233 --   Processing continues.
234 --
235 -- Post Failure:
236 --   If an error has occurred, an error message and exception will be raised
237 --   but not handled.
238 --
239 -- Developer Implementation Notes:
240 --   Any post-processing required after the update dml is issued should be
241 --   coded within this procedure. It is important to note that any 3rd party
242 --   maintenance should be reviewed before placing in this procedure.
243 --
244 -- Access Status:
245 --   Internal Row Handler Use Only.
246 --
247 -- {End Of Comments}
248 -- ----------------------------------------------------------------------------
249 Procedure post_update
250   (p_effective_date               in date
251   ,p_rec                          in per_pjo_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     per_pjo_rku.after_update
261       (p_effective_date              => p_effective_date
262       ,p_previous_job_id
263       => p_rec.previous_job_id
264       ,p_previous_employer_id
265       => p_rec.previous_employer_id
266       ,p_start_date
267       => p_rec.start_date
268       ,p_end_date
269       => p_rec.end_date
270       ,p_period_years
271       => p_rec.period_years
272       ,p_period_days
273       => p_rec.period_days
274       ,p_job_name
275       => p_rec.job_name
276       ,p_employment_category
277       => p_rec.employment_category
278       ,p_description
279       => p_rec.description
280       ,p_pjo_attribute_category
281       => p_rec.pjo_attribute_category
282       ,p_pjo_attribute1
283       => p_rec.pjo_attribute1
284       ,p_pjo_attribute2
285       => p_rec.pjo_attribute2
286       ,p_pjo_attribute3
287       => p_rec.pjo_attribute3
288       ,p_pjo_attribute4
289       => p_rec.pjo_attribute4
290       ,p_pjo_attribute5
291       => p_rec.pjo_attribute5
292       ,p_pjo_attribute6
293       => p_rec.pjo_attribute6
294       ,p_pjo_attribute7
295       => p_rec.pjo_attribute7
296       ,p_pjo_attribute8
297       => p_rec.pjo_attribute8
298       ,p_pjo_attribute9
299       => p_rec.pjo_attribute9
300       ,p_pjo_attribute10
301       => p_rec.pjo_attribute10
302       ,p_pjo_attribute11
303       => p_rec.pjo_attribute11
304       ,p_pjo_attribute12
305       => p_rec.pjo_attribute12
306       ,p_pjo_attribute13
307       => p_rec.pjo_attribute13
308       ,p_pjo_attribute14
309       => p_rec.pjo_attribute14
310       ,p_pjo_attribute15
311       => p_rec.pjo_attribute15
312       ,p_pjo_attribute16
313       => p_rec.pjo_attribute16
314       ,p_pjo_attribute17
315       => p_rec.pjo_attribute17
316       ,p_pjo_attribute18
317       => p_rec.pjo_attribute18
318       ,p_pjo_attribute19
319       => p_rec.pjo_attribute19
320       ,p_pjo_attribute20
321       => p_rec.pjo_attribute20
322       ,p_pjo_attribute21
323       => p_rec.pjo_attribute21
324       ,p_pjo_attribute22
325       => p_rec.pjo_attribute22
326       ,p_pjo_attribute23
327       => p_rec.pjo_attribute23
328       ,p_pjo_attribute24
329       => p_rec.pjo_attribute24
330       ,p_pjo_attribute25
331       => p_rec.pjo_attribute25
332       ,p_pjo_attribute26
333       => p_rec.pjo_attribute26
334       ,p_pjo_attribute27
335       => p_rec.pjo_attribute27
336       ,p_pjo_attribute28
337       => p_rec.pjo_attribute28
338       ,p_pjo_attribute29
339       => p_rec.pjo_attribute29
340       ,p_pjo_attribute30
341       => p_rec.pjo_attribute30
342       ,p_pjo_information_category
343       => p_rec.pjo_information_category
344       ,p_pjo_information1
345       => p_rec.pjo_information1
346       ,p_pjo_information2
347       => p_rec.pjo_information2
348       ,p_pjo_information3
349       => p_rec.pjo_information3
350       ,p_pjo_information4
351       => p_rec.pjo_information4
352       ,p_pjo_information5
353       => p_rec.pjo_information5
354       ,p_pjo_information6
355       => p_rec.pjo_information6
356       ,p_pjo_information7
357       => p_rec.pjo_information7
358       ,p_pjo_information8
359       => p_rec.pjo_information8
360       ,p_pjo_information9
361       => p_rec.pjo_information9
362       ,p_pjo_information10
363       => p_rec.pjo_information10
364       ,p_pjo_information11
365       => p_rec.pjo_information11
366       ,p_pjo_information12
367       => p_rec.pjo_information12
368       ,p_pjo_information13
369       => p_rec.pjo_information13
370       ,p_pjo_information14
371       => p_rec.pjo_information14
372       ,p_pjo_information15
373       => p_rec.pjo_information15
374       ,p_pjo_information16
375       => p_rec.pjo_information16
376       ,p_pjo_information17
377       => p_rec.pjo_information17
378       ,p_pjo_information18
379       => p_rec.pjo_information18
380       ,p_pjo_information19
381       => p_rec.pjo_information19
382       ,p_pjo_information20
383       => p_rec.pjo_information20
384       ,p_pjo_information21
385       => p_rec.pjo_information21
386       ,p_pjo_information22
387       => p_rec.pjo_information22
388       ,p_pjo_information23
389       => p_rec.pjo_information23
390       ,p_pjo_information24
391       => p_rec.pjo_information24
392       ,p_pjo_information25
393       => p_rec.pjo_information25
394       ,p_pjo_information26
395       => p_rec.pjo_information26
396       ,p_pjo_information27
397       => p_rec.pjo_information27
398       ,p_pjo_information28
399       => p_rec.pjo_information28
400       ,p_pjo_information29
401       => p_rec.pjo_information29
402       ,p_pjo_information30
403       => p_rec.pjo_information30
404       ,p_object_version_number
405       => p_rec.object_version_number
406       ,p_all_assignments
407       => p_rec.all_assignments
408       ,p_period_months
409       => p_rec.period_months
410       ,p_previous_employer_id_o
411       => per_pjo_shd.g_old_rec.previous_employer_id
412       ,p_start_date_o
413       => per_pjo_shd.g_old_rec.start_date
414       ,p_end_date_o
415       => per_pjo_shd.g_old_rec.end_date
416       ,p_period_years_o
417       => per_pjo_shd.g_old_rec.period_years
418       ,p_period_days_o
419       => per_pjo_shd.g_old_rec.period_days
420       ,p_job_name_o
421       => per_pjo_shd.g_old_rec.job_name
422       ,p_employment_category_o
423       => per_pjo_shd.g_old_rec.employment_category
424       ,p_description_o
425       => per_pjo_shd.g_old_rec.description
426       ,p_pjo_attribute_category_o
427       => per_pjo_shd.g_old_rec.pjo_attribute_category
428       ,p_pjo_attribute1_o
429       => per_pjo_shd.g_old_rec.pjo_attribute1
430       ,p_pjo_attribute2_o
431       => per_pjo_shd.g_old_rec.pjo_attribute2
432       ,p_pjo_attribute3_o
433       => per_pjo_shd.g_old_rec.pjo_attribute3
434       ,p_pjo_attribute4_o
435       => per_pjo_shd.g_old_rec.pjo_attribute4
436       ,p_pjo_attribute5_o
437       => per_pjo_shd.g_old_rec.pjo_attribute5
438       ,p_pjo_attribute6_o
439       => per_pjo_shd.g_old_rec.pjo_attribute6
440       ,p_pjo_attribute7_o
441       => per_pjo_shd.g_old_rec.pjo_attribute7
442       ,p_pjo_attribute8_o
443       => per_pjo_shd.g_old_rec.pjo_attribute8
444       ,p_pjo_attribute9_o
445       => per_pjo_shd.g_old_rec.pjo_attribute9
446       ,p_pjo_attribute10_o
447       => per_pjo_shd.g_old_rec.pjo_attribute10
448       ,p_pjo_attribute11_o
449       => per_pjo_shd.g_old_rec.pjo_attribute11
450       ,p_pjo_attribute12_o
451       => per_pjo_shd.g_old_rec.pjo_attribute12
452       ,p_pjo_attribute13_o
453       => per_pjo_shd.g_old_rec.pjo_attribute13
454       ,p_pjo_attribute14_o
455       => per_pjo_shd.g_old_rec.pjo_attribute14
456       ,p_pjo_attribute15_o
457       => per_pjo_shd.g_old_rec.pjo_attribute15
458       ,p_pjo_attribute16_o
459       => per_pjo_shd.g_old_rec.pjo_attribute16
460       ,p_pjo_attribute17_o
461       => per_pjo_shd.g_old_rec.pjo_attribute17
462       ,p_pjo_attribute18_o
463       => per_pjo_shd.g_old_rec.pjo_attribute18
464       ,p_pjo_attribute19_o
465       => per_pjo_shd.g_old_rec.pjo_attribute19
466       ,p_pjo_attribute20_o
467       => per_pjo_shd.g_old_rec.pjo_attribute20
468       ,p_pjo_attribute21_o
469       => per_pjo_shd.g_old_rec.pjo_attribute21
470       ,p_pjo_attribute22_o
471       => per_pjo_shd.g_old_rec.pjo_attribute22
472       ,p_pjo_attribute23_o
473       => per_pjo_shd.g_old_rec.pjo_attribute23
474       ,p_pjo_attribute24_o
475       => per_pjo_shd.g_old_rec.pjo_attribute24
476       ,p_pjo_attribute25_o
477       => per_pjo_shd.g_old_rec.pjo_attribute25
478       ,p_pjo_attribute26_o
479       => per_pjo_shd.g_old_rec.pjo_attribute26
480       ,p_pjo_attribute27_o
481       => per_pjo_shd.g_old_rec.pjo_attribute27
482       ,p_pjo_attribute28_o
483       => per_pjo_shd.g_old_rec.pjo_attribute28
484       ,p_pjo_attribute29_o
485       => per_pjo_shd.g_old_rec.pjo_attribute29
486       ,p_pjo_attribute30_o
487       => per_pjo_shd.g_old_rec.pjo_attribute30
488       ,p_pjo_information_category_o
489       => per_pjo_shd.g_old_rec.pjo_information_category
490       ,p_pjo_information1_o
491       => per_pjo_shd.g_old_rec.pjo_information1
492       ,p_pjo_information2_o
493       => per_pjo_shd.g_old_rec.pjo_information2
494       ,p_pjo_information3_o
495       => per_pjo_shd.g_old_rec.pjo_information3
496       ,p_pjo_information4_o
497       => per_pjo_shd.g_old_rec.pjo_information4
498       ,p_pjo_information5_o
499       => per_pjo_shd.g_old_rec.pjo_information5
500       ,p_pjo_information6_o
501       => per_pjo_shd.g_old_rec.pjo_information6
502       ,p_pjo_information7_o
503       => per_pjo_shd.g_old_rec.pjo_information7
504       ,p_pjo_information8_o
505       => per_pjo_shd.g_old_rec.pjo_information8
506       ,p_pjo_information9_o
507       => per_pjo_shd.g_old_rec.pjo_information9
508       ,p_pjo_information10_o
509       => per_pjo_shd.g_old_rec.pjo_information10
510       ,p_pjo_information11_o
511       => per_pjo_shd.g_old_rec.pjo_information11
512       ,p_pjo_information12_o
513       => per_pjo_shd.g_old_rec.pjo_information12
514       ,p_pjo_information13_o
515       => per_pjo_shd.g_old_rec.pjo_information13
516       ,p_pjo_information14_o
517       => per_pjo_shd.g_old_rec.pjo_information14
518       ,p_pjo_information15_o
519       => per_pjo_shd.g_old_rec.pjo_information15
520       ,p_pjo_information16_o
521       => per_pjo_shd.g_old_rec.pjo_information16
522       ,p_pjo_information17_o
523       => per_pjo_shd.g_old_rec.pjo_information17
524       ,p_pjo_information18_o
525       => per_pjo_shd.g_old_rec.pjo_information18
526       ,p_pjo_information19_o
527       => per_pjo_shd.g_old_rec.pjo_information19
528       ,p_pjo_information20_o
529       => per_pjo_shd.g_old_rec.pjo_information20
530       ,p_pjo_information21_o
531       => per_pjo_shd.g_old_rec.pjo_information21
532       ,p_pjo_information22_o
533       => per_pjo_shd.g_old_rec.pjo_information22
534       ,p_pjo_information23_o
535       => per_pjo_shd.g_old_rec.pjo_information23
536       ,p_pjo_information24_o
537       => per_pjo_shd.g_old_rec.pjo_information24
538       ,p_pjo_information25_o
539       => per_pjo_shd.g_old_rec.pjo_information25
540       ,p_pjo_information26_o
541       => per_pjo_shd.g_old_rec.pjo_information26
542       ,p_pjo_information27_o
543       => per_pjo_shd.g_old_rec.pjo_information27
544       ,p_pjo_information28_o
545       => per_pjo_shd.g_old_rec.pjo_information28
546       ,p_pjo_information29_o
547       => per_pjo_shd.g_old_rec.pjo_information29
548       ,p_pjo_information30_o
549       => per_pjo_shd.g_old_rec.pjo_information30
550       ,p_object_version_number_o
551       => per_pjo_shd.g_old_rec.object_version_number
552       ,p_all_assignments_o
553       => per_pjo_shd.g_old_rec.all_assignments
554       ,p_period_months_o
555       => per_pjo_shd.g_old_rec.period_months
556       );
557     --
558   exception
559     --
560     when hr_api.cannot_find_prog_unit then
561       --
562       hr_api.cannot_find_prog_unit_error
563         (p_module_name => 'PER_PREVIOUS_JOBS'
564         ,p_hook_type   => 'AU');
565       --
566   end;
567   --
568   hr_utility.set_location(' Leaving:'||l_proc, 10);
569 End post_update;
570 --
571 -- ----------------------------------------------------------------------------
572 -- |-----------------------------< convert_defs >-----------------------------|
573 -- ----------------------------------------------------------------------------
574 -- {Start Of Comments}
575 --
576 -- Description:
577 --   The Convert_Defs procedure has one very important function:
578 --   It must return the record structure for the row with all system defaulted
579 --   values converted into its corresponding parameter value for update. When
580 --   we attempt to update a row through the Upd process , certain
581 --   parameters can be defaulted which enables flexibility in the calling of
582 --   the upd process (e.g. only attributes which need to be updated need to be
583 --   specified). For the upd process to determine which attributes
584 --   have NOT been specified we need to check if the parameter has a reserved
585 --   system default value. Therefore, for all parameters which have a
586 --   corresponding reserved system default mechanism specified we need to
587 --   check if a system default is being used. If a system default is being
588 --   used then we convert the defaulted value into its corresponding attribute
589 --   value held in the g_old_rec data structure.
590 --
591 -- Prerequisites:
592 --   This private function can only be called from the upd process.
593 --
594 -- In Parameters:
595 --   A Pl/Sql record structure.
596 --
597 -- Post Success:
598 --   The record structure will be returned with all system defaulted parameter
599 --   values converted into its current row attribute value.
600 --
601 -- Post Failure:
602 --   No direct error handling is required within this function. Any possible
603 --   errors within this procedure will be a PL/SQL value error due to
604 --   conversion of datatypes or data lengths.
605 --
606 -- Developer Implementation Notes:
607 --   None.
608 --
609 -- Access Status:
610 --   Internal Row Handler Use Only.
611 --
612 -- {End Of Comments}
613 -- ----------------------------------------------------------------------------
614 Procedure convert_defs
615   (p_rec in out nocopy per_pjo_shd.g_rec_type
616   ) is
617 --
618 Begin
619   --
620   -- We must now examine each argument value in the
621   -- p_rec plsql record structure
622   -- to see if a system default is being used. If a system default
623   -- is being used then we must set to the 'current' argument value.
624   --
625   If (p_rec.previous_employer_id = hr_api.g_number) then
626     p_rec.previous_employer_id :=
627     per_pjo_shd.g_old_rec.previous_employer_id;
628   End If;
629   If (p_rec.start_date = hr_api.g_date) then
630     p_rec.start_date :=
631     per_pjo_shd.g_old_rec.start_date;
632   End If;
633   If (p_rec.end_date = hr_api.g_date) then
634     p_rec.end_date :=
635     per_pjo_shd.g_old_rec.end_date;
636   End If;
637   If (p_rec.period_years = hr_api.g_number) then
638     p_rec.period_years :=
639     per_pjo_shd.g_old_rec.period_years;
640   End If;
641   If (p_rec.period_days = hr_api.g_number) then
642     p_rec.period_days :=
643     per_pjo_shd.g_old_rec.period_days;
644   End If;
645   If (p_rec.job_name = hr_api.g_varchar2) then
646     p_rec.job_name :=
647     per_pjo_shd.g_old_rec.job_name;
648   End If;
649   If (p_rec.employment_category = hr_api.g_varchar2) then
650     p_rec.employment_category :=
651     per_pjo_shd.g_old_rec.employment_category;
652   End If;
653   If (p_rec.description = hr_api.g_varchar2) then
654     p_rec.description :=
655     per_pjo_shd.g_old_rec.description;
656   End If;
657   If (p_rec.pjo_attribute_category = hr_api.g_varchar2) then
658     p_rec.pjo_attribute_category :=
659     per_pjo_shd.g_old_rec.pjo_attribute_category;
660   End If;
661   If (p_rec.pjo_attribute1 = hr_api.g_varchar2) then
662     p_rec.pjo_attribute1 :=
663     per_pjo_shd.g_old_rec.pjo_attribute1;
664   End If;
665   If (p_rec.pjo_attribute2 = hr_api.g_varchar2) then
666     p_rec.pjo_attribute2 :=
667     per_pjo_shd.g_old_rec.pjo_attribute2;
668   End If;
669   If (p_rec.pjo_attribute3 = hr_api.g_varchar2) then
670     p_rec.pjo_attribute3 :=
671     per_pjo_shd.g_old_rec.pjo_attribute3;
672   End If;
673   If (p_rec.pjo_attribute4 = hr_api.g_varchar2) then
674     p_rec.pjo_attribute4 :=
675     per_pjo_shd.g_old_rec.pjo_attribute4;
676   End If;
677   If (p_rec.pjo_attribute5 = hr_api.g_varchar2) then
678     p_rec.pjo_attribute5 :=
679     per_pjo_shd.g_old_rec.pjo_attribute5;
680   End If;
681   If (p_rec.pjo_attribute6 = hr_api.g_varchar2) then
682     p_rec.pjo_attribute6 :=
683     per_pjo_shd.g_old_rec.pjo_attribute6;
684   End If;
685   If (p_rec.pjo_attribute7 = hr_api.g_varchar2) then
686     p_rec.pjo_attribute7 :=
687     per_pjo_shd.g_old_rec.pjo_attribute7;
688   End If;
689   If (p_rec.pjo_attribute8 = hr_api.g_varchar2) then
690     p_rec.pjo_attribute8 :=
691     per_pjo_shd.g_old_rec.pjo_attribute8;
692   End If;
693   If (p_rec.pjo_attribute9 = hr_api.g_varchar2) then
694     p_rec.pjo_attribute9 :=
695     per_pjo_shd.g_old_rec.pjo_attribute9;
696   End If;
697   If (p_rec.pjo_attribute10 = hr_api.g_varchar2) then
698     p_rec.pjo_attribute10 :=
699     per_pjo_shd.g_old_rec.pjo_attribute10;
700   End If;
701   If (p_rec.pjo_attribute11 = hr_api.g_varchar2) then
702     p_rec.pjo_attribute11 :=
703     per_pjo_shd.g_old_rec.pjo_attribute11;
704   End If;
705   If (p_rec.pjo_attribute12 = hr_api.g_varchar2) then
706     p_rec.pjo_attribute12 :=
707     per_pjo_shd.g_old_rec.pjo_attribute12;
708   End If;
709   If (p_rec.pjo_attribute13 = hr_api.g_varchar2) then
710     p_rec.pjo_attribute13 :=
711     per_pjo_shd.g_old_rec.pjo_attribute13;
712   End If;
713   If (p_rec.pjo_attribute14 = hr_api.g_varchar2) then
714     p_rec.pjo_attribute14 :=
715     per_pjo_shd.g_old_rec.pjo_attribute14;
716   End If;
717   If (p_rec.pjo_attribute15 = hr_api.g_varchar2) then
718     p_rec.pjo_attribute15 :=
719     per_pjo_shd.g_old_rec.pjo_attribute15;
720   End If;
721   If (p_rec.pjo_attribute16 = hr_api.g_varchar2) then
722     p_rec.pjo_attribute16 :=
723     per_pjo_shd.g_old_rec.pjo_attribute16;
724   End If;
725   If (p_rec.pjo_attribute17 = hr_api.g_varchar2) then
726     p_rec.pjo_attribute17 :=
727     per_pjo_shd.g_old_rec.pjo_attribute17;
728   End If;
729   If (p_rec.pjo_attribute18 = hr_api.g_varchar2) then
730     p_rec.pjo_attribute18 :=
731     per_pjo_shd.g_old_rec.pjo_attribute18;
732   End If;
733   If (p_rec.pjo_attribute19 = hr_api.g_varchar2) then
734     p_rec.pjo_attribute19 :=
735     per_pjo_shd.g_old_rec.pjo_attribute19;
736   End If;
737   If (p_rec.pjo_attribute20 = hr_api.g_varchar2) then
738     p_rec.pjo_attribute20 :=
739     per_pjo_shd.g_old_rec.pjo_attribute20;
740   End If;
741   If (p_rec.pjo_attribute21 = hr_api.g_varchar2) then
742     p_rec.pjo_attribute21 :=
743     per_pjo_shd.g_old_rec.pjo_attribute21;
744   End If;
745   If (p_rec.pjo_attribute22 = hr_api.g_varchar2) then
746     p_rec.pjo_attribute22 :=
747     per_pjo_shd.g_old_rec.pjo_attribute22;
748   End If;
749   If (p_rec.pjo_attribute23 = hr_api.g_varchar2) then
750     p_rec.pjo_attribute23 :=
751     per_pjo_shd.g_old_rec.pjo_attribute23;
752   End If;
753   If (p_rec.pjo_attribute24 = hr_api.g_varchar2) then
754     p_rec.pjo_attribute24 :=
755     per_pjo_shd.g_old_rec.pjo_attribute24;
756   End If;
757   If (p_rec.pjo_attribute25 = hr_api.g_varchar2) then
758     p_rec.pjo_attribute25 :=
759     per_pjo_shd.g_old_rec.pjo_attribute25;
760   End If;
761   If (p_rec.pjo_attribute26 = hr_api.g_varchar2) then
762     p_rec.pjo_attribute26 :=
763     per_pjo_shd.g_old_rec.pjo_attribute26;
764   End If;
765   If (p_rec.pjo_attribute27 = hr_api.g_varchar2) then
766     p_rec.pjo_attribute27 :=
767     per_pjo_shd.g_old_rec.pjo_attribute27;
768   End If;
769   If (p_rec.pjo_attribute28 = hr_api.g_varchar2) then
770     p_rec.pjo_attribute28 :=
771     per_pjo_shd.g_old_rec.pjo_attribute28;
772   End If;
773   If (p_rec.pjo_attribute29 = hr_api.g_varchar2) then
774     p_rec.pjo_attribute29 :=
775     per_pjo_shd.g_old_rec.pjo_attribute29;
776   End If;
777   If (p_rec.pjo_attribute30 = hr_api.g_varchar2) then
778     p_rec.pjo_attribute30 :=
779     per_pjo_shd.g_old_rec.pjo_attribute30;
780   End If;
781   If (p_rec.pjo_information_category = hr_api.g_varchar2) then
782     p_rec.pjo_information_category :=
783     per_pjo_shd.g_old_rec.pjo_information_category;
784   End If;
785   If (p_rec.pjo_information1 = hr_api.g_varchar2) then
786     p_rec.pjo_information1 :=
787     per_pjo_shd.g_old_rec.pjo_information1;
788   End If;
789   If (p_rec.pjo_information2 = hr_api.g_varchar2) then
790     p_rec.pjo_information2 :=
791     per_pjo_shd.g_old_rec.pjo_information2;
792   End If;
793   If (p_rec.pjo_information3 = hr_api.g_varchar2) then
794     p_rec.pjo_information3 :=
795     per_pjo_shd.g_old_rec.pjo_information3;
796   End If;
797   If (p_rec.pjo_information4 = hr_api.g_varchar2) then
798     p_rec.pjo_information4 :=
799     per_pjo_shd.g_old_rec.pjo_information4;
800   End If;
801   If (p_rec.pjo_information5 = hr_api.g_varchar2) then
802     p_rec.pjo_information5 :=
803     per_pjo_shd.g_old_rec.pjo_information5;
804   End If;
805   If (p_rec.pjo_information6 = hr_api.g_varchar2) then
806     p_rec.pjo_information6 :=
807     per_pjo_shd.g_old_rec.pjo_information6;
808   End If;
809   If (p_rec.pjo_information7 = hr_api.g_varchar2) then
810     p_rec.pjo_information7 :=
811     per_pjo_shd.g_old_rec.pjo_information7;
812   End If;
813   If (p_rec.pjo_information8 = hr_api.g_varchar2) then
814     p_rec.pjo_information8 :=
815     per_pjo_shd.g_old_rec.pjo_information8;
816   End If;
817   If (p_rec.pjo_information9 = hr_api.g_varchar2) then
818     p_rec.pjo_information9 :=
819     per_pjo_shd.g_old_rec.pjo_information9;
820   End If;
821   If (p_rec.pjo_information10 = hr_api.g_varchar2) then
822     p_rec.pjo_information10 :=
823     per_pjo_shd.g_old_rec.pjo_information10;
824   End If;
825   If (p_rec.pjo_information11 = hr_api.g_varchar2) then
826     p_rec.pjo_information11 :=
827     per_pjo_shd.g_old_rec.pjo_information11;
828   End If;
829   If (p_rec.pjo_information12 = hr_api.g_varchar2) then
830     p_rec.pjo_information12 :=
831     per_pjo_shd.g_old_rec.pjo_information12;
832   End If;
833   If (p_rec.pjo_information13 = hr_api.g_varchar2) then
834     p_rec.pjo_information13 :=
835     per_pjo_shd.g_old_rec.pjo_information13;
836   End If;
837   If (p_rec.pjo_information14 = hr_api.g_varchar2) then
838     p_rec.pjo_information14 :=
839     per_pjo_shd.g_old_rec.pjo_information14;
840   End If;
841   If (p_rec.pjo_information15 = hr_api.g_varchar2) then
842     p_rec.pjo_information15 :=
843     per_pjo_shd.g_old_rec.pjo_information15;
844   End If;
845   If (p_rec.pjo_information16 = hr_api.g_varchar2) then
846     p_rec.pjo_information16 :=
847     per_pjo_shd.g_old_rec.pjo_information16;
848   End If;
849   If (p_rec.pjo_information17 = hr_api.g_varchar2) then
850     p_rec.pjo_information17 :=
851     per_pjo_shd.g_old_rec.pjo_information17;
852   End If;
853   If (p_rec.pjo_information18 = hr_api.g_varchar2) then
854     p_rec.pjo_information18 :=
855     per_pjo_shd.g_old_rec.pjo_information18;
856   End If;
857   If (p_rec.pjo_information19 = hr_api.g_varchar2) then
858     p_rec.pjo_information19 :=
859     per_pjo_shd.g_old_rec.pjo_information19;
860   End If;
861   If (p_rec.pjo_information20 = hr_api.g_varchar2) then
862     p_rec.pjo_information20 :=
863     per_pjo_shd.g_old_rec.pjo_information20;
864   End If;
865   If (p_rec.pjo_information21 = hr_api.g_varchar2) then
866     p_rec.pjo_information21 :=
867     per_pjo_shd.g_old_rec.pjo_information21;
868   End If;
869   If (p_rec.pjo_information22 = hr_api.g_varchar2) then
870     p_rec.pjo_information22 :=
871     per_pjo_shd.g_old_rec.pjo_information22;
872   End If;
873   If (p_rec.pjo_information23 = hr_api.g_varchar2) then
874     p_rec.pjo_information23 :=
875     per_pjo_shd.g_old_rec.pjo_information23;
876   End If;
877   If (p_rec.pjo_information24 = hr_api.g_varchar2) then
878     p_rec.pjo_information24 :=
879     per_pjo_shd.g_old_rec.pjo_information24;
880   End If;
881   If (p_rec.pjo_information25 = hr_api.g_varchar2) then
882     p_rec.pjo_information25 :=
883     per_pjo_shd.g_old_rec.pjo_information25;
884   End If;
885   If (p_rec.pjo_information26 = hr_api.g_varchar2) then
886     p_rec.pjo_information26 :=
887     per_pjo_shd.g_old_rec.pjo_information26;
888   End If;
889   If (p_rec.pjo_information27 = hr_api.g_varchar2) then
890     p_rec.pjo_information27 :=
891     per_pjo_shd.g_old_rec.pjo_information27;
892   End If;
893   If (p_rec.pjo_information28 = hr_api.g_varchar2) then
894     p_rec.pjo_information28 :=
895     per_pjo_shd.g_old_rec.pjo_information28;
896   End If;
897   If (p_rec.pjo_information29 = hr_api.g_varchar2) then
898     p_rec.pjo_information29 :=
899     per_pjo_shd.g_old_rec.pjo_information29;
900   End If;
901   If (p_rec.pjo_information30 = hr_api.g_varchar2) then
902     p_rec.pjo_information30 :=
903     per_pjo_shd.g_old_rec.pjo_information30;
904   End If;
905   If (p_rec.all_assignments = hr_api.g_varchar2) then
906     p_rec.all_assignments :=
907     per_pjo_shd.g_old_rec.all_assignments;
908   End If;
909   If (p_rec.period_months = hr_api.g_number) then
910     p_rec.period_months :=
911     per_pjo_shd.g_old_rec.period_months;
912   End If;
913   --
914 End convert_defs;
915 --
916 -- ----------------------------------------------------------------------------
917 -- |---------------------------------< upd >----------------------------------|
918 -- ----------------------------------------------------------------------------
919 Procedure upd
920   (p_effective_date               in date
921   ,p_rec                          in out nocopy per_pjo_shd.g_rec_type
922   ) is
923 --
924   l_proc  varchar2(72) := g_package||'upd';
925 --
926 Begin
927   hr_utility.set_location('Entering:'||l_proc, 5);
928   --
929   -- We must lock the row which we need to update.
930   --
931   per_pjo_shd.lck
932     (p_rec.previous_job_id
933     ,p_rec.object_version_number
934     );
935   --
936   -- 1. During an update system defaults are used to determine if
937   --    arguments have been defaulted or not. We must therefore
938   --    derive the full record structure values to be updated.
939   --
940   -- 2. Call the supporting update validate operations.
941   --
942   convert_defs(p_rec);
943   per_pjo_bus.update_validate
944      (p_effective_date
945      ,p_rec
946      );
947   --
948   -- Call to raise any errors on multi-message list
949   hr_multi_message.end_validation_set;
950   -- Call the supporting pre-update operation
951   --
952   per_pjo_upd.pre_update(p_rec);
953   --
954   -- Update the row.
955   --
956   per_pjo_upd.update_dml(p_rec);
957   --
958   -- Call the supporting post-update operation
959   --
960   per_pjo_upd.post_update
961      (p_effective_date
962      ,p_rec
963      );
964      -- Call to raise any errors on multi-message list
965   hr_multi_message.end_validation_set;
966   --
967 End upd;
968 --
969 -- ----------------------------------------------------------------------------
970 -- |---------------------------------< upd >----------------------------------|
971 -- ----------------------------------------------------------------------------
972 Procedure upd
973   (p_effective_date               in     date
974   ,p_previous_job_id              in     number
975   ,p_object_version_number        in out nocopy number
976   ,p_previous_employer_id         in     number    default hr_api.g_number
977   ,p_start_date                   in     date      default hr_api.g_date
978   ,p_end_date                     in     date      default hr_api.g_date
979   ,p_period_years                 in     number    default hr_api.g_number
980   ,p_period_days                  in     number    default hr_api.g_number
981   ,p_job_name                     in     varchar2  default hr_api.g_varchar2
982   ,p_employment_category          in     varchar2  default hr_api.g_varchar2
983   ,p_description                  in     varchar2  default hr_api.g_varchar2
984   ,p_pjo_attribute_category       in     varchar2  default hr_api.g_varchar2
985   ,p_pjo_attribute1               in     varchar2  default hr_api.g_varchar2
986   ,p_pjo_attribute2               in     varchar2  default hr_api.g_varchar2
987   ,p_pjo_attribute3               in     varchar2  default hr_api.g_varchar2
988   ,p_pjo_attribute4               in     varchar2  default hr_api.g_varchar2
989   ,p_pjo_attribute5               in     varchar2  default hr_api.g_varchar2
990   ,p_pjo_attribute6               in     varchar2  default hr_api.g_varchar2
991   ,p_pjo_attribute7               in     varchar2  default hr_api.g_varchar2
992   ,p_pjo_attribute8               in     varchar2  default hr_api.g_varchar2
993   ,p_pjo_attribute9               in     varchar2  default hr_api.g_varchar2
994   ,p_pjo_attribute10              in     varchar2  default hr_api.g_varchar2
995   ,p_pjo_attribute11              in     varchar2  default hr_api.g_varchar2
996   ,p_pjo_attribute12              in     varchar2  default hr_api.g_varchar2
997   ,p_pjo_attribute13              in     varchar2  default hr_api.g_varchar2
998   ,p_pjo_attribute14              in     varchar2  default hr_api.g_varchar2
999   ,p_pjo_attribute15              in     varchar2  default hr_api.g_varchar2
1000   ,p_pjo_attribute16              in     varchar2  default hr_api.g_varchar2
1001   ,p_pjo_attribute17              in     varchar2  default hr_api.g_varchar2
1002   ,p_pjo_attribute18              in     varchar2  default hr_api.g_varchar2
1003   ,p_pjo_attribute19              in     varchar2  default hr_api.g_varchar2
1004   ,p_pjo_attribute20              in     varchar2  default hr_api.g_varchar2
1005   ,p_pjo_attribute21              in     varchar2  default hr_api.g_varchar2
1006   ,p_pjo_attribute22              in     varchar2  default hr_api.g_varchar2
1007   ,p_pjo_attribute23              in     varchar2  default hr_api.g_varchar2
1008   ,p_pjo_attribute24              in     varchar2  default hr_api.g_varchar2
1009   ,p_pjo_attribute25              in     varchar2  default hr_api.g_varchar2
1010   ,p_pjo_attribute26              in     varchar2  default hr_api.g_varchar2
1011   ,p_pjo_attribute27              in     varchar2  default hr_api.g_varchar2
1012   ,p_pjo_attribute28              in     varchar2  default hr_api.g_varchar2
1013   ,p_pjo_attribute29              in     varchar2  default hr_api.g_varchar2
1014   ,p_pjo_attribute30              in     varchar2  default hr_api.g_varchar2
1015   ,p_pjo_information_category     in     varchar2  default hr_api.g_varchar2
1016   ,p_pjo_information1             in     varchar2  default hr_api.g_varchar2
1017   ,p_pjo_information2             in     varchar2  default hr_api.g_varchar2
1018   ,p_pjo_information3             in     varchar2  default hr_api.g_varchar2
1019   ,p_pjo_information4             in     varchar2  default hr_api.g_varchar2
1020   ,p_pjo_information5             in     varchar2  default hr_api.g_varchar2
1021   ,p_pjo_information6             in     varchar2  default hr_api.g_varchar2
1022   ,p_pjo_information7             in     varchar2  default hr_api.g_varchar2
1023   ,p_pjo_information8             in     varchar2  default hr_api.g_varchar2
1024   ,p_pjo_information9             in     varchar2  default hr_api.g_varchar2
1025   ,p_pjo_information10            in     varchar2  default hr_api.g_varchar2
1026   ,p_pjo_information11            in     varchar2  default hr_api.g_varchar2
1027   ,p_pjo_information12            in     varchar2  default hr_api.g_varchar2
1028   ,p_pjo_information13            in     varchar2  default hr_api.g_varchar2
1029   ,p_pjo_information14            in     varchar2  default hr_api.g_varchar2
1030   ,p_pjo_information15            in     varchar2  default hr_api.g_varchar2
1031   ,p_pjo_information16            in     varchar2  default hr_api.g_varchar2
1032   ,p_pjo_information17            in     varchar2  default hr_api.g_varchar2
1033   ,p_pjo_information18            in     varchar2  default hr_api.g_varchar2
1034   ,p_pjo_information19            in     varchar2  default hr_api.g_varchar2
1035   ,p_pjo_information20            in     varchar2  default hr_api.g_varchar2
1036   ,p_pjo_information21            in     varchar2  default hr_api.g_varchar2
1037   ,p_pjo_information22            in     varchar2  default hr_api.g_varchar2
1038   ,p_pjo_information23            in     varchar2  default hr_api.g_varchar2
1039   ,p_pjo_information24            in     varchar2  default hr_api.g_varchar2
1040   ,p_pjo_information25            in     varchar2  default hr_api.g_varchar2
1041   ,p_pjo_information26            in     varchar2  default hr_api.g_varchar2
1042   ,p_pjo_information27            in     varchar2  default hr_api.g_varchar2
1043   ,p_pjo_information28            in     varchar2  default hr_api.g_varchar2
1044   ,p_pjo_information29            in     varchar2  default hr_api.g_varchar2
1045   ,p_pjo_information30            in     varchar2  default hr_api.g_varchar2
1046   ,p_all_assignments              in     varchar2  default hr_api.g_varchar2
1047   ,p_period_months                in     number    default hr_api.g_number
1048   ) is
1049 --
1050   l_rec   per_pjo_shd.g_rec_type;
1051   l_proc  varchar2(72) := g_package||'upd';
1052 --
1053 Begin
1054   hr_utility.set_location('Entering:'||l_proc, 5);
1055   --
1056   -- Call conversion function to turn arguments into the
1057   -- l_rec structure.
1058   --
1059   l_rec :=
1060   per_pjo_shd.convert_args
1061   (p_previous_job_id
1062   ,p_previous_employer_id
1063   ,p_start_date
1064   ,p_end_date
1065   ,p_period_years
1066   ,p_period_days
1067   ,p_job_name
1068   ,p_employment_category
1069   ,p_description
1070   ,p_pjo_attribute_category
1071   ,p_pjo_attribute1
1072   ,p_pjo_attribute2
1073   ,p_pjo_attribute3
1074   ,p_pjo_attribute4
1075   ,p_pjo_attribute5
1076   ,p_pjo_attribute6
1077   ,p_pjo_attribute7
1078   ,p_pjo_attribute8
1079   ,p_pjo_attribute9
1080   ,p_pjo_attribute10
1081   ,p_pjo_attribute11
1082   ,p_pjo_attribute12
1083   ,p_pjo_attribute13
1084   ,p_pjo_attribute14
1085   ,p_pjo_attribute15
1086   ,p_pjo_attribute16
1087   ,p_pjo_attribute17
1088   ,p_pjo_attribute18
1089   ,p_pjo_attribute19
1090   ,p_pjo_attribute20
1091   ,p_pjo_attribute21
1092   ,p_pjo_attribute22
1093   ,p_pjo_attribute23
1094   ,p_pjo_attribute24
1095   ,p_pjo_attribute25
1096   ,p_pjo_attribute26
1097   ,p_pjo_attribute27
1098   ,p_pjo_attribute28
1099   ,p_pjo_attribute29
1100   ,p_pjo_attribute30
1101   ,p_pjo_information_category
1102   ,p_pjo_information1
1103   ,p_pjo_information2
1104   ,p_pjo_information3
1105   ,p_pjo_information4
1106   ,p_pjo_information5
1107   ,p_pjo_information6
1108   ,p_pjo_information7
1109   ,p_pjo_information8
1110   ,p_pjo_information9
1111   ,p_pjo_information10
1112   ,p_pjo_information11
1113   ,p_pjo_information12
1114   ,p_pjo_information13
1115   ,p_pjo_information14
1116   ,p_pjo_information15
1117   ,p_pjo_information16
1118   ,p_pjo_information17
1119   ,p_pjo_information18
1120   ,p_pjo_information19
1121   ,p_pjo_information20
1122   ,p_pjo_information21
1123   ,p_pjo_information22
1124   ,p_pjo_information23
1125   ,p_pjo_information24
1126   ,p_pjo_information25
1127   ,p_pjo_information26
1128   ,p_pjo_information27
1129   ,p_pjo_information28
1130   ,p_pjo_information29
1131   ,p_pjo_information30
1132   ,p_object_version_number
1133   ,p_all_assignments
1134   ,p_period_months
1135   );
1136   --
1137   -- Having converted the arguments into the
1138   -- plsql record structure we call the corresponding record
1139   -- business process.
1140   --
1141   per_pjo_upd.upd
1142      (p_effective_date
1143      ,l_rec
1144      );
1145   p_object_version_number := l_rec.object_version_number;
1146   --
1147   hr_utility.set_location(' Leaving:'||l_proc, 10);
1148 End upd;
1149 --
1150 end per_pjo_upd;