83: --
84: hr_utility.set_location(' Leaving:'||l_proc, 10);
85: --
86: Exception
87: When hr_api.check_integrity_violated Then
88: -- A check constraint has been violated
89: --
90: pqh_rfe_shd.constraint_error
91: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
87: When hr_api.check_integrity_violated Then
88: -- A check constraint has been violated
89: --
90: pqh_rfe_shd.constraint_error
91: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.parent_integrity_violated Then
93: -- Parent integrity has been violated
94: --
95: pqh_rfe_shd.constraint_error
88: -- A check constraint has been violated
89: --
90: pqh_rfe_shd.constraint_error
91: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.parent_integrity_violated Then
93: -- Parent integrity has been violated
94: --
95: pqh_rfe_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.parent_integrity_violated Then
93: -- Parent integrity has been violated
94: --
95: pqh_rfe_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: --
100: pqh_rfe_shd.constraint_error
93: -- Parent integrity has been violated
94: --
95: pqh_rfe_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: --
100: pqh_rfe_shd.constraint_error
101: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.unique_integrity_violated Then
98: -- Unique integrity has been violated
99: --
100: pqh_rfe_shd.constraint_error
101: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
102: When Others Then
103: --
104: Raise;
105: End update_dml;
226: );
227: --
228: exception
229: --
230: when hr_api.cannot_find_prog_unit then
231: --
232: hr_api.cannot_find_prog_unit_error
233: (p_module_name => 'PQH_RATE_FACTOR_ON_ELMNTS'
234: ,p_hook_type => 'AU');
228: exception
229: --
230: when hr_api.cannot_find_prog_unit then
231: --
232: hr_api.cannot_find_prog_unit_error
233: (p_module_name => 'PQH_RATE_FACTOR_ON_ELMNTS'
234: ,p_hook_type => 'AU');
235: --
236: end;
291: -- p_rec plsql record structure
292: -- to see if a system default is being used. If a system default
293: -- is being used then we must set to the 'current' argument value.
294: --
295: If (p_rec.criteria_rate_element_id = hr_api.g_number) then
296: p_rec.criteria_rate_element_id :=
297: pqh_rfe_shd.g_old_rec.criteria_rate_element_id;
298: End If;
299: If (p_rec.criteria_rate_factor_id = hr_api.g_number) then
295: If (p_rec.criteria_rate_element_id = hr_api.g_number) then
296: p_rec.criteria_rate_element_id :=
297: pqh_rfe_shd.g_old_rec.criteria_rate_element_id;
298: End If;
299: If (p_rec.criteria_rate_factor_id = hr_api.g_number) then
300: p_rec.criteria_rate_factor_id :=
301: pqh_rfe_shd.g_old_rec.criteria_rate_factor_id;
302: End If;
303: If (p_rec.rate_factor_val_record_tbl = hr_api.g_varchar2) then
299: If (p_rec.criteria_rate_factor_id = hr_api.g_number) then
300: p_rec.criteria_rate_factor_id :=
301: pqh_rfe_shd.g_old_rec.criteria_rate_factor_id;
302: End If;
303: If (p_rec.rate_factor_val_record_tbl = hr_api.g_varchar2) then
304: p_rec.rate_factor_val_record_tbl :=
305: pqh_rfe_shd.g_old_rec.rate_factor_val_record_tbl;
306: End If;
307: If (p_rec.rate_factor_val_record_col = hr_api.g_varchar2) then
303: If (p_rec.rate_factor_val_record_tbl = hr_api.g_varchar2) then
304: p_rec.rate_factor_val_record_tbl :=
305: pqh_rfe_shd.g_old_rec.rate_factor_val_record_tbl;
306: End If;
307: If (p_rec.rate_factor_val_record_col = hr_api.g_varchar2) then
308: p_rec.rate_factor_val_record_col :=
309: pqh_rfe_shd.g_old_rec.rate_factor_val_record_col;
310: End If;
311: If (p_rec.business_group_id = hr_api.g_number) then
307: If (p_rec.rate_factor_val_record_col = hr_api.g_varchar2) then
308: p_rec.rate_factor_val_record_col :=
309: pqh_rfe_shd.g_old_rec.rate_factor_val_record_col;
310: End If;
311: If (p_rec.business_group_id = hr_api.g_number) then
312: p_rec.business_group_id :=
313: pqh_rfe_shd.g_old_rec.business_group_id;
314: End If;
315: If (p_rec.legislation_code = hr_api.g_varchar2) then
311: If (p_rec.business_group_id = hr_api.g_number) then
312: p_rec.business_group_id :=
313: pqh_rfe_shd.g_old_rec.business_group_id;
314: End If;
315: If (p_rec.legislation_code = hr_api.g_varchar2) then
316: p_rec.legislation_code :=
317: pqh_rfe_shd.g_old_rec.legislation_code;
318: End If;
319: --
379: Procedure upd
380: (p_effective_date in date
381: ,p_rate_factor_on_elmnt_id in number
382: ,p_object_version_number in out nocopy number
383: ,p_criteria_rate_element_id in number default hr_api.g_number
384: ,p_criteria_rate_factor_id in number default hr_api.g_number
385: ,p_rate_factor_val_record_tbl in varchar2 default hr_api.g_varchar2
386: ,p_rate_factor_val_record_col in varchar2 default hr_api.g_varchar2
387: ,p_business_group_id in number default hr_api.g_number
380: (p_effective_date in date
381: ,p_rate_factor_on_elmnt_id in number
382: ,p_object_version_number in out nocopy number
383: ,p_criteria_rate_element_id in number default hr_api.g_number
384: ,p_criteria_rate_factor_id in number default hr_api.g_number
385: ,p_rate_factor_val_record_tbl in varchar2 default hr_api.g_varchar2
386: ,p_rate_factor_val_record_col in varchar2 default hr_api.g_varchar2
387: ,p_business_group_id in number default hr_api.g_number
388: ,p_legislation_code in varchar2 default hr_api.g_varchar2
381: ,p_rate_factor_on_elmnt_id in number
382: ,p_object_version_number in out nocopy number
383: ,p_criteria_rate_element_id in number default hr_api.g_number
384: ,p_criteria_rate_factor_id in number default hr_api.g_number
385: ,p_rate_factor_val_record_tbl in varchar2 default hr_api.g_varchar2
386: ,p_rate_factor_val_record_col in varchar2 default hr_api.g_varchar2
387: ,p_business_group_id in number default hr_api.g_number
388: ,p_legislation_code in varchar2 default hr_api.g_varchar2
389: ) is
382: ,p_object_version_number in out nocopy number
383: ,p_criteria_rate_element_id in number default hr_api.g_number
384: ,p_criteria_rate_factor_id in number default hr_api.g_number
385: ,p_rate_factor_val_record_tbl in varchar2 default hr_api.g_varchar2
386: ,p_rate_factor_val_record_col in varchar2 default hr_api.g_varchar2
387: ,p_business_group_id in number default hr_api.g_number
388: ,p_legislation_code in varchar2 default hr_api.g_varchar2
389: ) is
390: --
383: ,p_criteria_rate_element_id in number default hr_api.g_number
384: ,p_criteria_rate_factor_id in number default hr_api.g_number
385: ,p_rate_factor_val_record_tbl in varchar2 default hr_api.g_varchar2
386: ,p_rate_factor_val_record_col in varchar2 default hr_api.g_varchar2
387: ,p_business_group_id in number default hr_api.g_number
388: ,p_legislation_code in varchar2 default hr_api.g_varchar2
389: ) is
390: --
391: l_rec pqh_rfe_shd.g_rec_type;
384: ,p_criteria_rate_factor_id in number default hr_api.g_number
385: ,p_rate_factor_val_record_tbl in varchar2 default hr_api.g_varchar2
386: ,p_rate_factor_val_record_col in varchar2 default hr_api.g_varchar2
387: ,p_business_group_id in number default hr_api.g_number
388: ,p_legislation_code in varchar2 default hr_api.g_varchar2
389: ) is
390: --
391: l_rec pqh_rfe_shd.g_rec_type;
392: l_proc varchar2(72) := g_package||'upd';