84: --
85: hr_utility.set_location(' Leaving:'||l_proc, 10);
86: --
87: Exception
88: When hr_api.check_integrity_violated Then
89: -- A check constraint has been violated
90: --
91: per_sol_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
88: When hr_api.check_integrity_violated Then
89: -- A check constraint has been violated
90: --
91: per_sol_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.parent_integrity_violated Then
94: -- Parent integrity has been violated
95: --
96: per_sol_shd.constraint_error
89: -- A check constraint has been violated
90: --
91: per_sol_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.parent_integrity_violated Then
94: -- Parent integrity has been violated
95: --
96: per_sol_shd.constraint_error
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.parent_integrity_violated Then
94: -- Parent integrity has been violated
95: --
96: per_sol_shd.constraint_error
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
98: When hr_api.unique_integrity_violated Then
99: -- Unique integrity has been violated
100: --
101: per_sol_shd.constraint_error
94: -- Parent integrity has been violated
95: --
96: per_sol_shd.constraint_error
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
98: When hr_api.unique_integrity_violated Then
99: -- Unique integrity has been violated
100: --
101: per_sol_shd.constraint_error
102: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
98: When hr_api.unique_integrity_violated Then
99: -- Unique integrity has been violated
100: --
101: per_sol_shd.constraint_error
102: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
103: When Others Then
104: --
105: Raise;
106: End update_dml;
231: );
232: --
233: exception
234: --
235: when hr_api.cannot_find_prog_unit then
236: --
237: hr_api.cannot_find_prog_unit_error
238: (p_module_name => 'PER_SOLUTIONS'
239: ,p_hook_type => 'AU');
233: exception
234: --
235: when hr_api.cannot_find_prog_unit then
236: --
237: hr_api.cannot_find_prog_unit_error
238: (p_module_name => 'PER_SOLUTIONS'
239: ,p_hook_type => 'AU');
240: --
241: end;
296: -- p_rec plsql record structure
297: -- to see if a system default is being used. If a system default
298: -- is being used then we must set to the 'current' argument value.
299: --
300: If (p_rec.solution_name = hr_api.g_varchar2) then
301: p_rec.solution_name :=
302: per_sol_shd.g_old_rec.solution_name;
303: End If;
304: If (p_rec.description = hr_api.g_varchar2) then
300: If (p_rec.solution_name = hr_api.g_varchar2) then
301: p_rec.solution_name :=
302: per_sol_shd.g_old_rec.solution_name;
303: End If;
304: If (p_rec.description = hr_api.g_varchar2) then
305: p_rec.description :=
306: per_sol_shd.g_old_rec.description;
307: End If;
308: If (p_rec.link_to_full_description = hr_api.g_varchar2) then
304: If (p_rec.description = hr_api.g_varchar2) then
305: p_rec.description :=
306: per_sol_shd.g_old_rec.description;
307: End If;
308: If (p_rec.link_to_full_description = hr_api.g_varchar2) then
309: p_rec.link_to_full_description :=
310: per_sol_shd.g_old_rec.link_to_full_description;
311: End If;
312: If (p_rec.solution_type_name = hr_api.g_varchar2) then
308: If (p_rec.link_to_full_description = hr_api.g_varchar2) then
309: p_rec.link_to_full_description :=
310: per_sol_shd.g_old_rec.link_to_full_description;
311: End If;
312: If (p_rec.solution_type_name = hr_api.g_varchar2) then
313: p_rec.solution_type_name :=
314: per_sol_shd.g_old_rec.solution_type_name;
315: End If;
316: If (p_rec.vertical = hr_api.g_varchar2) then
312: If (p_rec.solution_type_name = hr_api.g_varchar2) then
313: p_rec.solution_type_name :=
314: per_sol_shd.g_old_rec.solution_type_name;
315: End If;
316: If (p_rec.vertical = hr_api.g_varchar2) then
317: p_rec.vertical :=
318: per_sol_shd.g_old_rec.vertical;
319: End If;
320: If (p_rec.legislation_code = hr_api.g_varchar2) then
316: If (p_rec.vertical = hr_api.g_varchar2) then
317: p_rec.vertical :=
318: per_sol_shd.g_old_rec.vertical;
319: End If;
320: If (p_rec.legislation_code = hr_api.g_varchar2) then
321: p_rec.legislation_code :=
322: per_sol_shd.g_old_rec.legislation_code;
323: End If;
324: If (p_rec.user_id = hr_api.g_number) then
320: If (p_rec.legislation_code = hr_api.g_varchar2) then
321: p_rec.legislation_code :=
322: per_sol_shd.g_old_rec.legislation_code;
323: End If;
324: If (p_rec.user_id = hr_api.g_number) then
325: p_rec.user_id :=
326: per_sol_shd.g_old_rec.user_id;
327: End If;
328: --
388: Procedure upd
389: (p_effective_date in date
390: ,p_solution_id in number
391: ,p_object_version_number in out nocopy number
392: ,p_solution_name in varchar2 default hr_api.g_varchar2
393: ,p_solution_type_name in varchar2 default hr_api.g_varchar2
394: ,p_description in varchar2 default hr_api.g_varchar2
395: ,p_link_to_full_description in varchar2 default hr_api.g_varchar2
396: ,p_vertical in varchar2 default hr_api.g_varchar2
389: (p_effective_date in date
390: ,p_solution_id in number
391: ,p_object_version_number in out nocopy number
392: ,p_solution_name in varchar2 default hr_api.g_varchar2
393: ,p_solution_type_name in varchar2 default hr_api.g_varchar2
394: ,p_description in varchar2 default hr_api.g_varchar2
395: ,p_link_to_full_description in varchar2 default hr_api.g_varchar2
396: ,p_vertical in varchar2 default hr_api.g_varchar2
397: ,p_legislation_code in varchar2 default hr_api.g_varchar2
390: ,p_solution_id in number
391: ,p_object_version_number in out nocopy number
392: ,p_solution_name in varchar2 default hr_api.g_varchar2
393: ,p_solution_type_name in varchar2 default hr_api.g_varchar2
394: ,p_description in varchar2 default hr_api.g_varchar2
395: ,p_link_to_full_description in varchar2 default hr_api.g_varchar2
396: ,p_vertical in varchar2 default hr_api.g_varchar2
397: ,p_legislation_code in varchar2 default hr_api.g_varchar2
398: ,p_user_id in number default hr_api.g_number
391: ,p_object_version_number in out nocopy number
392: ,p_solution_name in varchar2 default hr_api.g_varchar2
393: ,p_solution_type_name in varchar2 default hr_api.g_varchar2
394: ,p_description in varchar2 default hr_api.g_varchar2
395: ,p_link_to_full_description in varchar2 default hr_api.g_varchar2
396: ,p_vertical in varchar2 default hr_api.g_varchar2
397: ,p_legislation_code in varchar2 default hr_api.g_varchar2
398: ,p_user_id in number default hr_api.g_number
399: ) is
392: ,p_solution_name in varchar2 default hr_api.g_varchar2
393: ,p_solution_type_name in varchar2 default hr_api.g_varchar2
394: ,p_description in varchar2 default hr_api.g_varchar2
395: ,p_link_to_full_description in varchar2 default hr_api.g_varchar2
396: ,p_vertical in varchar2 default hr_api.g_varchar2
397: ,p_legislation_code in varchar2 default hr_api.g_varchar2
398: ,p_user_id in number default hr_api.g_number
399: ) is
400: --
393: ,p_solution_type_name in varchar2 default hr_api.g_varchar2
394: ,p_description in varchar2 default hr_api.g_varchar2
395: ,p_link_to_full_description in varchar2 default hr_api.g_varchar2
396: ,p_vertical in varchar2 default hr_api.g_varchar2
397: ,p_legislation_code in varchar2 default hr_api.g_varchar2
398: ,p_user_id in number default hr_api.g_number
399: ) is
400: --
401: l_rec per_sol_shd.g_rec_type;
394: ,p_description in varchar2 default hr_api.g_varchar2
395: ,p_link_to_full_description in varchar2 default hr_api.g_varchar2
396: ,p_vertical in varchar2 default hr_api.g_varchar2
397: ,p_legislation_code in varchar2 default hr_api.g_varchar2
398: ,p_user_id in number default hr_api.g_number
399: ) is
400: --
401: l_rec per_sol_shd.g_rec_type;
402: l_proc varchar2(72) := g_package||'upd';