63: p_rec.object_version_number := p_rec.object_version_number + 1;
64: --
65: hr_ahc_shd.g_api_dml := true; -- Set the api dml status
66: --
67: -- Update the hr_api_hook_calls Row
68: --
69: update hr_api_hook_calls
70: set
71: api_hook_call_id = p_rec.api_hook_call_id,
65: hr_ahc_shd.g_api_dml := true; -- Set the api dml status
66: --
67: -- Update the hr_api_hook_calls Row
68: --
69: update hr_api_hook_calls
70: set
71: api_hook_call_id = p_rec.api_hook_call_id,
72: api_hook_id = p_rec.api_hook_id,
73: api_hook_call_type = p_rec.api_hook_call_type,
88: --
89: hr_utility.set_location(' Leaving:'||l_proc, 10);
90: --
91: Exception
92: When hr_api.check_integrity_violated Then
93: -- A check constraint has been violated
94: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
95: hr_ahc_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
92: When hr_api.check_integrity_violated Then
93: -- A check constraint has been violated
94: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
95: hr_ahc_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.parent_integrity_violated Then
98: -- Parent integrity has been violated
99: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
100: hr_ahc_shd.constraint_error
93: -- A check constraint has been violated
94: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
95: hr_ahc_shd.constraint_error
96: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.parent_integrity_violated Then
98: -- Parent integrity has been violated
99: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
100: hr_ahc_shd.constraint_error
101: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
97: When hr_api.parent_integrity_violated Then
98: -- Parent integrity has been violated
99: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
100: hr_ahc_shd.constraint_error
101: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
102: When hr_api.unique_integrity_violated Then
103: -- Unique integrity has been violated
104: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
105: hr_ahc_shd.constraint_error
98: -- Parent integrity has been violated
99: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
100: hr_ahc_shd.constraint_error
101: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
102: When hr_api.unique_integrity_violated Then
103: -- Unique integrity has been violated
104: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
105: hr_ahc_shd.constraint_error
106: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
102: When hr_api.unique_integrity_violated Then
103: -- Unique integrity has been violated
104: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
105: hr_ahc_shd.constraint_error
106: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
107: When Others Then
108: hr_ahc_shd.g_api_dml := false; -- Unset the api dml status
109: Raise;
110: End update_dml;
249: -- p_rec plsql record structure
250: -- to see if a system default is being used. If a system default
251: -- is being used then we must set to the 'current' argument value.
252: --
253: If (p_rec.api_hook_id = hr_api.g_number) then
254: p_rec.api_hook_id :=
255: hr_ahc_shd.g_old_rec.api_hook_id;
256: End If;
257: If (p_rec.api_hook_call_type = hr_api.g_varchar2) then
253: If (p_rec.api_hook_id = hr_api.g_number) then
254: p_rec.api_hook_id :=
255: hr_ahc_shd.g_old_rec.api_hook_id;
256: End If;
257: If (p_rec.api_hook_call_type = hr_api.g_varchar2) then
258: p_rec.api_hook_call_type :=
259: hr_ahc_shd.g_old_rec.api_hook_call_type;
260: End If;
261: If (p_rec.legislation_code = hr_api.g_varchar2) then
257: If (p_rec.api_hook_call_type = hr_api.g_varchar2) then
258: p_rec.api_hook_call_type :=
259: hr_ahc_shd.g_old_rec.api_hook_call_type;
260: End If;
261: If (p_rec.legislation_code = hr_api.g_varchar2) then
262: p_rec.legislation_code :=
263: hr_ahc_shd.g_old_rec.legislation_code;
264: End If;
265: If (p_rec.sequence = hr_api.g_number) then
261: If (p_rec.legislation_code = hr_api.g_varchar2) then
262: p_rec.legislation_code :=
263: hr_ahc_shd.g_old_rec.legislation_code;
264: End If;
265: If (p_rec.sequence = hr_api.g_number) then
266: p_rec.sequence :=
267: hr_ahc_shd.g_old_rec.sequence;
268: End If;
269: If (p_rec.enabled_flag = hr_api.g_varchar2) then
265: If (p_rec.sequence = hr_api.g_number) then
266: p_rec.sequence :=
267: hr_ahc_shd.g_old_rec.sequence;
268: End If;
269: If (p_rec.enabled_flag = hr_api.g_varchar2) then
270: p_rec.enabled_flag :=
271: hr_ahc_shd.g_old_rec.enabled_flag;
272: End If;
273: If (p_rec.call_package = hr_api.g_varchar2) then
269: If (p_rec.enabled_flag = hr_api.g_varchar2) then
270: p_rec.enabled_flag :=
271: hr_ahc_shd.g_old_rec.enabled_flag;
272: End If;
273: If (p_rec.call_package = hr_api.g_varchar2) then
274: p_rec.call_package :=
275: hr_ahc_shd.g_old_rec.call_package;
276: End If;
277: If (p_rec.call_procedure = hr_api.g_varchar2) then
273: If (p_rec.call_package = hr_api.g_varchar2) then
274: p_rec.call_package :=
275: hr_ahc_shd.g_old_rec.call_package;
276: End If;
277: If (p_rec.call_procedure = hr_api.g_varchar2) then
278: p_rec.call_procedure :=
279: hr_ahc_shd.g_old_rec.call_procedure;
280: End If;
281: If (p_rec.pre_processor_date = hr_api.g_date) then
277: If (p_rec.call_procedure = hr_api.g_varchar2) then
278: p_rec.call_procedure :=
279: hr_ahc_shd.g_old_rec.call_procedure;
280: End If;
281: If (p_rec.pre_processor_date = hr_api.g_date) then
282: p_rec.pre_processor_date :=
283: hr_ahc_shd.g_old_rec.pre_processor_date;
284: End If;
285: If (p_rec.encoded_error = hr_api.g_varchar2) then
281: If (p_rec.pre_processor_date = hr_api.g_date) then
282: p_rec.pre_processor_date :=
283: hr_ahc_shd.g_old_rec.pre_processor_date;
284: End If;
285: If (p_rec.encoded_error = hr_api.g_varchar2) then
286: p_rec.encoded_error :=
287: hr_ahc_shd.g_old_rec.encoded_error;
288: End If;
289: If (p_rec.status = hr_api.g_varchar2) then
285: If (p_rec.encoded_error = hr_api.g_varchar2) then
286: p_rec.encoded_error :=
287: hr_ahc_shd.g_old_rec.encoded_error;
288: End If;
289: If (p_rec.status = hr_api.g_varchar2) then
290: p_rec.status :=
291: hr_ahc_shd.g_old_rec.status;
292: End If;
293: If (p_rec.application_id = hr_api.g_number) then
289: If (p_rec.status = hr_api.g_varchar2) then
290: p_rec.status :=
291: hr_ahc_shd.g_old_rec.status;
292: End If;
293: If (p_rec.application_id = hr_api.g_number) then
294: p_rec.application_id :=
295: hr_ahc_shd.g_old_rec.application_id;
296: End If;
297: If (p_rec.app_install_status = hr_api.g_varchar2) then
293: If (p_rec.application_id = hr_api.g_number) then
294: p_rec.application_id :=
295: hr_ahc_shd.g_old_rec.application_id;
296: End If;
297: If (p_rec.app_install_status = hr_api.g_varchar2) then
298: p_rec.app_install_status :=
299: hr_ahc_shd.g_old_rec.app_install_status;
300: End If;
301: --
353: Procedure upd
354: (
355: p_api_hook_call_id in number,
356: p_effective_date in date,
357: p_sequence in number default hr_api.g_number,
358: p_enabled_flag in varchar2 default hr_api.g_varchar2,
359: p_call_package in varchar2 default hr_api.g_varchar2,
360: p_call_procedure in varchar2 default hr_api.g_varchar2,
361: p_pre_processor_date in date default hr_api.g_date,
354: (
355: p_api_hook_call_id in number,
356: p_effective_date in date,
357: p_sequence in number default hr_api.g_number,
358: p_enabled_flag in varchar2 default hr_api.g_varchar2,
359: p_call_package in varchar2 default hr_api.g_varchar2,
360: p_call_procedure in varchar2 default hr_api.g_varchar2,
361: p_pre_processor_date in date default hr_api.g_date,
362: p_encoded_error in varchar2 default hr_api.g_varchar2,
355: p_api_hook_call_id in number,
356: p_effective_date in date,
357: p_sequence in number default hr_api.g_number,
358: p_enabled_flag in varchar2 default hr_api.g_varchar2,
359: p_call_package in varchar2 default hr_api.g_varchar2,
360: p_call_procedure in varchar2 default hr_api.g_varchar2,
361: p_pre_processor_date in date default hr_api.g_date,
362: p_encoded_error in varchar2 default hr_api.g_varchar2,
363: p_status in varchar2 default hr_api.g_varchar2,
356: p_effective_date in date,
357: p_sequence in number default hr_api.g_number,
358: p_enabled_flag in varchar2 default hr_api.g_varchar2,
359: p_call_package in varchar2 default hr_api.g_varchar2,
360: p_call_procedure in varchar2 default hr_api.g_varchar2,
361: p_pre_processor_date in date default hr_api.g_date,
362: p_encoded_error in varchar2 default hr_api.g_varchar2,
363: p_status in varchar2 default hr_api.g_varchar2,
364: p_object_version_number in out nocopy number
357: p_sequence in number default hr_api.g_number,
358: p_enabled_flag in varchar2 default hr_api.g_varchar2,
359: p_call_package in varchar2 default hr_api.g_varchar2,
360: p_call_procedure in varchar2 default hr_api.g_varchar2,
361: p_pre_processor_date in date default hr_api.g_date,
362: p_encoded_error in varchar2 default hr_api.g_varchar2,
363: p_status in varchar2 default hr_api.g_varchar2,
364: p_object_version_number in out nocopy number
365: ) is
358: p_enabled_flag in varchar2 default hr_api.g_varchar2,
359: p_call_package in varchar2 default hr_api.g_varchar2,
360: p_call_procedure in varchar2 default hr_api.g_varchar2,
361: p_pre_processor_date in date default hr_api.g_date,
362: p_encoded_error in varchar2 default hr_api.g_varchar2,
363: p_status in varchar2 default hr_api.g_varchar2,
364: p_object_version_number in out nocopy number
365: ) is
366: --
359: p_call_package in varchar2 default hr_api.g_varchar2,
360: p_call_procedure in varchar2 default hr_api.g_varchar2,
361: p_pre_processor_date in date default hr_api.g_date,
362: p_encoded_error in varchar2 default hr_api.g_varchar2,
363: p_status in varchar2 default hr_api.g_varchar2,
364: p_object_version_number in out nocopy number
365: ) is
366: --
367: l_rec hr_ahc_shd.g_rec_type;
376: l_rec :=
377: hr_ahc_shd.convert_args
378: (
379: p_api_hook_call_id,
380: hr_api.g_number,
381: hr_api.g_varchar2,
382: hr_api.g_varchar2,
383: p_sequence,
384: p_enabled_flag,
377: hr_ahc_shd.convert_args
378: (
379: p_api_hook_call_id,
380: hr_api.g_number,
381: hr_api.g_varchar2,
382: hr_api.g_varchar2,
383: p_sequence,
384: p_enabled_flag,
385: p_call_package,
378: (
379: p_api_hook_call_id,
380: hr_api.g_number,
381: hr_api.g_varchar2,
382: hr_api.g_varchar2,
383: p_sequence,
384: p_enabled_flag,
385: p_call_package,
386: p_call_procedure,
387: p_pre_processor_date,
388: p_encoded_error,
389: p_status,
390: p_object_version_number,
391: hr_api.g_number,
392: hr_api.g_varchar2
393: );
394: --
395: -- Having converted the arguments into the
388: p_encoded_error,
389: p_status,
390: p_object_version_number,
391: hr_api.g_number,
392: hr_api.g_varchar2
393: );
394: --
395: -- Having converted the arguments into the
396: -- plsql record structure we call the corresponding record