87: --
88: hr_utility.set_location(' Leaving:'||l_proc, 10);
89: --
90: Exception
91: When hr_api.check_integrity_violated Then
92: -- A check constraint has been violated
93: --
94: pay_pta_shd.constraint_error
95: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
91: When hr_api.check_integrity_violated Then
92: -- A check constraint has been violated
93: --
94: pay_pta_shd.constraint_error
95: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
96: When hr_api.parent_integrity_violated Then
97: -- Parent integrity has been violated
98: --
99: pay_pta_shd.constraint_error
92: -- A check constraint has been violated
93: --
94: pay_pta_shd.constraint_error
95: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
96: When hr_api.parent_integrity_violated Then
97: -- Parent integrity has been violated
98: --
99: pay_pta_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
96: When hr_api.parent_integrity_violated Then
97: -- Parent integrity has been violated
98: --
99: pay_pta_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.unique_integrity_violated Then
102: -- Unique integrity has been violated
103: --
104: pay_pta_shd.constraint_error
97: -- Parent integrity has been violated
98: --
99: pay_pta_shd.constraint_error
100: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.unique_integrity_violated Then
102: -- Unique integrity has been violated
103: --
104: pay_pta_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
101: When hr_api.unique_integrity_violated Then
102: -- Unique integrity has been violated
103: --
104: pay_pta_shd.constraint_error
105: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
106: When Others Then
107: --
108: Raise;
109: End update_dml;
244: );
245: --
246: exception
247: --
248: when hr_api.cannot_find_prog_unit then
249: --
250: hr_api.cannot_find_prog_unit_error
251: (p_module_name => 'PAY_DATED_TABLES'
252: ,p_hook_type => 'AU');
246: exception
247: --
248: when hr_api.cannot_find_prog_unit then
249: --
250: hr_api.cannot_find_prog_unit_error
251: (p_module_name => 'PAY_DATED_TABLES'
252: ,p_hook_type => 'AU');
253: --
254: end;
309: -- p_rec plsql record structure
310: -- to see if a system default is being used. If a system default
311: -- is being used then we must set to the 'current' argument value.
312: --
313: If (p_rec.table_name = hr_api.g_varchar2) then
314: p_rec.table_name :=
315: pay_pta_shd.g_old_rec.table_name;
316: End If;
317: If (p_rec.application_id = hr_api.g_number) then
313: If (p_rec.table_name = hr_api.g_varchar2) then
314: p_rec.table_name :=
315: pay_pta_shd.g_old_rec.table_name;
316: End If;
317: If (p_rec.application_id = hr_api.g_number) then
318: p_rec.application_id :=
319: pay_pta_shd.g_old_rec.application_id;
320: End If;
321: If (p_rec.surrogate_key_name = hr_api.g_varchar2) then
317: If (p_rec.application_id = hr_api.g_number) then
318: p_rec.application_id :=
319: pay_pta_shd.g_old_rec.application_id;
320: End If;
321: If (p_rec.surrogate_key_name = hr_api.g_varchar2) then
322: p_rec.surrogate_key_name :=
323: pay_pta_shd.g_old_rec.surrogate_key_name;
324: End If;
325: If (p_rec.start_date_name = hr_api.g_varchar2) then
321: If (p_rec.surrogate_key_name = hr_api.g_varchar2) then
322: p_rec.surrogate_key_name :=
323: pay_pta_shd.g_old_rec.surrogate_key_name;
324: End If;
325: If (p_rec.start_date_name = hr_api.g_varchar2) then
326: p_rec.start_date_name :=
327: pay_pta_shd.g_old_rec.start_date_name;
328: End If;
329: If (p_rec.end_date_name = hr_api.g_varchar2) then
325: If (p_rec.start_date_name = hr_api.g_varchar2) then
326: p_rec.start_date_name :=
327: pay_pta_shd.g_old_rec.start_date_name;
328: End If;
329: If (p_rec.end_date_name = hr_api.g_varchar2) then
330: p_rec.end_date_name :=
331: pay_pta_shd.g_old_rec.end_date_name;
332: End If;
333: If (p_rec.business_group_id = hr_api.g_number) then
329: If (p_rec.end_date_name = hr_api.g_varchar2) then
330: p_rec.end_date_name :=
331: pay_pta_shd.g_old_rec.end_date_name;
332: End If;
333: If (p_rec.business_group_id = hr_api.g_number) then
334: p_rec.business_group_id :=
335: pay_pta_shd.g_old_rec.business_group_id;
336: End If;
337: If (p_rec.legislation_code = hr_api.g_varchar2) then
333: If (p_rec.business_group_id = hr_api.g_number) then
334: p_rec.business_group_id :=
335: pay_pta_shd.g_old_rec.business_group_id;
336: End If;
337: If (p_rec.legislation_code = hr_api.g_varchar2) then
338: p_rec.legislation_code :=
339: pay_pta_shd.g_old_rec.legislation_code;
340: End If;
341: If (p_rec.dyn_trigger_type = hr_api.g_varchar2) then
337: If (p_rec.legislation_code = hr_api.g_varchar2) then
338: p_rec.legislation_code :=
339: pay_pta_shd.g_old_rec.legislation_code;
340: End If;
341: If (p_rec.dyn_trigger_type = hr_api.g_varchar2) then
342: p_rec.dyn_trigger_type :=
343: pay_pta_shd.g_old_rec.dyn_trigger_type;
344: End If;
345: If (p_rec.dyn_trigger_package_name = hr_api.g_varchar2) then
341: If (p_rec.dyn_trigger_type = hr_api.g_varchar2) then
342: p_rec.dyn_trigger_type :=
343: pay_pta_shd.g_old_rec.dyn_trigger_type;
344: End If;
345: If (p_rec.dyn_trigger_package_name = hr_api.g_varchar2) then
346: p_rec.dyn_trigger_package_name :=
347: pay_pta_shd.g_old_rec.dyn_trigger_package_name;
348: End If;
349: If (p_rec.dyn_trig_pkg_generated = hr_api.g_varchar2) then
345: If (p_rec.dyn_trigger_package_name = hr_api.g_varchar2) then
346: p_rec.dyn_trigger_package_name :=
347: pay_pta_shd.g_old_rec.dyn_trigger_package_name;
348: End If;
349: If (p_rec.dyn_trig_pkg_generated = hr_api.g_varchar2) then
350: p_rec.dyn_trig_pkg_generated :=
351: pay_pta_shd.g_old_rec.dyn_trig_pkg_generated;
352: End If;
353: --
403: -- ----------------------------------------------------------------------------
404: Procedure upd
405: (p_dated_table_id in number
406: ,p_object_version_number in out nocopy number
407: ,p_table_name in varchar2 default hr_api.g_varchar2
408: ,p_application_id in number default hr_api.g_number
409: ,p_surrogate_key_name in varchar2 default hr_api.g_varchar2
410: ,p_start_date_name in varchar2 default hr_api.g_varchar2
411: ,p_end_date_name in varchar2 default hr_api.g_varchar2
404: Procedure upd
405: (p_dated_table_id in number
406: ,p_object_version_number in out nocopy number
407: ,p_table_name in varchar2 default hr_api.g_varchar2
408: ,p_application_id in number default hr_api.g_number
409: ,p_surrogate_key_name in varchar2 default hr_api.g_varchar2
410: ,p_start_date_name in varchar2 default hr_api.g_varchar2
411: ,p_end_date_name in varchar2 default hr_api.g_varchar2
412: ,p_business_group_id in number default hr_api.g_number
405: (p_dated_table_id in number
406: ,p_object_version_number in out nocopy number
407: ,p_table_name in varchar2 default hr_api.g_varchar2
408: ,p_application_id in number default hr_api.g_number
409: ,p_surrogate_key_name in varchar2 default hr_api.g_varchar2
410: ,p_start_date_name in varchar2 default hr_api.g_varchar2
411: ,p_end_date_name in varchar2 default hr_api.g_varchar2
412: ,p_business_group_id in number default hr_api.g_number
413: ,p_legislation_code in varchar2 default hr_api.g_varchar2
406: ,p_object_version_number in out nocopy number
407: ,p_table_name in varchar2 default hr_api.g_varchar2
408: ,p_application_id in number default hr_api.g_number
409: ,p_surrogate_key_name in varchar2 default hr_api.g_varchar2
410: ,p_start_date_name in varchar2 default hr_api.g_varchar2
411: ,p_end_date_name in varchar2 default hr_api.g_varchar2
412: ,p_business_group_id in number default hr_api.g_number
413: ,p_legislation_code in varchar2 default hr_api.g_varchar2
414: ,p_dyn_trigger_type in varchar2 default hr_api.g_varchar2
407: ,p_table_name in varchar2 default hr_api.g_varchar2
408: ,p_application_id in number default hr_api.g_number
409: ,p_surrogate_key_name in varchar2 default hr_api.g_varchar2
410: ,p_start_date_name in varchar2 default hr_api.g_varchar2
411: ,p_end_date_name in varchar2 default hr_api.g_varchar2
412: ,p_business_group_id in number default hr_api.g_number
413: ,p_legislation_code in varchar2 default hr_api.g_varchar2
414: ,p_dyn_trigger_type in varchar2 default hr_api.g_varchar2
415: ,p_dyn_trigger_package_name in varchar2 default hr_api.g_varchar2
408: ,p_application_id in number default hr_api.g_number
409: ,p_surrogate_key_name in varchar2 default hr_api.g_varchar2
410: ,p_start_date_name in varchar2 default hr_api.g_varchar2
411: ,p_end_date_name in varchar2 default hr_api.g_varchar2
412: ,p_business_group_id in number default hr_api.g_number
413: ,p_legislation_code in varchar2 default hr_api.g_varchar2
414: ,p_dyn_trigger_type in varchar2 default hr_api.g_varchar2
415: ,p_dyn_trigger_package_name in varchar2 default hr_api.g_varchar2
416: ,p_dyn_trig_pkg_generated in varchar2 default hr_api.g_varchar2
409: ,p_surrogate_key_name in varchar2 default hr_api.g_varchar2
410: ,p_start_date_name in varchar2 default hr_api.g_varchar2
411: ,p_end_date_name in varchar2 default hr_api.g_varchar2
412: ,p_business_group_id in number default hr_api.g_number
413: ,p_legislation_code in varchar2 default hr_api.g_varchar2
414: ,p_dyn_trigger_type in varchar2 default hr_api.g_varchar2
415: ,p_dyn_trigger_package_name in varchar2 default hr_api.g_varchar2
416: ,p_dyn_trig_pkg_generated in varchar2 default hr_api.g_varchar2
417: ) is
410: ,p_start_date_name in varchar2 default hr_api.g_varchar2
411: ,p_end_date_name in varchar2 default hr_api.g_varchar2
412: ,p_business_group_id in number default hr_api.g_number
413: ,p_legislation_code in varchar2 default hr_api.g_varchar2
414: ,p_dyn_trigger_type in varchar2 default hr_api.g_varchar2
415: ,p_dyn_trigger_package_name in varchar2 default hr_api.g_varchar2
416: ,p_dyn_trig_pkg_generated in varchar2 default hr_api.g_varchar2
417: ) is
418: --
411: ,p_end_date_name in varchar2 default hr_api.g_varchar2
412: ,p_business_group_id in number default hr_api.g_number
413: ,p_legislation_code in varchar2 default hr_api.g_varchar2
414: ,p_dyn_trigger_type in varchar2 default hr_api.g_varchar2
415: ,p_dyn_trigger_package_name in varchar2 default hr_api.g_varchar2
416: ,p_dyn_trig_pkg_generated in varchar2 default hr_api.g_varchar2
417: ) is
418: --
419: l_rec pay_pta_shd.g_rec_type;
412: ,p_business_group_id in number default hr_api.g_number
413: ,p_legislation_code in varchar2 default hr_api.g_varchar2
414: ,p_dyn_trigger_type in varchar2 default hr_api.g_varchar2
415: ,p_dyn_trigger_package_name in varchar2 default hr_api.g_varchar2
416: ,p_dyn_trig_pkg_generated in varchar2 default hr_api.g_varchar2
417: ) is
418: --
419: l_rec pay_pta_shd.g_rec_type;
420: l_proc varchar2(72) := g_package||'upd';