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: ff_fgl_shd.g_api_dml := false; -- Unset the api dml status
114: ff_fgl_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: ff_fgl_shd.g_api_dml := false; -- Unset the api dml status
114: ff_fgl_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: ff_fgl_shd.g_api_dml := false; -- Unset the api dml status
119: ff_fgl_shd.constraint_error
112: -- A check constraint has been violated
113: ff_fgl_shd.g_api_dml := false; -- Unset the api dml status
114: ff_fgl_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: ff_fgl_shd.g_api_dml := false; -- Unset the api dml status
119: ff_fgl_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: ff_fgl_shd.g_api_dml := false; -- Unset the api dml status
119: ff_fgl_shd.constraint_error
120: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
121: When Others Then
122: ff_fgl_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: ff_fgl_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 => 'FF_GLOBALS_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 => 'FF_GLOBALS_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: ff_fgl_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: ff_fgl_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: ff_fgl_shd.g_old_rec.legislation_code;
504: End If;
505: If (p_rec.data_type = hr_api.g_varchar2) then
501: If (p_rec.legislation_code = hr_api.g_varchar2) then
502: p_rec.legislation_code :=
503: ff_fgl_shd.g_old_rec.legislation_code;
504: End If;
505: If (p_rec.data_type = hr_api.g_varchar2) then
506: p_rec.data_type :=
507: ff_fgl_shd.g_old_rec.data_type;
508: End If;
509: If (p_rec.global_name = hr_api.g_varchar2) then
505: If (p_rec.data_type = hr_api.g_varchar2) then
506: p_rec.data_type :=
507: ff_fgl_shd.g_old_rec.data_type;
508: End If;
509: If (p_rec.global_name = hr_api.g_varchar2) then
510: p_rec.global_name :=
511: ff_fgl_shd.g_old_rec.global_name;
512: End If;
513: If (p_rec.global_description = hr_api.g_varchar2) then
509: If (p_rec.global_name = hr_api.g_varchar2) then
510: p_rec.global_name :=
511: ff_fgl_shd.g_old_rec.global_name;
512: End If;
513: If (p_rec.global_description = hr_api.g_varchar2) then
514: p_rec.global_description :=
515: ff_fgl_shd.g_old_rec.global_description;
516: End If;
517: If (p_rec.global_value = hr_api.g_varchar2) then
513: If (p_rec.global_description = hr_api.g_varchar2) then
514: p_rec.global_description :=
515: ff_fgl_shd.g_old_rec.global_description;
516: End If;
517: If (p_rec.global_value = hr_api.g_varchar2) then
518: p_rec.global_value :=
519: ff_fgl_shd.g_old_rec.global_value;
520: End If;
521: --
612: (p_effective_date in date
613: ,p_datetrack_mode in varchar2
614: ,p_global_id in number
615: ,p_object_version_number in out nocopy number
616: ,p_data_type in varchar2 default hr_api.g_varchar2
617: ,p_global_name in varchar2 default hr_api.g_varchar2
618: ,p_business_group_id in number default hr_api.g_number
619: ,p_legislation_code in varchar2 default hr_api.g_varchar2
620: ,p_global_description in varchar2 default hr_api.g_varchar2
613: ,p_datetrack_mode in varchar2
614: ,p_global_id in number
615: ,p_object_version_number in out nocopy number
616: ,p_data_type in varchar2 default hr_api.g_varchar2
617: ,p_global_name in varchar2 default hr_api.g_varchar2
618: ,p_business_group_id in number default hr_api.g_number
619: ,p_legislation_code in varchar2 default hr_api.g_varchar2
620: ,p_global_description in varchar2 default hr_api.g_varchar2
621: ,p_global_value in varchar2 default hr_api.g_varchar2
614: ,p_global_id in number
615: ,p_object_version_number in out nocopy number
616: ,p_data_type in varchar2 default hr_api.g_varchar2
617: ,p_global_name in varchar2 default hr_api.g_varchar2
618: ,p_business_group_id in number default hr_api.g_number
619: ,p_legislation_code in varchar2 default hr_api.g_varchar2
620: ,p_global_description in varchar2 default hr_api.g_varchar2
621: ,p_global_value in varchar2 default hr_api.g_varchar2
622: ,p_effective_start_date out nocopy date
615: ,p_object_version_number in out nocopy number
616: ,p_data_type in varchar2 default hr_api.g_varchar2
617: ,p_global_name in varchar2 default hr_api.g_varchar2
618: ,p_business_group_id in number default hr_api.g_number
619: ,p_legislation_code in varchar2 default hr_api.g_varchar2
620: ,p_global_description in varchar2 default hr_api.g_varchar2
621: ,p_global_value in varchar2 default hr_api.g_varchar2
622: ,p_effective_start_date out nocopy date
623: ,p_effective_end_date out nocopy date
616: ,p_data_type in varchar2 default hr_api.g_varchar2
617: ,p_global_name in varchar2 default hr_api.g_varchar2
618: ,p_business_group_id in number default hr_api.g_number
619: ,p_legislation_code in varchar2 default hr_api.g_varchar2
620: ,p_global_description in varchar2 default hr_api.g_varchar2
621: ,p_global_value in varchar2 default hr_api.g_varchar2
622: ,p_effective_start_date out nocopy date
623: ,p_effective_end_date out nocopy date
624: ) is
617: ,p_global_name in varchar2 default hr_api.g_varchar2
618: ,p_business_group_id in number default hr_api.g_number
619: ,p_legislation_code in varchar2 default hr_api.g_varchar2
620: ,p_global_description in varchar2 default hr_api.g_varchar2
621: ,p_global_value in varchar2 default hr_api.g_varchar2
622: ,p_effective_start_date out nocopy date
623: ,p_effective_end_date out nocopy date
624: ) is
625: --