[Home] [Help]
51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy per_ppb_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: l_rec per_ppb_shd.g_rec_type;
55: (p_rec in out nocopy per_ppb_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: l_rec per_ppb_shd.g_rec_type;
60: --
61: Begin
62: hr_utility.set_location('Entering:'||l_proc, 5);
63: l_rec := p_rec;
64: --
65: -- Increment the object version
66: p_rec.object_version_number := p_rec.object_version_number + 1;
67: --
68: per_ppb_shd.g_api_dml := true; -- Set the api dml status
69: --
70: -- Update the per_pay_bases Row
71: --
72: update per_pay_bases
125: ,information20 = p_rec.information20
126: ,object_version_number = p_rec.object_version_number
127: where pay_basis_id = p_rec.pay_basis_id;
128: --
129: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
130: --
131: hr_utility.set_location(' Leaving:'||l_proc, 10);
132: --
133: Exception
132: --
133: Exception
134: When hr_api.check_integrity_violated Then
135: -- A check constraint has been violated
136: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
137: p_rec := l_rec;
138: per_ppb_shd.constraint_error
139: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
140: When hr_api.parent_integrity_violated Then
134: When hr_api.check_integrity_violated Then
135: -- A check constraint has been violated
136: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
137: p_rec := l_rec;
138: per_ppb_shd.constraint_error
139: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
140: When hr_api.parent_integrity_violated Then
141: -- Parent integrity has been violated
142: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
138: per_ppb_shd.constraint_error
139: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
140: When hr_api.parent_integrity_violated Then
141: -- Parent integrity has been violated
142: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
143: p_rec := l_rec;
144: per_ppb_shd.constraint_error
145: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
146: When hr_api.unique_integrity_violated Then
140: When hr_api.parent_integrity_violated Then
141: -- Parent integrity has been violated
142: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
143: p_rec := l_rec;
144: per_ppb_shd.constraint_error
145: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
146: When hr_api.unique_integrity_violated Then
147: -- Unique integrity has been violated
148: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
144: per_ppb_shd.constraint_error
145: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
146: When hr_api.unique_integrity_violated Then
147: -- Unique integrity has been violated
148: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
149: p_rec := l_rec;
150: per_ppb_shd.constraint_error
151: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
152: When Others Then
146: When hr_api.unique_integrity_violated Then
147: -- Unique integrity has been violated
148: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
149: p_rec := l_rec;
150: per_ppb_shd.constraint_error
151: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
152: When Others Then
153: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
154: p_rec := l_rec;
149: p_rec := l_rec;
150: per_ppb_shd.constraint_error
151: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
152: When Others Then
153: per_ppb_shd.g_api_dml := false; -- Unset the api dml status
154: p_rec := l_rec;
155: Raise;
156: End update_dml;
157: --
187: --
188: -- {End Of Comments}
189: -- ----------------------------------------------------------------------------
190: Procedure pre_update
191: (p_rec in per_ppb_shd.g_rec_type
192: ) is
193: --
194: l_proc varchar2(72) := g_package||'pre_update';
195: --
231: --
232: -- {End Of Comments}
233: -- ----------------------------------------------------------------------------
234: Procedure post_update
235: (p_rec in per_ppb_shd.g_rec_type
236: ) is
237: --
238: l_proc varchar2(72) := g_package||'post_update';
239: --
348: => p_rec.information20
349: ,p_object_version_number
350: => p_rec.object_version_number
351: ,p_input_value_id_o
352: => per_ppb_shd.g_old_rec.input_value_id
353: ,p_rate_id_o
354: => per_ppb_shd.g_old_rec.rate_id
355: ,p_business_group_id_o
356: => per_ppb_shd.g_old_rec.business_group_id
350: => p_rec.object_version_number
351: ,p_input_value_id_o
352: => per_ppb_shd.g_old_rec.input_value_id
353: ,p_rate_id_o
354: => per_ppb_shd.g_old_rec.rate_id
355: ,p_business_group_id_o
356: => per_ppb_shd.g_old_rec.business_group_id
357: ,p_name_o
358: => per_ppb_shd.g_old_rec.name
352: => per_ppb_shd.g_old_rec.input_value_id
353: ,p_rate_id_o
354: => per_ppb_shd.g_old_rec.rate_id
355: ,p_business_group_id_o
356: => per_ppb_shd.g_old_rec.business_group_id
357: ,p_name_o
358: => per_ppb_shd.g_old_rec.name
359: ,p_pay_basis_o
360: => per_ppb_shd.g_old_rec.pay_basis
354: => per_ppb_shd.g_old_rec.rate_id
355: ,p_business_group_id_o
356: => per_ppb_shd.g_old_rec.business_group_id
357: ,p_name_o
358: => per_ppb_shd.g_old_rec.name
359: ,p_pay_basis_o
360: => per_ppb_shd.g_old_rec.pay_basis
361: ,p_rate_basis_o
362: => per_ppb_shd.g_old_rec.rate_basis
356: => per_ppb_shd.g_old_rec.business_group_id
357: ,p_name_o
358: => per_ppb_shd.g_old_rec.name
359: ,p_pay_basis_o
360: => per_ppb_shd.g_old_rec.pay_basis
361: ,p_rate_basis_o
362: => per_ppb_shd.g_old_rec.rate_basis
363: ,p_attribute_category_o
364: => per_ppb_shd.g_old_rec.attribute_category
358: => per_ppb_shd.g_old_rec.name
359: ,p_pay_basis_o
360: => per_ppb_shd.g_old_rec.pay_basis
361: ,p_rate_basis_o
362: => per_ppb_shd.g_old_rec.rate_basis
363: ,p_attribute_category_o
364: => per_ppb_shd.g_old_rec.attribute_category
365: ,p_attribute1_o
366: => per_ppb_shd.g_old_rec.attribute1
360: => per_ppb_shd.g_old_rec.pay_basis
361: ,p_rate_basis_o
362: => per_ppb_shd.g_old_rec.rate_basis
363: ,p_attribute_category_o
364: => per_ppb_shd.g_old_rec.attribute_category
365: ,p_attribute1_o
366: => per_ppb_shd.g_old_rec.attribute1
367: ,p_attribute2_o
368: => per_ppb_shd.g_old_rec.attribute2
362: => per_ppb_shd.g_old_rec.rate_basis
363: ,p_attribute_category_o
364: => per_ppb_shd.g_old_rec.attribute_category
365: ,p_attribute1_o
366: => per_ppb_shd.g_old_rec.attribute1
367: ,p_attribute2_o
368: => per_ppb_shd.g_old_rec.attribute2
369: ,p_attribute3_o
370: => per_ppb_shd.g_old_rec.attribute3
364: => per_ppb_shd.g_old_rec.attribute_category
365: ,p_attribute1_o
366: => per_ppb_shd.g_old_rec.attribute1
367: ,p_attribute2_o
368: => per_ppb_shd.g_old_rec.attribute2
369: ,p_attribute3_o
370: => per_ppb_shd.g_old_rec.attribute3
371: ,p_attribute4_o
372: => per_ppb_shd.g_old_rec.attribute4
366: => per_ppb_shd.g_old_rec.attribute1
367: ,p_attribute2_o
368: => per_ppb_shd.g_old_rec.attribute2
369: ,p_attribute3_o
370: => per_ppb_shd.g_old_rec.attribute3
371: ,p_attribute4_o
372: => per_ppb_shd.g_old_rec.attribute4
373: ,p_attribute5_o
374: => per_ppb_shd.g_old_rec.attribute5
368: => per_ppb_shd.g_old_rec.attribute2
369: ,p_attribute3_o
370: => per_ppb_shd.g_old_rec.attribute3
371: ,p_attribute4_o
372: => per_ppb_shd.g_old_rec.attribute4
373: ,p_attribute5_o
374: => per_ppb_shd.g_old_rec.attribute5
375: ,p_attribute6_o
376: => per_ppb_shd.g_old_rec.attribute6
370: => per_ppb_shd.g_old_rec.attribute3
371: ,p_attribute4_o
372: => per_ppb_shd.g_old_rec.attribute4
373: ,p_attribute5_o
374: => per_ppb_shd.g_old_rec.attribute5
375: ,p_attribute6_o
376: => per_ppb_shd.g_old_rec.attribute6
377: ,p_attribute7_o
378: => per_ppb_shd.g_old_rec.attribute7
372: => per_ppb_shd.g_old_rec.attribute4
373: ,p_attribute5_o
374: => per_ppb_shd.g_old_rec.attribute5
375: ,p_attribute6_o
376: => per_ppb_shd.g_old_rec.attribute6
377: ,p_attribute7_o
378: => per_ppb_shd.g_old_rec.attribute7
379: ,p_attribute8_o
380: => per_ppb_shd.g_old_rec.attribute8
374: => per_ppb_shd.g_old_rec.attribute5
375: ,p_attribute6_o
376: => per_ppb_shd.g_old_rec.attribute6
377: ,p_attribute7_o
378: => per_ppb_shd.g_old_rec.attribute7
379: ,p_attribute8_o
380: => per_ppb_shd.g_old_rec.attribute8
381: ,p_attribute9_o
382: => per_ppb_shd.g_old_rec.attribute9
376: => per_ppb_shd.g_old_rec.attribute6
377: ,p_attribute7_o
378: => per_ppb_shd.g_old_rec.attribute7
379: ,p_attribute8_o
380: => per_ppb_shd.g_old_rec.attribute8
381: ,p_attribute9_o
382: => per_ppb_shd.g_old_rec.attribute9
383: ,p_attribute10_o
384: => per_ppb_shd.g_old_rec.attribute10
378: => per_ppb_shd.g_old_rec.attribute7
379: ,p_attribute8_o
380: => per_ppb_shd.g_old_rec.attribute8
381: ,p_attribute9_o
382: => per_ppb_shd.g_old_rec.attribute9
383: ,p_attribute10_o
384: => per_ppb_shd.g_old_rec.attribute10
385: ,p_attribute11_o
386: => per_ppb_shd.g_old_rec.attribute11
380: => per_ppb_shd.g_old_rec.attribute8
381: ,p_attribute9_o
382: => per_ppb_shd.g_old_rec.attribute9
383: ,p_attribute10_o
384: => per_ppb_shd.g_old_rec.attribute10
385: ,p_attribute11_o
386: => per_ppb_shd.g_old_rec.attribute11
387: ,p_attribute12_o
388: => per_ppb_shd.g_old_rec.attribute12
382: => per_ppb_shd.g_old_rec.attribute9
383: ,p_attribute10_o
384: => per_ppb_shd.g_old_rec.attribute10
385: ,p_attribute11_o
386: => per_ppb_shd.g_old_rec.attribute11
387: ,p_attribute12_o
388: => per_ppb_shd.g_old_rec.attribute12
389: ,p_attribute13_o
390: => per_ppb_shd.g_old_rec.attribute13
384: => per_ppb_shd.g_old_rec.attribute10
385: ,p_attribute11_o
386: => per_ppb_shd.g_old_rec.attribute11
387: ,p_attribute12_o
388: => per_ppb_shd.g_old_rec.attribute12
389: ,p_attribute13_o
390: => per_ppb_shd.g_old_rec.attribute13
391: ,p_attribute14_o
392: => per_ppb_shd.g_old_rec.attribute14
386: => per_ppb_shd.g_old_rec.attribute11
387: ,p_attribute12_o
388: => per_ppb_shd.g_old_rec.attribute12
389: ,p_attribute13_o
390: => per_ppb_shd.g_old_rec.attribute13
391: ,p_attribute14_o
392: => per_ppb_shd.g_old_rec.attribute14
393: ,p_attribute15_o
394: => per_ppb_shd.g_old_rec.attribute15
388: => per_ppb_shd.g_old_rec.attribute12
389: ,p_attribute13_o
390: => per_ppb_shd.g_old_rec.attribute13
391: ,p_attribute14_o
392: => per_ppb_shd.g_old_rec.attribute14
393: ,p_attribute15_o
394: => per_ppb_shd.g_old_rec.attribute15
395: ,p_attribute16_o
396: => per_ppb_shd.g_old_rec.attribute16
390: => per_ppb_shd.g_old_rec.attribute13
391: ,p_attribute14_o
392: => per_ppb_shd.g_old_rec.attribute14
393: ,p_attribute15_o
394: => per_ppb_shd.g_old_rec.attribute15
395: ,p_attribute16_o
396: => per_ppb_shd.g_old_rec.attribute16
397: ,p_attribute17_o
398: => per_ppb_shd.g_old_rec.attribute17
392: => per_ppb_shd.g_old_rec.attribute14
393: ,p_attribute15_o
394: => per_ppb_shd.g_old_rec.attribute15
395: ,p_attribute16_o
396: => per_ppb_shd.g_old_rec.attribute16
397: ,p_attribute17_o
398: => per_ppb_shd.g_old_rec.attribute17
399: ,p_attribute18_o
400: => per_ppb_shd.g_old_rec.attribute18
394: => per_ppb_shd.g_old_rec.attribute15
395: ,p_attribute16_o
396: => per_ppb_shd.g_old_rec.attribute16
397: ,p_attribute17_o
398: => per_ppb_shd.g_old_rec.attribute17
399: ,p_attribute18_o
400: => per_ppb_shd.g_old_rec.attribute18
401: ,p_attribute19_o
402: => per_ppb_shd.g_old_rec.attribute19
396: => per_ppb_shd.g_old_rec.attribute16
397: ,p_attribute17_o
398: => per_ppb_shd.g_old_rec.attribute17
399: ,p_attribute18_o
400: => per_ppb_shd.g_old_rec.attribute18
401: ,p_attribute19_o
402: => per_ppb_shd.g_old_rec.attribute19
403: ,p_attribute20_o
404: => per_ppb_shd.g_old_rec.attribute20
398: => per_ppb_shd.g_old_rec.attribute17
399: ,p_attribute18_o
400: => per_ppb_shd.g_old_rec.attribute18
401: ,p_attribute19_o
402: => per_ppb_shd.g_old_rec.attribute19
403: ,p_attribute20_o
404: => per_ppb_shd.g_old_rec.attribute20
405: ,p_annualized_hours_o
406: => per_ppb_shd.g_old_rec.annualized_hours
400: => per_ppb_shd.g_old_rec.attribute18
401: ,p_attribute19_o
402: => per_ppb_shd.g_old_rec.attribute19
403: ,p_attribute20_o
404: => per_ppb_shd.g_old_rec.attribute20
405: ,p_annualized_hours_o
406: => per_ppb_shd.g_old_rec.annualized_hours
407: ,p_pay_annualization_factor_o
408: => per_ppb_shd.g_old_rec.pay_annualization_factor
402: => per_ppb_shd.g_old_rec.attribute19
403: ,p_attribute20_o
404: => per_ppb_shd.g_old_rec.attribute20
405: ,p_annualized_hours_o
406: => per_ppb_shd.g_old_rec.annualized_hours
407: ,p_pay_annualization_factor_o
408: => per_ppb_shd.g_old_rec.pay_annualization_factor
409: ,p_grade_annualization_factor_o
410: => per_ppb_shd.g_old_rec.grade_annualization_factor
404: => per_ppb_shd.g_old_rec.attribute20
405: ,p_annualized_hours_o
406: => per_ppb_shd.g_old_rec.annualized_hours
407: ,p_pay_annualization_factor_o
408: => per_ppb_shd.g_old_rec.pay_annualization_factor
409: ,p_grade_annualization_factor_o
410: => per_ppb_shd.g_old_rec.grade_annualization_factor
411: ,p_information_category_o
412: => per_ppb_shd.g_old_rec.information_category
406: => per_ppb_shd.g_old_rec.annualized_hours
407: ,p_pay_annualization_factor_o
408: => per_ppb_shd.g_old_rec.pay_annualization_factor
409: ,p_grade_annualization_factor_o
410: => per_ppb_shd.g_old_rec.grade_annualization_factor
411: ,p_information_category_o
412: => per_ppb_shd.g_old_rec.information_category
413: ,p_information1_o
414: => per_ppb_shd.g_old_rec.information1
408: => per_ppb_shd.g_old_rec.pay_annualization_factor
409: ,p_grade_annualization_factor_o
410: => per_ppb_shd.g_old_rec.grade_annualization_factor
411: ,p_information_category_o
412: => per_ppb_shd.g_old_rec.information_category
413: ,p_information1_o
414: => per_ppb_shd.g_old_rec.information1
415: ,p_information2_o
416: => per_ppb_shd.g_old_rec.information2
410: => per_ppb_shd.g_old_rec.grade_annualization_factor
411: ,p_information_category_o
412: => per_ppb_shd.g_old_rec.information_category
413: ,p_information1_o
414: => per_ppb_shd.g_old_rec.information1
415: ,p_information2_o
416: => per_ppb_shd.g_old_rec.information2
417: ,p_information3_o
418: => per_ppb_shd.g_old_rec.information3
412: => per_ppb_shd.g_old_rec.information_category
413: ,p_information1_o
414: => per_ppb_shd.g_old_rec.information1
415: ,p_information2_o
416: => per_ppb_shd.g_old_rec.information2
417: ,p_information3_o
418: => per_ppb_shd.g_old_rec.information3
419: ,p_information4_o
420: => per_ppb_shd.g_old_rec.information4
414: => per_ppb_shd.g_old_rec.information1
415: ,p_information2_o
416: => per_ppb_shd.g_old_rec.information2
417: ,p_information3_o
418: => per_ppb_shd.g_old_rec.information3
419: ,p_information4_o
420: => per_ppb_shd.g_old_rec.information4
421: ,p_information5_o
422: => per_ppb_shd.g_old_rec.information5
416: => per_ppb_shd.g_old_rec.information2
417: ,p_information3_o
418: => per_ppb_shd.g_old_rec.information3
419: ,p_information4_o
420: => per_ppb_shd.g_old_rec.information4
421: ,p_information5_o
422: => per_ppb_shd.g_old_rec.information5
423: ,p_information6_o
424: => per_ppb_shd.g_old_rec.information6
418: => per_ppb_shd.g_old_rec.information3
419: ,p_information4_o
420: => per_ppb_shd.g_old_rec.information4
421: ,p_information5_o
422: => per_ppb_shd.g_old_rec.information5
423: ,p_information6_o
424: => per_ppb_shd.g_old_rec.information6
425: ,p_information7_o
426: => per_ppb_shd.g_old_rec.information7
420: => per_ppb_shd.g_old_rec.information4
421: ,p_information5_o
422: => per_ppb_shd.g_old_rec.information5
423: ,p_information6_o
424: => per_ppb_shd.g_old_rec.information6
425: ,p_information7_o
426: => per_ppb_shd.g_old_rec.information7
427: ,p_information8_o
428: => per_ppb_shd.g_old_rec.information8
422: => per_ppb_shd.g_old_rec.information5
423: ,p_information6_o
424: => per_ppb_shd.g_old_rec.information6
425: ,p_information7_o
426: => per_ppb_shd.g_old_rec.information7
427: ,p_information8_o
428: => per_ppb_shd.g_old_rec.information8
429: ,p_information9_o
430: => per_ppb_shd.g_old_rec.information9
424: => per_ppb_shd.g_old_rec.information6
425: ,p_information7_o
426: => per_ppb_shd.g_old_rec.information7
427: ,p_information8_o
428: => per_ppb_shd.g_old_rec.information8
429: ,p_information9_o
430: => per_ppb_shd.g_old_rec.information9
431: ,p_information10_o
432: => per_ppb_shd.g_old_rec.information10
426: => per_ppb_shd.g_old_rec.information7
427: ,p_information8_o
428: => per_ppb_shd.g_old_rec.information8
429: ,p_information9_o
430: => per_ppb_shd.g_old_rec.information9
431: ,p_information10_o
432: => per_ppb_shd.g_old_rec.information10
433: ,p_information11_o
434: => per_ppb_shd.g_old_rec.information11
428: => per_ppb_shd.g_old_rec.information8
429: ,p_information9_o
430: => per_ppb_shd.g_old_rec.information9
431: ,p_information10_o
432: => per_ppb_shd.g_old_rec.information10
433: ,p_information11_o
434: => per_ppb_shd.g_old_rec.information11
435: ,p_information12_o
436: => per_ppb_shd.g_old_rec.information12
430: => per_ppb_shd.g_old_rec.information9
431: ,p_information10_o
432: => per_ppb_shd.g_old_rec.information10
433: ,p_information11_o
434: => per_ppb_shd.g_old_rec.information11
435: ,p_information12_o
436: => per_ppb_shd.g_old_rec.information12
437: ,p_information13_o
438: => per_ppb_shd.g_old_rec.information13
432: => per_ppb_shd.g_old_rec.information10
433: ,p_information11_o
434: => per_ppb_shd.g_old_rec.information11
435: ,p_information12_o
436: => per_ppb_shd.g_old_rec.information12
437: ,p_information13_o
438: => per_ppb_shd.g_old_rec.information13
439: ,p_information14_o
440: => per_ppb_shd.g_old_rec.information14
434: => per_ppb_shd.g_old_rec.information11
435: ,p_information12_o
436: => per_ppb_shd.g_old_rec.information12
437: ,p_information13_o
438: => per_ppb_shd.g_old_rec.information13
439: ,p_information14_o
440: => per_ppb_shd.g_old_rec.information14
441: ,p_information15_o
442: => per_ppb_shd.g_old_rec.information15
436: => per_ppb_shd.g_old_rec.information12
437: ,p_information13_o
438: => per_ppb_shd.g_old_rec.information13
439: ,p_information14_o
440: => per_ppb_shd.g_old_rec.information14
441: ,p_information15_o
442: => per_ppb_shd.g_old_rec.information15
443: ,p_information16_o
444: => per_ppb_shd.g_old_rec.information16
438: => per_ppb_shd.g_old_rec.information13
439: ,p_information14_o
440: => per_ppb_shd.g_old_rec.information14
441: ,p_information15_o
442: => per_ppb_shd.g_old_rec.information15
443: ,p_information16_o
444: => per_ppb_shd.g_old_rec.information16
445: ,p_information17_o
446: => per_ppb_shd.g_old_rec.information17
440: => per_ppb_shd.g_old_rec.information14
441: ,p_information15_o
442: => per_ppb_shd.g_old_rec.information15
443: ,p_information16_o
444: => per_ppb_shd.g_old_rec.information16
445: ,p_information17_o
446: => per_ppb_shd.g_old_rec.information17
447: ,p_information18_o
448: => per_ppb_shd.g_old_rec.information18
442: => per_ppb_shd.g_old_rec.information15
443: ,p_information16_o
444: => per_ppb_shd.g_old_rec.information16
445: ,p_information17_o
446: => per_ppb_shd.g_old_rec.information17
447: ,p_information18_o
448: => per_ppb_shd.g_old_rec.information18
449: ,p_information19_o
450: => per_ppb_shd.g_old_rec.information19
444: => per_ppb_shd.g_old_rec.information16
445: ,p_information17_o
446: => per_ppb_shd.g_old_rec.information17
447: ,p_information18_o
448: => per_ppb_shd.g_old_rec.information18
449: ,p_information19_o
450: => per_ppb_shd.g_old_rec.information19
451: ,p_information20_o
452: => per_ppb_shd.g_old_rec.information20
446: => per_ppb_shd.g_old_rec.information17
447: ,p_information18_o
448: => per_ppb_shd.g_old_rec.information18
449: ,p_information19_o
450: => per_ppb_shd.g_old_rec.information19
451: ,p_information20_o
452: => per_ppb_shd.g_old_rec.information20
453: ,p_object_version_number_o
454: => per_ppb_shd.g_old_rec.object_version_number
448: => per_ppb_shd.g_old_rec.information18
449: ,p_information19_o
450: => per_ppb_shd.g_old_rec.information19
451: ,p_information20_o
452: => per_ppb_shd.g_old_rec.information20
453: ,p_object_version_number_o
454: => per_ppb_shd.g_old_rec.object_version_number
455: );
456: --
450: => per_ppb_shd.g_old_rec.information19
451: ,p_information20_o
452: => per_ppb_shd.g_old_rec.information20
453: ,p_object_version_number_o
454: => per_ppb_shd.g_old_rec.object_version_number
455: );
456: --
457: exception
458: --
510: --
511: -- {End Of Comments}
512: -- ----------------------------------------------------------------------------
513: Procedure convert_defs
514: (p_rec in out nocopy per_ppb_shd.g_rec_type
515: ) is
516: --
517: l_rec per_ppb_shd.g_rec_type ;
518: Begin
513: Procedure convert_defs
514: (p_rec in out nocopy per_ppb_shd.g_rec_type
515: ) is
516: --
517: l_rec per_ppb_shd.g_rec_type ;
518: Begin
519: --
520: -- We must now examine each argument value in the
521: -- p_rec plsql record structure
525: l_rec := p_rec;
526:
527: If (p_rec.input_value_id = hr_api.g_number) then
528: p_rec.input_value_id :=
529: per_ppb_shd.g_old_rec.input_value_id;
530: End If;
531: If (p_rec.rate_id = hr_api.g_number) then
532: p_rec.rate_id :=
533: per_ppb_shd.g_old_rec.rate_id;
529: per_ppb_shd.g_old_rec.input_value_id;
530: End If;
531: If (p_rec.rate_id = hr_api.g_number) then
532: p_rec.rate_id :=
533: per_ppb_shd.g_old_rec.rate_id;
534: End If;
535: If (p_rec.business_group_id = hr_api.g_number) then
536: p_rec.business_group_id :=
537: per_ppb_shd.g_old_rec.business_group_id;
533: per_ppb_shd.g_old_rec.rate_id;
534: End If;
535: If (p_rec.business_group_id = hr_api.g_number) then
536: p_rec.business_group_id :=
537: per_ppb_shd.g_old_rec.business_group_id;
538: End If;
539: If (p_rec.name = hr_api.g_varchar2) then
540: p_rec.name :=
541: per_ppb_shd.g_old_rec.name;
537: per_ppb_shd.g_old_rec.business_group_id;
538: End If;
539: If (p_rec.name = hr_api.g_varchar2) then
540: p_rec.name :=
541: per_ppb_shd.g_old_rec.name;
542: End If;
543: If (p_rec.pay_basis = hr_api.g_varchar2) then
544: p_rec.pay_basis :=
545: per_ppb_shd.g_old_rec.pay_basis;
541: per_ppb_shd.g_old_rec.name;
542: End If;
543: If (p_rec.pay_basis = hr_api.g_varchar2) then
544: p_rec.pay_basis :=
545: per_ppb_shd.g_old_rec.pay_basis;
546: End If;
547: If (p_rec.rate_basis = hr_api.g_varchar2) then
548: p_rec.rate_basis :=
549: per_ppb_shd.g_old_rec.rate_basis;
545: per_ppb_shd.g_old_rec.pay_basis;
546: End If;
547: If (p_rec.rate_basis = hr_api.g_varchar2) then
548: p_rec.rate_basis :=
549: per_ppb_shd.g_old_rec.rate_basis;
550: End If;
551: If (p_rec.attribute_category = hr_api.g_varchar2) then
552: p_rec.attribute_category :=
553: per_ppb_shd.g_old_rec.attribute_category;
549: per_ppb_shd.g_old_rec.rate_basis;
550: End If;
551: If (p_rec.attribute_category = hr_api.g_varchar2) then
552: p_rec.attribute_category :=
553: per_ppb_shd.g_old_rec.attribute_category;
554: End If;
555: If (p_rec.attribute1 = hr_api.g_varchar2) then
556: p_rec.attribute1 :=
557: per_ppb_shd.g_old_rec.attribute1;
553: per_ppb_shd.g_old_rec.attribute_category;
554: End If;
555: If (p_rec.attribute1 = hr_api.g_varchar2) then
556: p_rec.attribute1 :=
557: per_ppb_shd.g_old_rec.attribute1;
558: End If;
559: If (p_rec.attribute2 = hr_api.g_varchar2) then
560: p_rec.attribute2 :=
561: per_ppb_shd.g_old_rec.attribute2;
557: per_ppb_shd.g_old_rec.attribute1;
558: End If;
559: If (p_rec.attribute2 = hr_api.g_varchar2) then
560: p_rec.attribute2 :=
561: per_ppb_shd.g_old_rec.attribute2;
562: End If;
563: If (p_rec.attribute3 = hr_api.g_varchar2) then
564: p_rec.attribute3 :=
565: per_ppb_shd.g_old_rec.attribute3;
561: per_ppb_shd.g_old_rec.attribute2;
562: End If;
563: If (p_rec.attribute3 = hr_api.g_varchar2) then
564: p_rec.attribute3 :=
565: per_ppb_shd.g_old_rec.attribute3;
566: End If;
567: If (p_rec.attribute4 = hr_api.g_varchar2) then
568: p_rec.attribute4 :=
569: per_ppb_shd.g_old_rec.attribute4;
565: per_ppb_shd.g_old_rec.attribute3;
566: End If;
567: If (p_rec.attribute4 = hr_api.g_varchar2) then
568: p_rec.attribute4 :=
569: per_ppb_shd.g_old_rec.attribute4;
570: End If;
571: If (p_rec.attribute5 = hr_api.g_varchar2) then
572: p_rec.attribute5 :=
573: per_ppb_shd.g_old_rec.attribute5;
569: per_ppb_shd.g_old_rec.attribute4;
570: End If;
571: If (p_rec.attribute5 = hr_api.g_varchar2) then
572: p_rec.attribute5 :=
573: per_ppb_shd.g_old_rec.attribute5;
574: End If;
575: If (p_rec.attribute6 = hr_api.g_varchar2) then
576: p_rec.attribute6 :=
577: per_ppb_shd.g_old_rec.attribute6;
573: per_ppb_shd.g_old_rec.attribute5;
574: End If;
575: If (p_rec.attribute6 = hr_api.g_varchar2) then
576: p_rec.attribute6 :=
577: per_ppb_shd.g_old_rec.attribute6;
578: End If;
579: If (p_rec.attribute7 = hr_api.g_varchar2) then
580: p_rec.attribute7 :=
581: per_ppb_shd.g_old_rec.attribute7;
577: per_ppb_shd.g_old_rec.attribute6;
578: End If;
579: If (p_rec.attribute7 = hr_api.g_varchar2) then
580: p_rec.attribute7 :=
581: per_ppb_shd.g_old_rec.attribute7;
582: End If;
583: If (p_rec.attribute8 = hr_api.g_varchar2) then
584: p_rec.attribute8 :=
585: per_ppb_shd.g_old_rec.attribute8;
581: per_ppb_shd.g_old_rec.attribute7;
582: End If;
583: If (p_rec.attribute8 = hr_api.g_varchar2) then
584: p_rec.attribute8 :=
585: per_ppb_shd.g_old_rec.attribute8;
586: End If;
587: If (p_rec.attribute9 = hr_api.g_varchar2) then
588: p_rec.attribute9 :=
589: per_ppb_shd.g_old_rec.attribute9;
585: per_ppb_shd.g_old_rec.attribute8;
586: End If;
587: If (p_rec.attribute9 = hr_api.g_varchar2) then
588: p_rec.attribute9 :=
589: per_ppb_shd.g_old_rec.attribute9;
590: End If;
591: If (p_rec.attribute10 = hr_api.g_varchar2) then
592: p_rec.attribute10 :=
593: per_ppb_shd.g_old_rec.attribute10;
589: per_ppb_shd.g_old_rec.attribute9;
590: End If;
591: If (p_rec.attribute10 = hr_api.g_varchar2) then
592: p_rec.attribute10 :=
593: per_ppb_shd.g_old_rec.attribute10;
594: End If;
595: If (p_rec.attribute11 = hr_api.g_varchar2) then
596: p_rec.attribute11 :=
597: per_ppb_shd.g_old_rec.attribute11;
593: per_ppb_shd.g_old_rec.attribute10;
594: End If;
595: If (p_rec.attribute11 = hr_api.g_varchar2) then
596: p_rec.attribute11 :=
597: per_ppb_shd.g_old_rec.attribute11;
598: End If;
599: If (p_rec.attribute12 = hr_api.g_varchar2) then
600: p_rec.attribute12 :=
601: per_ppb_shd.g_old_rec.attribute12;
597: per_ppb_shd.g_old_rec.attribute11;
598: End If;
599: If (p_rec.attribute12 = hr_api.g_varchar2) then
600: p_rec.attribute12 :=
601: per_ppb_shd.g_old_rec.attribute12;
602: End If;
603: If (p_rec.attribute13 = hr_api.g_varchar2) then
604: p_rec.attribute13 :=
605: per_ppb_shd.g_old_rec.attribute13;
601: per_ppb_shd.g_old_rec.attribute12;
602: End If;
603: If (p_rec.attribute13 = hr_api.g_varchar2) then
604: p_rec.attribute13 :=
605: per_ppb_shd.g_old_rec.attribute13;
606: End If;
607: If (p_rec.attribute14 = hr_api.g_varchar2) then
608: p_rec.attribute14 :=
609: per_ppb_shd.g_old_rec.attribute14;
605: per_ppb_shd.g_old_rec.attribute13;
606: End If;
607: If (p_rec.attribute14 = hr_api.g_varchar2) then
608: p_rec.attribute14 :=
609: per_ppb_shd.g_old_rec.attribute14;
610: End If;
611: If (p_rec.attribute15 = hr_api.g_varchar2) then
612: p_rec.attribute15 :=
613: per_ppb_shd.g_old_rec.attribute15;
609: per_ppb_shd.g_old_rec.attribute14;
610: End If;
611: If (p_rec.attribute15 = hr_api.g_varchar2) then
612: p_rec.attribute15 :=
613: per_ppb_shd.g_old_rec.attribute15;
614: End If;
615: If (p_rec.attribute16 = hr_api.g_varchar2) then
616: p_rec.attribute16 :=
617: per_ppb_shd.g_old_rec.attribute16;
613: per_ppb_shd.g_old_rec.attribute15;
614: End If;
615: If (p_rec.attribute16 = hr_api.g_varchar2) then
616: p_rec.attribute16 :=
617: per_ppb_shd.g_old_rec.attribute16;
618: End If;
619: If (p_rec.attribute17 = hr_api.g_varchar2) then
620: p_rec.attribute17 :=
621: per_ppb_shd.g_old_rec.attribute17;
617: per_ppb_shd.g_old_rec.attribute16;
618: End If;
619: If (p_rec.attribute17 = hr_api.g_varchar2) then
620: p_rec.attribute17 :=
621: per_ppb_shd.g_old_rec.attribute17;
622: End If;
623: If (p_rec.attribute18 = hr_api.g_varchar2) then
624: p_rec.attribute18 :=
625: per_ppb_shd.g_old_rec.attribute18;
621: per_ppb_shd.g_old_rec.attribute17;
622: End If;
623: If (p_rec.attribute18 = hr_api.g_varchar2) then
624: p_rec.attribute18 :=
625: per_ppb_shd.g_old_rec.attribute18;
626: End If;
627: If (p_rec.attribute19 = hr_api.g_varchar2) then
628: p_rec.attribute19 :=
629: per_ppb_shd.g_old_rec.attribute19;
625: per_ppb_shd.g_old_rec.attribute18;
626: End If;
627: If (p_rec.attribute19 = hr_api.g_varchar2) then
628: p_rec.attribute19 :=
629: per_ppb_shd.g_old_rec.attribute19;
630: End If;
631: If (p_rec.attribute20 = hr_api.g_varchar2) then
632: p_rec.attribute20 :=
633: per_ppb_shd.g_old_rec.attribute20;
629: per_ppb_shd.g_old_rec.attribute19;
630: End If;
631: If (p_rec.attribute20 = hr_api.g_varchar2) then
632: p_rec.attribute20 :=
633: per_ppb_shd.g_old_rec.attribute20;
634: End If;
635: If (p_rec.annualized_hours = hr_api.g_number) then
636: p_rec.annualized_hours :=
637: per_ppb_shd.g_old_rec.annualized_hours;
633: per_ppb_shd.g_old_rec.attribute20;
634: End If;
635: If (p_rec.annualized_hours = hr_api.g_number) then
636: p_rec.annualized_hours :=
637: per_ppb_shd.g_old_rec.annualized_hours;
638: End If;
639: If (p_rec.pay_annualization_factor = hr_api.g_number) then
640: p_rec.pay_annualization_factor :=
641: per_ppb_shd.g_old_rec.pay_annualization_factor;
637: per_ppb_shd.g_old_rec.annualized_hours;
638: End If;
639: If (p_rec.pay_annualization_factor = hr_api.g_number) then
640: p_rec.pay_annualization_factor :=
641: per_ppb_shd.g_old_rec.pay_annualization_factor;
642: End If;
643: If (p_rec.grade_annualization_factor = hr_api.g_number) then
644: p_rec.grade_annualization_factor :=
645: per_ppb_shd.g_old_rec.grade_annualization_factor;
641: per_ppb_shd.g_old_rec.pay_annualization_factor;
642: End If;
643: If (p_rec.grade_annualization_factor = hr_api.g_number) then
644: p_rec.grade_annualization_factor :=
645: per_ppb_shd.g_old_rec.grade_annualization_factor;
646: End If;
647: If (p_rec.information_category = hr_api.g_varchar2) then
648: p_rec.information_category :=
649: per_ppb_shd.g_old_rec.information_category;
645: per_ppb_shd.g_old_rec.grade_annualization_factor;
646: End If;
647: If (p_rec.information_category = hr_api.g_varchar2) then
648: p_rec.information_category :=
649: per_ppb_shd.g_old_rec.information_category;
650: End If;
651: If (p_rec.information1 = hr_api.g_varchar2) then
652: p_rec.information1 :=
653: per_ppb_shd.g_old_rec.information1;
649: per_ppb_shd.g_old_rec.information_category;
650: End If;
651: If (p_rec.information1 = hr_api.g_varchar2) then
652: p_rec.information1 :=
653: per_ppb_shd.g_old_rec.information1;
654: End If;
655: If (p_rec.information2 = hr_api.g_varchar2) then
656: p_rec.information2 :=
657: per_ppb_shd.g_old_rec.information2;
653: per_ppb_shd.g_old_rec.information1;
654: End If;
655: If (p_rec.information2 = hr_api.g_varchar2) then
656: p_rec.information2 :=
657: per_ppb_shd.g_old_rec.information2;
658: End If;
659: If (p_rec.information3 = hr_api.g_varchar2) then
660: p_rec.information3 :=
661: per_ppb_shd.g_old_rec.information3;
657: per_ppb_shd.g_old_rec.information2;
658: End If;
659: If (p_rec.information3 = hr_api.g_varchar2) then
660: p_rec.information3 :=
661: per_ppb_shd.g_old_rec.information3;
662: End If;
663: If (p_rec.information4 = hr_api.g_varchar2) then
664: p_rec.information4 :=
665: per_ppb_shd.g_old_rec.information4;
661: per_ppb_shd.g_old_rec.information3;
662: End If;
663: If (p_rec.information4 = hr_api.g_varchar2) then
664: p_rec.information4 :=
665: per_ppb_shd.g_old_rec.information4;
666: End If;
667: If (p_rec.information5 = hr_api.g_varchar2) then
668: p_rec.information5 :=
669: per_ppb_shd.g_old_rec.information5;
665: per_ppb_shd.g_old_rec.information4;
666: End If;
667: If (p_rec.information5 = hr_api.g_varchar2) then
668: p_rec.information5 :=
669: per_ppb_shd.g_old_rec.information5;
670: End If;
671: If (p_rec.information6 = hr_api.g_varchar2) then
672: p_rec.information6 :=
673: per_ppb_shd.g_old_rec.information6;
669: per_ppb_shd.g_old_rec.information5;
670: End If;
671: If (p_rec.information6 = hr_api.g_varchar2) then
672: p_rec.information6 :=
673: per_ppb_shd.g_old_rec.information6;
674: End If;
675: If (p_rec.information7 = hr_api.g_varchar2) then
676: p_rec.information7 :=
677: per_ppb_shd.g_old_rec.information7;
673: per_ppb_shd.g_old_rec.information6;
674: End If;
675: If (p_rec.information7 = hr_api.g_varchar2) then
676: p_rec.information7 :=
677: per_ppb_shd.g_old_rec.information7;
678: End If;
679: If (p_rec.information8 = hr_api.g_varchar2) then
680: p_rec.information8 :=
681: per_ppb_shd.g_old_rec.information8;
677: per_ppb_shd.g_old_rec.information7;
678: End If;
679: If (p_rec.information8 = hr_api.g_varchar2) then
680: p_rec.information8 :=
681: per_ppb_shd.g_old_rec.information8;
682: End If;
683: If (p_rec.information9 = hr_api.g_varchar2) then
684: p_rec.information9 :=
685: per_ppb_shd.g_old_rec.information9;
681: per_ppb_shd.g_old_rec.information8;
682: End If;
683: If (p_rec.information9 = hr_api.g_varchar2) then
684: p_rec.information9 :=
685: per_ppb_shd.g_old_rec.information9;
686: End If;
687: If (p_rec.information10 = hr_api.g_varchar2) then
688: p_rec.information10 :=
689: per_ppb_shd.g_old_rec.information10;
685: per_ppb_shd.g_old_rec.information9;
686: End If;
687: If (p_rec.information10 = hr_api.g_varchar2) then
688: p_rec.information10 :=
689: per_ppb_shd.g_old_rec.information10;
690: End If;
691: If (p_rec.information11 = hr_api.g_varchar2) then
692: p_rec.information11 :=
693: per_ppb_shd.g_old_rec.information11;
689: per_ppb_shd.g_old_rec.information10;
690: End If;
691: If (p_rec.information11 = hr_api.g_varchar2) then
692: p_rec.information11 :=
693: per_ppb_shd.g_old_rec.information11;
694: End If;
695: If (p_rec.information12 = hr_api.g_varchar2) then
696: p_rec.information12 :=
697: per_ppb_shd.g_old_rec.information12;
693: per_ppb_shd.g_old_rec.information11;
694: End If;
695: If (p_rec.information12 = hr_api.g_varchar2) then
696: p_rec.information12 :=
697: per_ppb_shd.g_old_rec.information12;
698: End If;
699: If (p_rec.information13 = hr_api.g_varchar2) then
700: p_rec.information13 :=
701: per_ppb_shd.g_old_rec.information13;
697: per_ppb_shd.g_old_rec.information12;
698: End If;
699: If (p_rec.information13 = hr_api.g_varchar2) then
700: p_rec.information13 :=
701: per_ppb_shd.g_old_rec.information13;
702: End If;
703: If (p_rec.information14 = hr_api.g_varchar2) then
704: p_rec.information14 :=
705: per_ppb_shd.g_old_rec.information14;
701: per_ppb_shd.g_old_rec.information13;
702: End If;
703: If (p_rec.information14 = hr_api.g_varchar2) then
704: p_rec.information14 :=
705: per_ppb_shd.g_old_rec.information14;
706: End If;
707: If (p_rec.information15 = hr_api.g_varchar2) then
708: p_rec.information15 :=
709: per_ppb_shd.g_old_rec.information15;
705: per_ppb_shd.g_old_rec.information14;
706: End If;
707: If (p_rec.information15 = hr_api.g_varchar2) then
708: p_rec.information15 :=
709: per_ppb_shd.g_old_rec.information15;
710: End If;
711: If (p_rec.information16 = hr_api.g_varchar2) then
712: p_rec.information16 :=
713: per_ppb_shd.g_old_rec.information16;
709: per_ppb_shd.g_old_rec.information15;
710: End If;
711: If (p_rec.information16 = hr_api.g_varchar2) then
712: p_rec.information16 :=
713: per_ppb_shd.g_old_rec.information16;
714: End If;
715: If (p_rec.information17 = hr_api.g_varchar2) then
716: p_rec.information17 :=
717: per_ppb_shd.g_old_rec.information17;
713: per_ppb_shd.g_old_rec.information16;
714: End If;
715: If (p_rec.information17 = hr_api.g_varchar2) then
716: p_rec.information17 :=
717: per_ppb_shd.g_old_rec.information17;
718: End If;
719: If (p_rec.information18 = hr_api.g_varchar2) then
720: p_rec.information18 :=
721: per_ppb_shd.g_old_rec.information18;
717: per_ppb_shd.g_old_rec.information17;
718: End If;
719: If (p_rec.information18 = hr_api.g_varchar2) then
720: p_rec.information18 :=
721: per_ppb_shd.g_old_rec.information18;
722: End If;
723: If (p_rec.information19 = hr_api.g_varchar2) then
724: p_rec.information19 :=
725: per_ppb_shd.g_old_rec.information19;
721: per_ppb_shd.g_old_rec.information18;
722: End If;
723: If (p_rec.information19 = hr_api.g_varchar2) then
724: p_rec.information19 :=
725: per_ppb_shd.g_old_rec.information19;
726: End If;
727: If (p_rec.information20 = hr_api.g_varchar2) then
728: p_rec.information20 :=
729: per_ppb_shd.g_old_rec.information20;
725: per_ppb_shd.g_old_rec.information19;
726: End If;
727: If (p_rec.information20 = hr_api.g_varchar2) then
728: p_rec.information20 :=
729: per_ppb_shd.g_old_rec.information20;
730: End If;
731: --
732: Exception
733: When Others Then
738: -- ----------------------------------------------------------------------------
739: -- |---------------------------------< upd >----------------------------------|
740: -- ----------------------------------------------------------------------------
741: Procedure upd
742: (p_rec in out nocopy per_ppb_shd.g_rec_type
743: ) is
744: --
745: l_proc varchar2(72) := g_package||'upd';
746: l_rec per_ppb_shd.g_rec_type;
742: (p_rec in out nocopy per_ppb_shd.g_rec_type
743: ) is
744: --
745: l_proc varchar2(72) := g_package||'upd';
746: l_rec per_ppb_shd.g_rec_type;
747: --
748: Begin
749: hr_utility.set_location('Entering:'||l_proc, 5);
750: l_rec := p_rec;
750: l_rec := p_rec;
751: --
752: -- We must lock the row which we need to update.
753: --
754: per_ppb_shd.lck
755: (p_rec.pay_basis_id
756: ,p_rec.object_version_number
757: );
758: --
849: ,p_information19 in varchar2 default hr_api.g_varchar2
850: ,p_information20 in varchar2 default hr_api.g_varchar2
851: ) is
852: --
853: l_rec per_ppb_shd.g_rec_type;
854: l_proc varchar2(72) := g_package||'upd';
855: l_object_version_number number;
856:
857: --
862: -- Call conversion function to turn arguments into the
863: -- l_rec structure.
864: --
865: l_rec :=
866: per_ppb_shd.convert_args
867: (p_pay_basis_id
868: ,p_input_value_id
869: ,p_rate_id
870: ,p_business_group_id