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.
107: End If;
108: --
109: hr_utility.set_location(' Leaving:'||l_proc, 15);
110: Exception
111: When hr_api.check_integrity_violated Then
112: -- A check constraint has been violated
113: pay_pur_shd.g_api_dml := false; -- Unset the api dml status
114: pay_pur_shd.constraint_error
115: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
111: When hr_api.check_integrity_violated Then
112: -- A check constraint has been violated
113: pay_pur_shd.g_api_dml := false; -- Unset the api dml status
114: pay_pur_shd.constraint_error
115: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
116: When hr_api.unique_integrity_violated Then
117: -- Unique integrity has been violated
118: pay_pur_shd.g_api_dml := false; -- Unset the api dml status
119: pay_pur_shd.constraint_error
112: -- A check constraint has been violated
113: pay_pur_shd.g_api_dml := false; -- Unset the api dml status
114: pay_pur_shd.constraint_error
115: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
116: When hr_api.unique_integrity_violated Then
117: -- Unique integrity has been violated
118: pay_pur_shd.g_api_dml := false; -- Unset the api dml status
119: pay_pur_shd.constraint_error
120: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
116: When hr_api.unique_integrity_violated Then
117: -- Unique integrity has been violated
118: pay_pur_shd.g_api_dml := false; -- Unset the api dml status
119: pay_pur_shd.constraint_error
120: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
121: When Others Then
122: pay_pur_shd.g_api_dml := false; -- Unset the api dml status
123: Raise;
124: End dt_update_dml;
233: l_dummy_version_number number;
234: --
235: Begin
236: hr_utility.set_location('Entering:'||l_proc, 5);
237: If (p_datetrack_mode <> hr_api.g_correction) then
238: --
239: -- Update the current effective end date
240: --
241: pay_pur_shd.upd_effective_end_date
246: ,p_validation_end_date => p_validation_end_date
247: ,p_object_version_number => l_dummy_version_number
248: );
249: --
250: If (p_datetrack_mode = hr_api.g_update_override) then
251: --
252: -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
253: -- delete any future rows
254: --
428: );
429: --
430: exception
431: --
432: when hr_api.cannot_find_prog_unit then
433: --
434: hr_api.cannot_find_prog_unit_error
435: (p_module_name => 'PAY_USER_ROWS_F'
436: ,p_hook_type => 'AU');
430: exception
431: --
432: when hr_api.cannot_find_prog_unit then
433: --
434: hr_api.cannot_find_prog_unit_error
435: (p_module_name => 'PAY_USER_ROWS_F'
436: ,p_hook_type => 'AU');
437: --
438: end;
493: -- p_rec plsql record structure
494: -- to see if a system default is being used. If a system default
495: -- is being used then we must set to the 'current' argument value.
496: --
497: If (p_rec.business_group_id = hr_api.g_number) then
498: p_rec.business_group_id :=
499: pay_pur_shd.g_old_rec.business_group_id;
500: End If;
501: If (p_rec.legislation_code = hr_api.g_varchar2) then
497: If (p_rec.business_group_id = hr_api.g_number) then
498: p_rec.business_group_id :=
499: pay_pur_shd.g_old_rec.business_group_id;
500: End If;
501: If (p_rec.legislation_code = hr_api.g_varchar2) then
502: p_rec.legislation_code :=
503: pay_pur_shd.g_old_rec.legislation_code;
504: End If;
505: If (p_rec.user_table_id = hr_api.g_number) then
501: If (p_rec.legislation_code = hr_api.g_varchar2) then
502: p_rec.legislation_code :=
503: pay_pur_shd.g_old_rec.legislation_code;
504: End If;
505: If (p_rec.user_table_id = hr_api.g_number) then
506: p_rec.user_table_id :=
507: pay_pur_shd.g_old_rec.user_table_id;
508: End If;
509: If (p_rec.row_low_range_or_name = hr_api.g_varchar2) then
505: If (p_rec.user_table_id = hr_api.g_number) then
506: p_rec.user_table_id :=
507: pay_pur_shd.g_old_rec.user_table_id;
508: End If;
509: If (p_rec.row_low_range_or_name = hr_api.g_varchar2) then
510: p_rec.row_low_range_or_name :=
511: pay_pur_shd.g_old_rec.row_low_range_or_name;
512: End If;
513: If (p_rec.display_sequence = hr_api.g_number) then
509: If (p_rec.row_low_range_or_name = hr_api.g_varchar2) then
510: p_rec.row_low_range_or_name :=
511: pay_pur_shd.g_old_rec.row_low_range_or_name;
512: End If;
513: If (p_rec.display_sequence = hr_api.g_number) then
514: p_rec.display_sequence :=
515: pay_pur_shd.g_old_rec.display_sequence;
516: End If;
517: If (p_rec.row_high_range = hr_api.g_varchar2) then
513: If (p_rec.display_sequence = hr_api.g_number) then
514: p_rec.display_sequence :=
515: pay_pur_shd.g_old_rec.display_sequence;
516: End If;
517: If (p_rec.row_high_range = hr_api.g_varchar2) then
518: p_rec.row_high_range :=
519: pay_pur_shd.g_old_rec.row_high_range;
520: End If;
521: --
618: (p_effective_date in date
619: ,p_datetrack_mode in varchar2
620: ,p_user_row_id in number
621: ,p_object_version_number in out nocopy number
622: ,p_row_low_range_or_name in varchar2 default hr_api.g_varchar2
623: ,p_display_sequence in number default hr_api.g_number
624: ,p_row_high_range in varchar2 default hr_api.g_varchar2
625: ,p_disable_units_check in boolean default false
626: ,p_disable_range_overlap_check in boolean default false
619: ,p_datetrack_mode in varchar2
620: ,p_user_row_id in number
621: ,p_object_version_number in out nocopy number
622: ,p_row_low_range_or_name in varchar2 default hr_api.g_varchar2
623: ,p_display_sequence in number default hr_api.g_number
624: ,p_row_high_range in varchar2 default hr_api.g_varchar2
625: ,p_disable_units_check in boolean default false
626: ,p_disable_range_overlap_check in boolean default false
627: ,p_effective_start_date out nocopy date
620: ,p_user_row_id in number
621: ,p_object_version_number in out nocopy number
622: ,p_row_low_range_or_name in varchar2 default hr_api.g_varchar2
623: ,p_display_sequence in number default hr_api.g_number
624: ,p_row_high_range in varchar2 default hr_api.g_varchar2
625: ,p_disable_units_check in boolean default false
626: ,p_disable_range_overlap_check in boolean default false
627: ,p_effective_start_date out nocopy date
628: ,p_effective_end_date out nocopy date
641: pay_pur_shd.convert_args
642: (p_user_row_id
643: ,null
644: ,null
645: ,hr_api.g_number
646: ,hr_api.g_varchar2
647: ,hr_api.g_number
648: ,p_row_low_range_or_name
649: ,p_display_sequence
642: (p_user_row_id
643: ,null
644: ,null
645: ,hr_api.g_number
646: ,hr_api.g_varchar2
647: ,hr_api.g_number
648: ,p_row_low_range_or_name
649: ,p_display_sequence
650: ,p_row_high_range
643: ,null
644: ,null
645: ,hr_api.g_number
646: ,hr_api.g_varchar2
647: ,hr_api.g_number
648: ,p_row_low_range_or_name
649: ,p_display_sequence
650: ,p_row_high_range
651: ,p_object_version_number