99: End if;
100:
101: --
102: Exception
103: When hr_api.check_integrity_violated Then
104: -- A check constraint has been violated
105: --
106: pqh_str_shd.constraint_error
107: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
103: When hr_api.check_integrity_violated Then
104: -- A check constraint has been violated
105: --
106: pqh_str_shd.constraint_error
107: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
108: When hr_api.parent_integrity_violated Then
109: -- Parent integrity has been violated
110: --
111: pqh_str_shd.constraint_error
104: -- A check constraint has been violated
105: --
106: pqh_str_shd.constraint_error
107: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
108: When hr_api.parent_integrity_violated Then
109: -- Parent integrity has been violated
110: --
111: pqh_str_shd.constraint_error
112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
108: When hr_api.parent_integrity_violated Then
109: -- Parent integrity has been violated
110: --
111: pqh_str_shd.constraint_error
112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When hr_api.unique_integrity_violated Then
114: -- Unique integrity has been violated
115: --
116: pqh_str_shd.constraint_error
109: -- Parent integrity has been violated
110: --
111: pqh_str_shd.constraint_error
112: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When hr_api.unique_integrity_violated Then
114: -- Unique integrity has been violated
115: --
116: pqh_str_shd.constraint_error
117: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
113: When hr_api.unique_integrity_violated Then
114: -- Unique integrity has been violated
115: --
116: pqh_str_shd.constraint_error
117: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
118: When Others Then
119: --
120: Raise;
121: End update_dml;
267: );
268: --
269: exception
270: --
271: when hr_api.cannot_find_prog_unit then
272: --
273: hr_api.cannot_find_prog_unit_error
274: (p_module_name => 'PQH_FR_STAT_SITUATION_RULES'
275: ,p_hook_type => 'AU');
269: exception
270: --
271: when hr_api.cannot_find_prog_unit then
272: --
273: hr_api.cannot_find_prog_unit_error
274: (p_module_name => 'PQH_FR_STAT_SITUATION_RULES'
275: ,p_hook_type => 'AU');
276: --
277: end;
337: -- p_rec plsql record structure
338: -- to see if a system default is being used. If a system default
339: -- is being used then we must set to the 'current' argument value.
340: --
341: If (p_rec.statutory_situation_id = hr_api.g_number) then
342: p_rec.statutory_situation_id :=
343: pqh_str_shd.g_old_rec.statutory_situation_id;
344: End If;
345: If (p_rec.processing_sequence = hr_api.g_number) then
341: If (p_rec.statutory_situation_id = hr_api.g_number) then
342: p_rec.statutory_situation_id :=
343: pqh_str_shd.g_old_rec.statutory_situation_id;
344: End If;
345: If (p_rec.processing_sequence = hr_api.g_number) then
346: p_rec.processing_sequence :=
347: pqh_str_shd.g_old_rec.processing_sequence;
348: End If;
349: If (p_rec.txn_category_attribute_id = hr_api.g_number) then
345: If (p_rec.processing_sequence = hr_api.g_number) then
346: p_rec.processing_sequence :=
347: pqh_str_shd.g_old_rec.processing_sequence;
348: End If;
349: If (p_rec.txn_category_attribute_id = hr_api.g_number) then
350: p_rec.txn_category_attribute_id :=
351: pqh_str_shd.g_old_rec.txn_category_attribute_id;
352: End If;
353: If (p_rec.from_value = hr_api.g_varchar2) then
349: If (p_rec.txn_category_attribute_id = hr_api.g_number) then
350: p_rec.txn_category_attribute_id :=
351: pqh_str_shd.g_old_rec.txn_category_attribute_id;
352: End If;
353: If (p_rec.from_value = hr_api.g_varchar2) then
354: p_rec.from_value :=
355: pqh_str_shd.g_old_rec.from_value;
356: End If;
357: If (p_rec.to_value = hr_api.g_varchar2) then
353: If (p_rec.from_value = hr_api.g_varchar2) then
354: p_rec.from_value :=
355: pqh_str_shd.g_old_rec.from_value;
356: End If;
357: If (p_rec.to_value = hr_api.g_varchar2) then
358: p_rec.to_value :=
359: pqh_str_shd.g_old_rec.to_value;
360: End If;
361: If (p_rec.enabled_flag = hr_api.g_varchar2) then
357: If (p_rec.to_value = hr_api.g_varchar2) then
358: p_rec.to_value :=
359: pqh_str_shd.g_old_rec.to_value;
360: End If;
361: If (p_rec.enabled_flag = hr_api.g_varchar2) then
362: p_rec.enabled_flag :=
363: pqh_str_shd.g_old_rec.enabled_flag;
364: End If;
365: If (p_rec.required_flag = hr_api.g_varchar2) then
361: If (p_rec.enabled_flag = hr_api.g_varchar2) then
362: p_rec.enabled_flag :=
363: pqh_str_shd.g_old_rec.enabled_flag;
364: End If;
365: If (p_rec.required_flag = hr_api.g_varchar2) then
366: p_rec.required_flag :=
367: pqh_str_shd.g_old_rec.required_flag;
368: End If;
369: If (p_rec.exclude_flag = hr_api.g_varchar2) then
365: If (p_rec.required_flag = hr_api.g_varchar2) then
366: p_rec.required_flag :=
367: pqh_str_shd.g_old_rec.required_flag;
368: End If;
369: If (p_rec.exclude_flag = hr_api.g_varchar2) then
370: p_rec.exclude_flag :=
371: pqh_str_shd.g_old_rec.exclude_flag;
372: End If;
373: --
441: Procedure upd
442: (p_effective_date in date
443: ,p_stat_situation_rule_id in number
444: ,p_object_version_number in out nocopy number
445: ,p_statutory_situation_id in number default hr_api.g_number
446: ,p_processing_sequence in number default hr_api.g_number
447: ,p_txn_category_attribute_id in number default hr_api.g_number
448: ,p_from_value in varchar2 default hr_api.g_varchar2
449: ,p_to_value in varchar2 default hr_api.g_varchar2
442: (p_effective_date in date
443: ,p_stat_situation_rule_id in number
444: ,p_object_version_number in out nocopy number
445: ,p_statutory_situation_id in number default hr_api.g_number
446: ,p_processing_sequence in number default hr_api.g_number
447: ,p_txn_category_attribute_id in number default hr_api.g_number
448: ,p_from_value in varchar2 default hr_api.g_varchar2
449: ,p_to_value in varchar2 default hr_api.g_varchar2
450: ,p_enabled_flag in varchar2 default hr_api.g_varchar2
443: ,p_stat_situation_rule_id in number
444: ,p_object_version_number in out nocopy number
445: ,p_statutory_situation_id in number default hr_api.g_number
446: ,p_processing_sequence in number default hr_api.g_number
447: ,p_txn_category_attribute_id in number default hr_api.g_number
448: ,p_from_value in varchar2 default hr_api.g_varchar2
449: ,p_to_value in varchar2 default hr_api.g_varchar2
450: ,p_enabled_flag in varchar2 default hr_api.g_varchar2
451: ,p_required_flag in varchar2 default hr_api.g_varchar2
444: ,p_object_version_number in out nocopy number
445: ,p_statutory_situation_id in number default hr_api.g_number
446: ,p_processing_sequence in number default hr_api.g_number
447: ,p_txn_category_attribute_id in number default hr_api.g_number
448: ,p_from_value in varchar2 default hr_api.g_varchar2
449: ,p_to_value in varchar2 default hr_api.g_varchar2
450: ,p_enabled_flag in varchar2 default hr_api.g_varchar2
451: ,p_required_flag in varchar2 default hr_api.g_varchar2
452: ,p_exclude_flag in varchar2 default hr_api.g_varchar2
445: ,p_statutory_situation_id in number default hr_api.g_number
446: ,p_processing_sequence in number default hr_api.g_number
447: ,p_txn_category_attribute_id in number default hr_api.g_number
448: ,p_from_value in varchar2 default hr_api.g_varchar2
449: ,p_to_value in varchar2 default hr_api.g_varchar2
450: ,p_enabled_flag in varchar2 default hr_api.g_varchar2
451: ,p_required_flag in varchar2 default hr_api.g_varchar2
452: ,p_exclude_flag in varchar2 default hr_api.g_varchar2
453: ) is
446: ,p_processing_sequence in number default hr_api.g_number
447: ,p_txn_category_attribute_id in number default hr_api.g_number
448: ,p_from_value in varchar2 default hr_api.g_varchar2
449: ,p_to_value in varchar2 default hr_api.g_varchar2
450: ,p_enabled_flag in varchar2 default hr_api.g_varchar2
451: ,p_required_flag in varchar2 default hr_api.g_varchar2
452: ,p_exclude_flag in varchar2 default hr_api.g_varchar2
453: ) is
454: --
447: ,p_txn_category_attribute_id in number default hr_api.g_number
448: ,p_from_value in varchar2 default hr_api.g_varchar2
449: ,p_to_value in varchar2 default hr_api.g_varchar2
450: ,p_enabled_flag in varchar2 default hr_api.g_varchar2
451: ,p_required_flag in varchar2 default hr_api.g_varchar2
452: ,p_exclude_flag in varchar2 default hr_api.g_varchar2
453: ) is
454: --
455: l_rec pqh_str_shd.g_rec_type;
448: ,p_from_value in varchar2 default hr_api.g_varchar2
449: ,p_to_value in varchar2 default hr_api.g_varchar2
450: ,p_enabled_flag in varchar2 default hr_api.g_varchar2
451: ,p_required_flag in varchar2 default hr_api.g_varchar2
452: ,p_exclude_flag in varchar2 default hr_api.g_varchar2
453: ) is
454: --
455: l_rec pqh_str_shd.g_rec_type;
456: l_proc varchar2(72) := g_package||'upd';