66: --
67: Begin
68: hr_utility.set_location('Entering:'||l_proc, 5);
69: --
70: If (p_datetrack_mode = hr_api.g_correction) then
71: hr_utility.set_location(l_proc, 10);
72: --
73: -- Because we are updating a row we must get the next object
74: -- version number.
106: End If;
107: --
108: hr_utility.set_location(' Leaving:'||l_proc, 15);
109: Exception
110: When hr_api.check_integrity_violated Then
111: -- A check constraint has been violated
112: pay_uci_shd.g_api_dml := false; -- Unset the api dml status
113: pay_uci_shd.constraint_error
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
110: When hr_api.check_integrity_violated Then
111: -- A check constraint has been violated
112: pay_uci_shd.g_api_dml := false; -- Unset the api dml status
113: pay_uci_shd.constraint_error
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When hr_api.unique_integrity_violated Then
116: -- Unique integrity has been violated
117: pay_uci_shd.g_api_dml := false; -- Unset the api dml status
118: pay_uci_shd.constraint_error
111: -- A check constraint has been violated
112: pay_uci_shd.g_api_dml := false; -- Unset the api dml status
113: pay_uci_shd.constraint_error
114: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When hr_api.unique_integrity_violated Then
116: -- Unique integrity has been violated
117: pay_uci_shd.g_api_dml := false; -- Unset the api dml status
118: pay_uci_shd.constraint_error
119: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
115: When hr_api.unique_integrity_violated Then
116: -- Unique integrity has been violated
117: pay_uci_shd.g_api_dml := false; -- Unset the api dml status
118: pay_uci_shd.constraint_error
119: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
120: When Others Then
121: pay_uci_shd.g_api_dml := false; -- Unset the api dml status
122: Raise;
123: End dt_update_dml;
232: l_dummy_version_number number;
233: --
234: Begin
235: hr_utility.set_location('Entering:'||l_proc, 5);
236: If (p_datetrack_mode <> hr_api.g_correction) then
237: --
238: -- Update the current effective end date
239: --
240: pay_uci_shd.upd_effective_end_date
245: ,p_validation_end_date => p_validation_end_date
246: ,p_object_version_number => l_dummy_version_number
247: );
248: --
249: If (p_datetrack_mode = hr_api.g_update_override) then
250: --
251: -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
252: -- delete any future rows
253: --
415: );
416: --
417: exception
418: --
419: when hr_api.cannot_find_prog_unit then
420: --
421: hr_api.cannot_find_prog_unit_error
422: (p_module_name => 'PAY_USER_COLUMN_INSTANCES_F'
423: ,p_hook_type => 'AU');
417: exception
418: --
419: when hr_api.cannot_find_prog_unit then
420: --
421: hr_api.cannot_find_prog_unit_error
422: (p_module_name => 'PAY_USER_COLUMN_INSTANCES_F'
423: ,p_hook_type => 'AU');
424: --
425: end;
480: -- p_rec plsql record structure
481: -- to see if a system default is being used. If a system default
482: -- is being used then we must set to the 'current' argument value.
483: --
484: If (p_rec.user_row_id = hr_api.g_number) then
485: p_rec.user_row_id :=
486: pay_uci_shd.g_old_rec.user_row_id;
487: End If;
488: If (p_rec.user_column_id = hr_api.g_number) then
484: If (p_rec.user_row_id = hr_api.g_number) then
485: p_rec.user_row_id :=
486: pay_uci_shd.g_old_rec.user_row_id;
487: End If;
488: If (p_rec.user_column_id = hr_api.g_number) then
489: p_rec.user_column_id :=
490: pay_uci_shd.g_old_rec.user_column_id;
491: End If;
492: If (p_rec.business_group_id = hr_api.g_number) then
488: If (p_rec.user_column_id = hr_api.g_number) then
489: p_rec.user_column_id :=
490: pay_uci_shd.g_old_rec.user_column_id;
491: End If;
492: If (p_rec.business_group_id = hr_api.g_number) then
493: p_rec.business_group_id :=
494: pay_uci_shd.g_old_rec.business_group_id;
495: End If;
496: If (p_rec.legislation_code = hr_api.g_varchar2) then
492: If (p_rec.business_group_id = hr_api.g_number) then
493: p_rec.business_group_id :=
494: pay_uci_shd.g_old_rec.business_group_id;
495: End If;
496: If (p_rec.legislation_code = hr_api.g_varchar2) then
497: p_rec.legislation_code :=
498: pay_uci_shd.g_old_rec.legislation_code;
499: End If;
500: If (p_rec.value = hr_api.g_varchar2) then
496: If (p_rec.legislation_code = hr_api.g_varchar2) then
497: p_rec.legislation_code :=
498: pay_uci_shd.g_old_rec.legislation_code;
499: End If;
500: If (p_rec.value = hr_api.g_varchar2) then
501: p_rec.value :=
502: pay_uci_shd.g_old_rec.value;
503: End If;
504: --
595: (p_effective_date in date
596: ,p_datetrack_mode in varchar2
597: ,p_user_column_instance_id in number
598: ,p_object_version_number in out nocopy number
599: ,p_value in varchar2 default hr_api.g_varchar2
600: ,p_effective_start_date out nocopy date
601: ,p_effective_end_date out nocopy date
602: ) is
603: --
614: pay_uci_shd.convert_args
615: (p_user_column_instance_id
616: ,null
617: ,null
618: ,hr_api.g_number
619: ,hr_api.g_number
620: ,hr_api.g_number
621: ,hr_api.g_varchar2
622: ,p_value
615: (p_user_column_instance_id
616: ,null
617: ,null
618: ,hr_api.g_number
619: ,hr_api.g_number
620: ,hr_api.g_number
621: ,hr_api.g_varchar2
622: ,p_value
623: ,p_object_version_number
616: ,null
617: ,null
618: ,hr_api.g_number
619: ,hr_api.g_number
620: ,hr_api.g_number
621: ,hr_api.g_varchar2
622: ,p_value
623: ,p_object_version_number
624: );
617: ,null
618: ,hr_api.g_number
619: ,hr_api.g_number
620: ,hr_api.g_number
621: ,hr_api.g_varchar2
622: ,p_value
623: ,p_object_version_number
624: );
625: --