51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy per_psp_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: --
62: --
63: -- Increment the object version
64: p_rec.object_version_number := p_rec.object_version_number + 1;
65: --
66: per_psp_shd.g_api_dml := true; -- Set the api dml status
67: --
68: -- Update the per_spinal_points Row
69: --
70: update per_spinal_points
111: ,information29 = p_rec.information29
112: ,information30 = p_rec.information30
113: where spinal_point_id = p_rec.spinal_point_id;
114: --
115: per_psp_shd.g_api_dml := false; -- Unset the api dml status
116: --
117: hr_utility.set_location(' Leaving:'||l_proc, 10);
118: --
119: Exception
118: --
119: Exception
120: When hr_api.check_integrity_violated Then
121: -- A check constraint has been violated
122: per_psp_shd.g_api_dml := false; -- Unset the api dml status
123: per_psp_shd.constraint_error
124: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
125: When hr_api.parent_integrity_violated Then
126: -- Parent integrity has been violated
119: Exception
120: When hr_api.check_integrity_violated Then
121: -- A check constraint has been violated
122: per_psp_shd.g_api_dml := false; -- Unset the api dml status
123: per_psp_shd.constraint_error
124: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
125: When hr_api.parent_integrity_violated Then
126: -- Parent integrity has been violated
127: per_psp_shd.g_api_dml := false; -- Unset the api dml status
123: per_psp_shd.constraint_error
124: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
125: When hr_api.parent_integrity_violated Then
126: -- Parent integrity has been violated
127: per_psp_shd.g_api_dml := false; -- Unset the api dml status
128: per_psp_shd.constraint_error
129: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
130: When hr_api.unique_integrity_violated Then
131: -- Unique integrity has been violated
124: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
125: When hr_api.parent_integrity_violated Then
126: -- Parent integrity has been violated
127: per_psp_shd.g_api_dml := false; -- Unset the api dml status
128: per_psp_shd.constraint_error
129: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
130: When hr_api.unique_integrity_violated Then
131: -- Unique integrity has been violated
132: per_psp_shd.g_api_dml := false; -- Unset the api dml status
128: per_psp_shd.constraint_error
129: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
130: When hr_api.unique_integrity_violated Then
131: -- Unique integrity has been violated
132: per_psp_shd.g_api_dml := false; -- Unset the api dml status
133: per_psp_shd.constraint_error
134: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
135: When Others Then
136: per_psp_shd.g_api_dml := false; -- Unset the api dml status
129: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
130: When hr_api.unique_integrity_violated Then
131: -- Unique integrity has been violated
132: per_psp_shd.g_api_dml := false; -- Unset the api dml status
133: per_psp_shd.constraint_error
134: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
135: When Others Then
136: per_psp_shd.g_api_dml := false; -- Unset the api dml status
137: Raise;
132: per_psp_shd.g_api_dml := false; -- Unset the api dml status
133: per_psp_shd.constraint_error
134: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
135: When Others Then
136: per_psp_shd.g_api_dml := false; -- Unset the api dml status
137: Raise;
138: End update_dml;
139: --
140: -- ----------------------------------------------------------------------------
169: --
170: -- {End Of Comments}
171: -- ----------------------------------------------------------------------------
172: Procedure pre_update
173: (p_rec in per_psp_shd.g_rec_type
174: ) is
175: --
176: l_proc varchar2(72) := g_package||'pre_update';
177: --
214: -- {End Of Comments}
215: -- ----------------------------------------------------------------------------
216: Procedure post_update
217: (p_effective_date in date
218: ,p_rec in per_psp_shd.g_rec_type
219: ) is
220: --
221: l_proc varchar2(72) := g_package||'post_update';
222: --
308: => p_rec.information29
309: ,p_information30
310: => p_rec.information30
311: ,p_business_group_id_o
312: => per_psp_shd.g_old_rec.business_group_id
313: ,p_parent_spine_id_o
314: => per_psp_shd.g_old_rec.parent_spine_id
315: ,p_sequence_o
316: => per_psp_shd.g_old_rec.sequence
310: => p_rec.information30
311: ,p_business_group_id_o
312: => per_psp_shd.g_old_rec.business_group_id
313: ,p_parent_spine_id_o
314: => per_psp_shd.g_old_rec.parent_spine_id
315: ,p_sequence_o
316: => per_psp_shd.g_old_rec.sequence
317: ,p_spinal_point_o
318: => per_psp_shd.g_old_rec.spinal_point
312: => per_psp_shd.g_old_rec.business_group_id
313: ,p_parent_spine_id_o
314: => per_psp_shd.g_old_rec.parent_spine_id
315: ,p_sequence_o
316: => per_psp_shd.g_old_rec.sequence
317: ,p_spinal_point_o
318: => per_psp_shd.g_old_rec.spinal_point
319: ,p_request_id_o
320: => per_psp_shd.g_old_rec.request_id
314: => per_psp_shd.g_old_rec.parent_spine_id
315: ,p_sequence_o
316: => per_psp_shd.g_old_rec.sequence
317: ,p_spinal_point_o
318: => per_psp_shd.g_old_rec.spinal_point
319: ,p_request_id_o
320: => per_psp_shd.g_old_rec.request_id
321: ,p_program_application_id_o
322: => per_psp_shd.g_old_rec.program_application_id
316: => per_psp_shd.g_old_rec.sequence
317: ,p_spinal_point_o
318: => per_psp_shd.g_old_rec.spinal_point
319: ,p_request_id_o
320: => per_psp_shd.g_old_rec.request_id
321: ,p_program_application_id_o
322: => per_psp_shd.g_old_rec.program_application_id
323: ,p_program_id_o
324: => per_psp_shd.g_old_rec.program_id
318: => per_psp_shd.g_old_rec.spinal_point
319: ,p_request_id_o
320: => per_psp_shd.g_old_rec.request_id
321: ,p_program_application_id_o
322: => per_psp_shd.g_old_rec.program_application_id
323: ,p_program_id_o
324: => per_psp_shd.g_old_rec.program_id
325: ,p_program_update_date_o
326: => per_psp_shd.g_old_rec.program_update_date
320: => per_psp_shd.g_old_rec.request_id
321: ,p_program_application_id_o
322: => per_psp_shd.g_old_rec.program_application_id
323: ,p_program_id_o
324: => per_psp_shd.g_old_rec.program_id
325: ,p_program_update_date_o
326: => per_psp_shd.g_old_rec.program_update_date
327: ,p_object_version_number_o
328: => per_psp_shd.g_old_rec.object_version_number
322: => per_psp_shd.g_old_rec.program_application_id
323: ,p_program_id_o
324: => per_psp_shd.g_old_rec.program_id
325: ,p_program_update_date_o
326: => per_psp_shd.g_old_rec.program_update_date
327: ,p_object_version_number_o
328: => per_psp_shd.g_old_rec.object_version_number
329: ,p_information_category_o
330: => per_psp_shd.g_old_rec.information_category
324: => per_psp_shd.g_old_rec.program_id
325: ,p_program_update_date_o
326: => per_psp_shd.g_old_rec.program_update_date
327: ,p_object_version_number_o
328: => per_psp_shd.g_old_rec.object_version_number
329: ,p_information_category_o
330: => per_psp_shd.g_old_rec.information_category
331: ,p_information1_o
332: => per_psp_shd.g_old_rec.information1
326: => per_psp_shd.g_old_rec.program_update_date
327: ,p_object_version_number_o
328: => per_psp_shd.g_old_rec.object_version_number
329: ,p_information_category_o
330: => per_psp_shd.g_old_rec.information_category
331: ,p_information1_o
332: => per_psp_shd.g_old_rec.information1
333: ,p_information2_o
334: => per_psp_shd.g_old_rec.information2
328: => per_psp_shd.g_old_rec.object_version_number
329: ,p_information_category_o
330: => per_psp_shd.g_old_rec.information_category
331: ,p_information1_o
332: => per_psp_shd.g_old_rec.information1
333: ,p_information2_o
334: => per_psp_shd.g_old_rec.information2
335: ,p_information3_o
336: => per_psp_shd.g_old_rec.information3
330: => per_psp_shd.g_old_rec.information_category
331: ,p_information1_o
332: => per_psp_shd.g_old_rec.information1
333: ,p_information2_o
334: => per_psp_shd.g_old_rec.information2
335: ,p_information3_o
336: => per_psp_shd.g_old_rec.information3
337: ,p_information4_o
338: => per_psp_shd.g_old_rec.information4
332: => per_psp_shd.g_old_rec.information1
333: ,p_information2_o
334: => per_psp_shd.g_old_rec.information2
335: ,p_information3_o
336: => per_psp_shd.g_old_rec.information3
337: ,p_information4_o
338: => per_psp_shd.g_old_rec.information4
339: ,p_information5_o
340: => per_psp_shd.g_old_rec.information5
334: => per_psp_shd.g_old_rec.information2
335: ,p_information3_o
336: => per_psp_shd.g_old_rec.information3
337: ,p_information4_o
338: => per_psp_shd.g_old_rec.information4
339: ,p_information5_o
340: => per_psp_shd.g_old_rec.information5
341: ,p_information6_o
342: => per_psp_shd.g_old_rec.information6
336: => per_psp_shd.g_old_rec.information3
337: ,p_information4_o
338: => per_psp_shd.g_old_rec.information4
339: ,p_information5_o
340: => per_psp_shd.g_old_rec.information5
341: ,p_information6_o
342: => per_psp_shd.g_old_rec.information6
343: ,p_information7_o
344: => per_psp_shd.g_old_rec.information7
338: => per_psp_shd.g_old_rec.information4
339: ,p_information5_o
340: => per_psp_shd.g_old_rec.information5
341: ,p_information6_o
342: => per_psp_shd.g_old_rec.information6
343: ,p_information7_o
344: => per_psp_shd.g_old_rec.information7
345: ,p_information8_o
346: => per_psp_shd.g_old_rec.information8
340: => per_psp_shd.g_old_rec.information5
341: ,p_information6_o
342: => per_psp_shd.g_old_rec.information6
343: ,p_information7_o
344: => per_psp_shd.g_old_rec.information7
345: ,p_information8_o
346: => per_psp_shd.g_old_rec.information8
347: ,p_information9_o
348: => per_psp_shd.g_old_rec.information9
342: => per_psp_shd.g_old_rec.information6
343: ,p_information7_o
344: => per_psp_shd.g_old_rec.information7
345: ,p_information8_o
346: => per_psp_shd.g_old_rec.information8
347: ,p_information9_o
348: => per_psp_shd.g_old_rec.information9
349: ,p_information10_o
350: => per_psp_shd.g_old_rec.information10
344: => per_psp_shd.g_old_rec.information7
345: ,p_information8_o
346: => per_psp_shd.g_old_rec.information8
347: ,p_information9_o
348: => per_psp_shd.g_old_rec.information9
349: ,p_information10_o
350: => per_psp_shd.g_old_rec.information10
351: ,p_information11_o
352: => per_psp_shd.g_old_rec.information11
346: => per_psp_shd.g_old_rec.information8
347: ,p_information9_o
348: => per_psp_shd.g_old_rec.information9
349: ,p_information10_o
350: => per_psp_shd.g_old_rec.information10
351: ,p_information11_o
352: => per_psp_shd.g_old_rec.information11
353: ,p_information12_o
354: => per_psp_shd.g_old_rec.information12
348: => per_psp_shd.g_old_rec.information9
349: ,p_information10_o
350: => per_psp_shd.g_old_rec.information10
351: ,p_information11_o
352: => per_psp_shd.g_old_rec.information11
353: ,p_information12_o
354: => per_psp_shd.g_old_rec.information12
355: ,p_information13_o
356: => per_psp_shd.g_old_rec.information13
350: => per_psp_shd.g_old_rec.information10
351: ,p_information11_o
352: => per_psp_shd.g_old_rec.information11
353: ,p_information12_o
354: => per_psp_shd.g_old_rec.information12
355: ,p_information13_o
356: => per_psp_shd.g_old_rec.information13
357: ,p_information14_o
358: => per_psp_shd.g_old_rec.information14
352: => per_psp_shd.g_old_rec.information11
353: ,p_information12_o
354: => per_psp_shd.g_old_rec.information12
355: ,p_information13_o
356: => per_psp_shd.g_old_rec.information13
357: ,p_information14_o
358: => per_psp_shd.g_old_rec.information14
359: ,p_information15_o
360: => per_psp_shd.g_old_rec.information15
354: => per_psp_shd.g_old_rec.information12
355: ,p_information13_o
356: => per_psp_shd.g_old_rec.information13
357: ,p_information14_o
358: => per_psp_shd.g_old_rec.information14
359: ,p_information15_o
360: => per_psp_shd.g_old_rec.information15
361: ,p_information16_o
362: => per_psp_shd.g_old_rec.information16
356: => per_psp_shd.g_old_rec.information13
357: ,p_information14_o
358: => per_psp_shd.g_old_rec.information14
359: ,p_information15_o
360: => per_psp_shd.g_old_rec.information15
361: ,p_information16_o
362: => per_psp_shd.g_old_rec.information16
363: ,p_information17_o
364: => per_psp_shd.g_old_rec.information17
358: => per_psp_shd.g_old_rec.information14
359: ,p_information15_o
360: => per_psp_shd.g_old_rec.information15
361: ,p_information16_o
362: => per_psp_shd.g_old_rec.information16
363: ,p_information17_o
364: => per_psp_shd.g_old_rec.information17
365: ,p_information18_o
366: => per_psp_shd.g_old_rec.information18
360: => per_psp_shd.g_old_rec.information15
361: ,p_information16_o
362: => per_psp_shd.g_old_rec.information16
363: ,p_information17_o
364: => per_psp_shd.g_old_rec.information17
365: ,p_information18_o
366: => per_psp_shd.g_old_rec.information18
367: ,p_information19_o
368: => per_psp_shd.g_old_rec.information19
362: => per_psp_shd.g_old_rec.information16
363: ,p_information17_o
364: => per_psp_shd.g_old_rec.information17
365: ,p_information18_o
366: => per_psp_shd.g_old_rec.information18
367: ,p_information19_o
368: => per_psp_shd.g_old_rec.information19
369: ,p_information20_o
370: => per_psp_shd.g_old_rec.information20
364: => per_psp_shd.g_old_rec.information17
365: ,p_information18_o
366: => per_psp_shd.g_old_rec.information18
367: ,p_information19_o
368: => per_psp_shd.g_old_rec.information19
369: ,p_information20_o
370: => per_psp_shd.g_old_rec.information20
371: ,p_information21_o
372: => per_psp_shd.g_old_rec.information21
366: => per_psp_shd.g_old_rec.information18
367: ,p_information19_o
368: => per_psp_shd.g_old_rec.information19
369: ,p_information20_o
370: => per_psp_shd.g_old_rec.information20
371: ,p_information21_o
372: => per_psp_shd.g_old_rec.information21
373: ,p_information22_o
374: => per_psp_shd.g_old_rec.information22
368: => per_psp_shd.g_old_rec.information19
369: ,p_information20_o
370: => per_psp_shd.g_old_rec.information20
371: ,p_information21_o
372: => per_psp_shd.g_old_rec.information21
373: ,p_information22_o
374: => per_psp_shd.g_old_rec.information22
375: ,p_information23_o
376: => per_psp_shd.g_old_rec.information23
370: => per_psp_shd.g_old_rec.information20
371: ,p_information21_o
372: => per_psp_shd.g_old_rec.information21
373: ,p_information22_o
374: => per_psp_shd.g_old_rec.information22
375: ,p_information23_o
376: => per_psp_shd.g_old_rec.information23
377: ,p_information24_o
378: => per_psp_shd.g_old_rec.information24
372: => per_psp_shd.g_old_rec.information21
373: ,p_information22_o
374: => per_psp_shd.g_old_rec.information22
375: ,p_information23_o
376: => per_psp_shd.g_old_rec.information23
377: ,p_information24_o
378: => per_psp_shd.g_old_rec.information24
379: ,p_information25_o
380: => per_psp_shd.g_old_rec.information25
374: => per_psp_shd.g_old_rec.information22
375: ,p_information23_o
376: => per_psp_shd.g_old_rec.information23
377: ,p_information24_o
378: => per_psp_shd.g_old_rec.information24
379: ,p_information25_o
380: => per_psp_shd.g_old_rec.information25
381: ,p_information26_o
382: => per_psp_shd.g_old_rec.information26
376: => per_psp_shd.g_old_rec.information23
377: ,p_information24_o
378: => per_psp_shd.g_old_rec.information24
379: ,p_information25_o
380: => per_psp_shd.g_old_rec.information25
381: ,p_information26_o
382: => per_psp_shd.g_old_rec.information26
383: ,p_information27_o
384: => per_psp_shd.g_old_rec.information27
378: => per_psp_shd.g_old_rec.information24
379: ,p_information25_o
380: => per_psp_shd.g_old_rec.information25
381: ,p_information26_o
382: => per_psp_shd.g_old_rec.information26
383: ,p_information27_o
384: => per_psp_shd.g_old_rec.information27
385: ,p_information28_o
386: => per_psp_shd.g_old_rec.information28
380: => per_psp_shd.g_old_rec.information25
381: ,p_information26_o
382: => per_psp_shd.g_old_rec.information26
383: ,p_information27_o
384: => per_psp_shd.g_old_rec.information27
385: ,p_information28_o
386: => per_psp_shd.g_old_rec.information28
387: ,p_information29_o
388: => per_psp_shd.g_old_rec.information29
382: => per_psp_shd.g_old_rec.information26
383: ,p_information27_o
384: => per_psp_shd.g_old_rec.information27
385: ,p_information28_o
386: => per_psp_shd.g_old_rec.information28
387: ,p_information29_o
388: => per_psp_shd.g_old_rec.information29
389: ,p_information30_o
390: => per_psp_shd.g_old_rec.information30
384: => per_psp_shd.g_old_rec.information27
385: ,p_information28_o
386: => per_psp_shd.g_old_rec.information28
387: ,p_information29_o
388: => per_psp_shd.g_old_rec.information29
389: ,p_information30_o
390: => per_psp_shd.g_old_rec.information30
391: );
392: --
386: => per_psp_shd.g_old_rec.information28
387: ,p_information29_o
388: => per_psp_shd.g_old_rec.information29
389: ,p_information30_o
390: => per_psp_shd.g_old_rec.information30
391: );
392: --
393: exception
394: --
446: --
447: -- {End Of Comments}
448: -- ----------------------------------------------------------------------------
449: Procedure convert_defs
450: (p_rec in out nocopy per_psp_shd.g_rec_type
451: ) is
452: --
453: Begin
454: --
458: -- is being used then we must set to the 'current' argument value.
459: --
460: If (p_rec.business_group_id = hr_api.g_number) then
461: p_rec.business_group_id :=
462: per_psp_shd.g_old_rec.business_group_id;
463: End If;
464: If (p_rec.parent_spine_id = hr_api.g_number) then
465: p_rec.parent_spine_id :=
466: per_psp_shd.g_old_rec.parent_spine_id;
462: per_psp_shd.g_old_rec.business_group_id;
463: End If;
464: If (p_rec.parent_spine_id = hr_api.g_number) then
465: p_rec.parent_spine_id :=
466: per_psp_shd.g_old_rec.parent_spine_id;
467: End If;
468: If (p_rec.sequence = hr_api.g_number) then
469: p_rec.sequence :=
470: per_psp_shd.g_old_rec.sequence;
466: per_psp_shd.g_old_rec.parent_spine_id;
467: End If;
468: If (p_rec.sequence = hr_api.g_number) then
469: p_rec.sequence :=
470: per_psp_shd.g_old_rec.sequence;
471: End If;
472: If (p_rec.spinal_point = hr_api.g_varchar2) then
473: p_rec.spinal_point :=
474: per_psp_shd.g_old_rec.spinal_point;
470: per_psp_shd.g_old_rec.sequence;
471: End If;
472: If (p_rec.spinal_point = hr_api.g_varchar2) then
473: p_rec.spinal_point :=
474: per_psp_shd.g_old_rec.spinal_point;
475: End If;
476: If (p_rec.request_id = hr_api.g_number) then
477: p_rec.request_id :=
478: per_psp_shd.g_old_rec.request_id;
474: per_psp_shd.g_old_rec.spinal_point;
475: End If;
476: If (p_rec.request_id = hr_api.g_number) then
477: p_rec.request_id :=
478: per_psp_shd.g_old_rec.request_id;
479: End If;
480: If (p_rec.program_application_id = hr_api.g_number) then
481: p_rec.program_application_id :=
482: per_psp_shd.g_old_rec.program_application_id;
478: per_psp_shd.g_old_rec.request_id;
479: End If;
480: If (p_rec.program_application_id = hr_api.g_number) then
481: p_rec.program_application_id :=
482: per_psp_shd.g_old_rec.program_application_id;
483: End If;
484: If (p_rec.program_id = hr_api.g_number) then
485: p_rec.program_id :=
486: per_psp_shd.g_old_rec.program_id;
482: per_psp_shd.g_old_rec.program_application_id;
483: End If;
484: If (p_rec.program_id = hr_api.g_number) then
485: p_rec.program_id :=
486: per_psp_shd.g_old_rec.program_id;
487: End If;
488: If (p_rec.program_update_date = hr_api.g_date) then
489: p_rec.program_update_date :=
490: per_psp_shd.g_old_rec.program_update_date;
486: per_psp_shd.g_old_rec.program_id;
487: End If;
488: If (p_rec.program_update_date = hr_api.g_date) then
489: p_rec.program_update_date :=
490: per_psp_shd.g_old_rec.program_update_date;
491: End If;
492: --
493: If (p_rec.information_category = hr_api.g_varchar2) then
494: p_rec.information_category :=
491: End If;
492: --
493: If (p_rec.information_category = hr_api.g_varchar2) then
494: p_rec.information_category :=
495: per_psp_shd.g_old_rec.information_category;
496: End If;
497: If (p_rec.information1 = hr_api.g_varchar2) then
498: p_rec.information1 :=
499: per_psp_shd.g_old_rec.information1;
495: per_psp_shd.g_old_rec.information_category;
496: End If;
497: If (p_rec.information1 = hr_api.g_varchar2) then
498: p_rec.information1 :=
499: per_psp_shd.g_old_rec.information1;
500: End If;
501: If (p_rec.information2 = hr_api.g_varchar2) then
502: p_rec.information2 :=
503: per_psp_shd.g_old_rec.information2;
499: per_psp_shd.g_old_rec.information1;
500: End If;
501: If (p_rec.information2 = hr_api.g_varchar2) then
502: p_rec.information2 :=
503: per_psp_shd.g_old_rec.information2;
504: End If;
505: If (p_rec.information3 = hr_api.g_varchar2) then
506: p_rec.information3 :=
507: per_psp_shd.g_old_rec.information3;
503: per_psp_shd.g_old_rec.information2;
504: End If;
505: If (p_rec.information3 = hr_api.g_varchar2) then
506: p_rec.information3 :=
507: per_psp_shd.g_old_rec.information3;
508: End If;
509: If (p_rec.information4 = hr_api.g_varchar2) then
510: p_rec.information4 :=
511: per_psp_shd.g_old_rec.information4;
507: per_psp_shd.g_old_rec.information3;
508: End If;
509: If (p_rec.information4 = hr_api.g_varchar2) then
510: p_rec.information4 :=
511: per_psp_shd.g_old_rec.information4;
512: End If;
513: If (p_rec.information5 = hr_api.g_varchar2) then
514: p_rec.information5 :=
515: per_psp_shd.g_old_rec.information5;
511: per_psp_shd.g_old_rec.information4;
512: End If;
513: If (p_rec.information5 = hr_api.g_varchar2) then
514: p_rec.information5 :=
515: per_psp_shd.g_old_rec.information5;
516: End If;
517: If (p_rec.information6 = hr_api.g_varchar2) then
518: p_rec.information6 :=
519: per_psp_shd.g_old_rec.information6;
515: per_psp_shd.g_old_rec.information5;
516: End If;
517: If (p_rec.information6 = hr_api.g_varchar2) then
518: p_rec.information6 :=
519: per_psp_shd.g_old_rec.information6;
520: End If;
521: If (p_rec.information7 = hr_api.g_varchar2) then
522: p_rec.information7 :=
523: per_psp_shd.g_old_rec.information7;
519: per_psp_shd.g_old_rec.information6;
520: End If;
521: If (p_rec.information7 = hr_api.g_varchar2) then
522: p_rec.information7 :=
523: per_psp_shd.g_old_rec.information7;
524: End If;
525: If (p_rec.information8 = hr_api.g_varchar2) then
526: p_rec.information8 :=
527: per_psp_shd.g_old_rec.information8;
523: per_psp_shd.g_old_rec.information7;
524: End If;
525: If (p_rec.information8 = hr_api.g_varchar2) then
526: p_rec.information8 :=
527: per_psp_shd.g_old_rec.information8;
528: End If;
529: If (p_rec.information9 = hr_api.g_varchar2) then
530: p_rec.information9 :=
531: per_psp_shd.g_old_rec.information9;
527: per_psp_shd.g_old_rec.information8;
528: End If;
529: If (p_rec.information9 = hr_api.g_varchar2) then
530: p_rec.information9 :=
531: per_psp_shd.g_old_rec.information9;
532: End If;
533: If (p_rec.information10 = hr_api.g_varchar2) then
534: p_rec.information10 :=
535: per_psp_shd.g_old_rec.information10;
531: per_psp_shd.g_old_rec.information9;
532: End If;
533: If (p_rec.information10 = hr_api.g_varchar2) then
534: p_rec.information10 :=
535: per_psp_shd.g_old_rec.information10;
536: End If;
537: If (p_rec.information11 = hr_api.g_varchar2) then
538: p_rec.information11 :=
539: per_psp_shd.g_old_rec.information11;
535: per_psp_shd.g_old_rec.information10;
536: End If;
537: If (p_rec.information11 = hr_api.g_varchar2) then
538: p_rec.information11 :=
539: per_psp_shd.g_old_rec.information11;
540: End If;
541: If (p_rec.information12 = hr_api.g_varchar2) then
542: p_rec.information12 :=
543: per_psp_shd.g_old_rec.information12;
539: per_psp_shd.g_old_rec.information11;
540: End If;
541: If (p_rec.information12 = hr_api.g_varchar2) then
542: p_rec.information12 :=
543: per_psp_shd.g_old_rec.information12;
544: End If;
545: If (p_rec.information13 = hr_api.g_varchar2) then
546: p_rec.information13 :=
547: per_psp_shd.g_old_rec.information13;
543: per_psp_shd.g_old_rec.information12;
544: End If;
545: If (p_rec.information13 = hr_api.g_varchar2) then
546: p_rec.information13 :=
547: per_psp_shd.g_old_rec.information13;
548: End If;
549: If (p_rec.information14 = hr_api.g_varchar2) then
550: p_rec.information14 :=
551: per_psp_shd.g_old_rec.information14;
547: per_psp_shd.g_old_rec.information13;
548: End If;
549: If (p_rec.information14 = hr_api.g_varchar2) then
550: p_rec.information14 :=
551: per_psp_shd.g_old_rec.information14;
552: End If;
553: If (p_rec.information15 = hr_api.g_varchar2) then
554: p_rec.information15 :=
555: per_psp_shd.g_old_rec.information15;
551: per_psp_shd.g_old_rec.information14;
552: End If;
553: If (p_rec.information15 = hr_api.g_varchar2) then
554: p_rec.information15 :=
555: per_psp_shd.g_old_rec.information15;
556: End If;
557: If (p_rec.information16 = hr_api.g_varchar2) then
558: p_rec.information16 :=
559: per_psp_shd.g_old_rec.information16;
555: per_psp_shd.g_old_rec.information15;
556: End If;
557: If (p_rec.information16 = hr_api.g_varchar2) then
558: p_rec.information16 :=
559: per_psp_shd.g_old_rec.information16;
560: End If;
561: If (p_rec.information17 = hr_api.g_varchar2) then
562: p_rec.information17 :=
563: per_psp_shd.g_old_rec.information17;
559: per_psp_shd.g_old_rec.information16;
560: End If;
561: If (p_rec.information17 = hr_api.g_varchar2) then
562: p_rec.information17 :=
563: per_psp_shd.g_old_rec.information17;
564: End If;
565: If (p_rec.information18 = hr_api.g_varchar2) then
566: p_rec.information18 :=
567: per_psp_shd.g_old_rec.information18;
563: per_psp_shd.g_old_rec.information17;
564: End If;
565: If (p_rec.information18 = hr_api.g_varchar2) then
566: p_rec.information18 :=
567: per_psp_shd.g_old_rec.information18;
568: End If;
569: If (p_rec.information19 = hr_api.g_varchar2) then
570: p_rec.information19 :=
571: per_psp_shd.g_old_rec.information19;
567: per_psp_shd.g_old_rec.information18;
568: End If;
569: If (p_rec.information19 = hr_api.g_varchar2) then
570: p_rec.information19 :=
571: per_psp_shd.g_old_rec.information19;
572: End If;
573: If (p_rec.information20 = hr_api.g_varchar2) then
574: p_rec.information20 :=
575: per_psp_shd.g_old_rec.information20;
571: per_psp_shd.g_old_rec.information19;
572: End If;
573: If (p_rec.information20 = hr_api.g_varchar2) then
574: p_rec.information20 :=
575: per_psp_shd.g_old_rec.information20;
576: End If;
577: If (p_rec.information21 = hr_api.g_varchar2) then
578: p_rec.information21 :=
579: per_psp_shd.g_old_rec.information21;
575: per_psp_shd.g_old_rec.information20;
576: End If;
577: If (p_rec.information21 = hr_api.g_varchar2) then
578: p_rec.information21 :=
579: per_psp_shd.g_old_rec.information21;
580: End If;
581: If (p_rec.information22 = hr_api.g_varchar2) then
582: p_rec.information22 :=
583: per_psp_shd.g_old_rec.information22;
579: per_psp_shd.g_old_rec.information21;
580: End If;
581: If (p_rec.information22 = hr_api.g_varchar2) then
582: p_rec.information22 :=
583: per_psp_shd.g_old_rec.information22;
584: End If;
585: If (p_rec.information23 = hr_api.g_varchar2) then
586: p_rec.information23 :=
587: per_psp_shd.g_old_rec.information23;
583: per_psp_shd.g_old_rec.information22;
584: End If;
585: If (p_rec.information23 = hr_api.g_varchar2) then
586: p_rec.information23 :=
587: per_psp_shd.g_old_rec.information23;
588: End If;
589: If (p_rec.information24 = hr_api.g_varchar2) then
590: p_rec.information24 :=
591: per_psp_shd.g_old_rec.information24;
587: per_psp_shd.g_old_rec.information23;
588: End If;
589: If (p_rec.information24 = hr_api.g_varchar2) then
590: p_rec.information24 :=
591: per_psp_shd.g_old_rec.information24;
592: End If;
593: If (p_rec.information25 = hr_api.g_varchar2) then
594: p_rec.information25 :=
595: per_psp_shd.g_old_rec.information25;
591: per_psp_shd.g_old_rec.information24;
592: End If;
593: If (p_rec.information25 = hr_api.g_varchar2) then
594: p_rec.information25 :=
595: per_psp_shd.g_old_rec.information25;
596: End If;
597: If (p_rec.information26 = hr_api.g_varchar2) then
598: p_rec.information26 :=
599: per_psp_shd.g_old_rec.information26;
595: per_psp_shd.g_old_rec.information25;
596: End If;
597: If (p_rec.information26 = hr_api.g_varchar2) then
598: p_rec.information26 :=
599: per_psp_shd.g_old_rec.information26;
600: End If;
601: If (p_rec.information27 = hr_api.g_varchar2) then
602: p_rec.information27 :=
603: per_psp_shd.g_old_rec.information27;
599: per_psp_shd.g_old_rec.information26;
600: End If;
601: If (p_rec.information27 = hr_api.g_varchar2) then
602: p_rec.information27 :=
603: per_psp_shd.g_old_rec.information27;
604: End If;
605: If (p_rec.information28 = hr_api.g_varchar2) then
606: p_rec.information28 :=
607: per_psp_shd.g_old_rec.information28;
603: per_psp_shd.g_old_rec.information27;
604: End If;
605: If (p_rec.information28 = hr_api.g_varchar2) then
606: p_rec.information28 :=
607: per_psp_shd.g_old_rec.information28;
608: End If;
609: If (p_rec.information29 = hr_api.g_varchar2) then
610: p_rec.information29 :=
611: per_psp_shd.g_old_rec.information29;
607: per_psp_shd.g_old_rec.information28;
608: End If;
609: If (p_rec.information29 = hr_api.g_varchar2) then
610: p_rec.information29 :=
611: per_psp_shd.g_old_rec.information29;
612: End If;
613: If (p_rec.information30 = hr_api.g_varchar2) then
614: p_rec.information30 :=
615: per_psp_shd.g_old_rec.information30;
611: per_psp_shd.g_old_rec.information29;
612: End If;
613: If (p_rec.information30 = hr_api.g_varchar2) then
614: p_rec.information30 :=
615: per_psp_shd.g_old_rec.information30;
616: End If;
617: --
618: End convert_defs;
619: --
621: -- |---------------------------------< upd >----------------------------------|
622: -- ----------------------------------------------------------------------------
623: Procedure upd
624: (p_effective_date in date
625: ,p_rec in out nocopy per_psp_shd.g_rec_type
626: ) is
627: --
628: l_proc varchar2(72) := g_package||'upd';
629: --
631: hr_utility.set_location('Entering:'||l_proc, 5);
632: --
633: -- We must lock the row which we need to update.
634: --
635: per_psp_shd.lck
636: (p_rec.spinal_point_id
637: ,p_rec.object_version_number
638: );
639: --
718: ,p_information29 in varchar2 default hr_api.g_varchar2
719: ,p_information30 in varchar2 default hr_api.g_varchar2
720: ) is
721: --
722: l_rec per_psp_shd.g_rec_type;
723: l_proc varchar2(72) := g_package||'upd';
724: --
725: Begin
726: hr_utility.set_location('Entering:'||l_proc, 5);
728: -- Call conversion function to turn arguments into the
729: -- l_rec structure.
730: --
731: l_rec :=
732: per_psp_shd.convert_args
733: (p_spinal_point_id
734: ,p_business_group_id
735: ,p_parent_spine_id
736: ,p_sequence