51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy per_ssb_shd.g_rec_type
56: ) is
57: --
58: l_proc varchar2(72) := g_package||'update_dml';
59: --
89: Exception
90: When hr_api.check_integrity_violated Then
91: -- A check constraint has been violated
92: --
93: per_ssb_shd.constraint_error
94: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
95: When hr_api.parent_integrity_violated Then
96: -- Parent integrity has been violated
97: --
94: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
95: When hr_api.parent_integrity_violated Then
96: -- Parent integrity has been violated
97: --
98: per_ssb_shd.constraint_error
99: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
100: When hr_api.unique_integrity_violated Then
101: -- Unique integrity has been violated
102: --
99: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
100: When hr_api.unique_integrity_violated Then
101: -- Unique integrity has been violated
102: --
103: per_ssb_shd.constraint_error
104: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
105: When Others Then
106: --
107: Raise;
139: --
140: -- {End Of Comments}
141: -- ----------------------------------------------------------------------------
142: Procedure pre_update
143: (p_rec in per_ssb_shd.g_rec_type
144: ) is
145: --
146: l_proc varchar2(72) := g_package||'pre_update';
147: --
184: -- {End Of Comments}
185: -- ----------------------------------------------------------------------------
186: Procedure post_update
187: (p_effective_date in date
188: ,p_rec in per_ssb_shd.g_rec_type
189: ) is
190: --
191: l_proc varchar2(72) := g_package||'post_update';
192: --
206: ,p_setup_sub_task_creation_date => p_rec.setup_sub_task_creation_date
207: ,p_setup_sub_task_last_mod_date => p_rec.setup_sub_task_last_mod_date
208: ,p_legislation_code => p_rec.legislation_code
209: ,p_object_version_number => p_rec.object_version_number
210: ,p_setup_task_code_o => per_ssb_shd.g_old_rec.setup_task_code
211: ,p_setup_sub_task_sequence_o => per_ssb_shd.g_old_rec.setup_sub_task_sequence
212: ,p_setup_sub_task_status_o => per_ssb_shd.g_old_rec.setup_sub_task_status
213: ,p_setup_sub_task_type_o => per_ssb_shd.g_old_rec.setup_sub_task_type
214: ,p_setup_sub_task_data_pump_l_o => per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link
207: ,p_setup_sub_task_last_mod_date => p_rec.setup_sub_task_last_mod_date
208: ,p_legislation_code => p_rec.legislation_code
209: ,p_object_version_number => p_rec.object_version_number
210: ,p_setup_task_code_o => per_ssb_shd.g_old_rec.setup_task_code
211: ,p_setup_sub_task_sequence_o => per_ssb_shd.g_old_rec.setup_sub_task_sequence
212: ,p_setup_sub_task_status_o => per_ssb_shd.g_old_rec.setup_sub_task_status
213: ,p_setup_sub_task_type_o => per_ssb_shd.g_old_rec.setup_sub_task_type
214: ,p_setup_sub_task_data_pump_l_o => per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link
215: ,p_setup_sub_task_action_o => per_ssb_shd.g_old_rec.setup_sub_task_action
208: ,p_legislation_code => p_rec.legislation_code
209: ,p_object_version_number => p_rec.object_version_number
210: ,p_setup_task_code_o => per_ssb_shd.g_old_rec.setup_task_code
211: ,p_setup_sub_task_sequence_o => per_ssb_shd.g_old_rec.setup_sub_task_sequence
212: ,p_setup_sub_task_status_o => per_ssb_shd.g_old_rec.setup_sub_task_status
213: ,p_setup_sub_task_type_o => per_ssb_shd.g_old_rec.setup_sub_task_type
214: ,p_setup_sub_task_data_pump_l_o => per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link
215: ,p_setup_sub_task_action_o => per_ssb_shd.g_old_rec.setup_sub_task_action
216: ,p_setup_sub_task_creation_da_o => per_ssb_shd.g_old_rec.setup_sub_task_creation_date
209: ,p_object_version_number => p_rec.object_version_number
210: ,p_setup_task_code_o => per_ssb_shd.g_old_rec.setup_task_code
211: ,p_setup_sub_task_sequence_o => per_ssb_shd.g_old_rec.setup_sub_task_sequence
212: ,p_setup_sub_task_status_o => per_ssb_shd.g_old_rec.setup_sub_task_status
213: ,p_setup_sub_task_type_o => per_ssb_shd.g_old_rec.setup_sub_task_type
214: ,p_setup_sub_task_data_pump_l_o => per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link
215: ,p_setup_sub_task_action_o => per_ssb_shd.g_old_rec.setup_sub_task_action
216: ,p_setup_sub_task_creation_da_o => per_ssb_shd.g_old_rec.setup_sub_task_creation_date
217: ,p_setup_sub_task_last_mod_da_o => per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date
210: ,p_setup_task_code_o => per_ssb_shd.g_old_rec.setup_task_code
211: ,p_setup_sub_task_sequence_o => per_ssb_shd.g_old_rec.setup_sub_task_sequence
212: ,p_setup_sub_task_status_o => per_ssb_shd.g_old_rec.setup_sub_task_status
213: ,p_setup_sub_task_type_o => per_ssb_shd.g_old_rec.setup_sub_task_type
214: ,p_setup_sub_task_data_pump_l_o => per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link
215: ,p_setup_sub_task_action_o => per_ssb_shd.g_old_rec.setup_sub_task_action
216: ,p_setup_sub_task_creation_da_o => per_ssb_shd.g_old_rec.setup_sub_task_creation_date
217: ,p_setup_sub_task_last_mod_da_o => per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date
218: ,p_legislation_code_o => per_ssb_shd.g_old_rec.legislation_code
211: ,p_setup_sub_task_sequence_o => per_ssb_shd.g_old_rec.setup_sub_task_sequence
212: ,p_setup_sub_task_status_o => per_ssb_shd.g_old_rec.setup_sub_task_status
213: ,p_setup_sub_task_type_o => per_ssb_shd.g_old_rec.setup_sub_task_type
214: ,p_setup_sub_task_data_pump_l_o => per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link
215: ,p_setup_sub_task_action_o => per_ssb_shd.g_old_rec.setup_sub_task_action
216: ,p_setup_sub_task_creation_da_o => per_ssb_shd.g_old_rec.setup_sub_task_creation_date
217: ,p_setup_sub_task_last_mod_da_o => per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date
218: ,p_legislation_code_o => per_ssb_shd.g_old_rec.legislation_code
219: ,p_object_version_number_o => per_ssb_shd.g_old_rec.object_version_number
212: ,p_setup_sub_task_status_o => per_ssb_shd.g_old_rec.setup_sub_task_status
213: ,p_setup_sub_task_type_o => per_ssb_shd.g_old_rec.setup_sub_task_type
214: ,p_setup_sub_task_data_pump_l_o => per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link
215: ,p_setup_sub_task_action_o => per_ssb_shd.g_old_rec.setup_sub_task_action
216: ,p_setup_sub_task_creation_da_o => per_ssb_shd.g_old_rec.setup_sub_task_creation_date
217: ,p_setup_sub_task_last_mod_da_o => per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date
218: ,p_legislation_code_o => per_ssb_shd.g_old_rec.legislation_code
219: ,p_object_version_number_o => per_ssb_shd.g_old_rec.object_version_number
220: );
213: ,p_setup_sub_task_type_o => per_ssb_shd.g_old_rec.setup_sub_task_type
214: ,p_setup_sub_task_data_pump_l_o => per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link
215: ,p_setup_sub_task_action_o => per_ssb_shd.g_old_rec.setup_sub_task_action
216: ,p_setup_sub_task_creation_da_o => per_ssb_shd.g_old_rec.setup_sub_task_creation_date
217: ,p_setup_sub_task_last_mod_da_o => per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date
218: ,p_legislation_code_o => per_ssb_shd.g_old_rec.legislation_code
219: ,p_object_version_number_o => per_ssb_shd.g_old_rec.object_version_number
220: );
221: --
214: ,p_setup_sub_task_data_pump_l_o => per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link
215: ,p_setup_sub_task_action_o => per_ssb_shd.g_old_rec.setup_sub_task_action
216: ,p_setup_sub_task_creation_da_o => per_ssb_shd.g_old_rec.setup_sub_task_creation_date
217: ,p_setup_sub_task_last_mod_da_o => per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date
218: ,p_legislation_code_o => per_ssb_shd.g_old_rec.legislation_code
219: ,p_object_version_number_o => per_ssb_shd.g_old_rec.object_version_number
220: );
221: --
222: exception
215: ,p_setup_sub_task_action_o => per_ssb_shd.g_old_rec.setup_sub_task_action
216: ,p_setup_sub_task_creation_da_o => per_ssb_shd.g_old_rec.setup_sub_task_creation_date
217: ,p_setup_sub_task_last_mod_da_o => per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date
218: ,p_legislation_code_o => per_ssb_shd.g_old_rec.legislation_code
219: ,p_object_version_number_o => per_ssb_shd.g_old_rec.object_version_number
220: );
221: --
222: exception
223: --
275: --
276: -- {End Of Comments}
277: -- ----------------------------------------------------------------------------
278: Procedure convert_defs
279: (p_rec in out nocopy per_ssb_shd.g_rec_type
280: ) is
281: --
282: Begin
283: --
287: -- is being used then we must set to the 'current' argument value.
288: --
289: If (p_rec.setup_task_code = hr_api.g_varchar2) then
290: p_rec.setup_task_code :=
291: per_ssb_shd.g_old_rec.setup_task_code;
292: End If;
293: If (p_rec.setup_sub_task_sequence = hr_api.g_number) then
294: p_rec.setup_sub_task_sequence :=
295: per_ssb_shd.g_old_rec.setup_sub_task_sequence;
291: per_ssb_shd.g_old_rec.setup_task_code;
292: End If;
293: If (p_rec.setup_sub_task_sequence = hr_api.g_number) then
294: p_rec.setup_sub_task_sequence :=
295: per_ssb_shd.g_old_rec.setup_sub_task_sequence;
296: End If;
297: If (p_rec.setup_sub_task_status = hr_api.g_varchar2) then
298: p_rec.setup_sub_task_status :=
299: per_ssb_shd.g_old_rec.setup_sub_task_status;
295: per_ssb_shd.g_old_rec.setup_sub_task_sequence;
296: End If;
297: If (p_rec.setup_sub_task_status = hr_api.g_varchar2) then
298: p_rec.setup_sub_task_status :=
299: per_ssb_shd.g_old_rec.setup_sub_task_status;
300: End If;
301: If (p_rec.setup_sub_task_type = hr_api.g_varchar2) then
302: p_rec.setup_sub_task_type :=
303: per_ssb_shd.g_old_rec.setup_sub_task_type;
299: per_ssb_shd.g_old_rec.setup_sub_task_status;
300: End If;
301: If (p_rec.setup_sub_task_type = hr_api.g_varchar2) then
302: p_rec.setup_sub_task_type :=
303: per_ssb_shd.g_old_rec.setup_sub_task_type;
304: End If;
305: If (p_rec.setup_sub_task_data_pump_link = hr_api.g_varchar2) then
306: p_rec.setup_sub_task_data_pump_link :=
307: per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link;
303: per_ssb_shd.g_old_rec.setup_sub_task_type;
304: End If;
305: If (p_rec.setup_sub_task_data_pump_link = hr_api.g_varchar2) then
306: p_rec.setup_sub_task_data_pump_link :=
307: per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link;
308: End If;
309: If (p_rec.setup_sub_task_action = hr_api.g_varchar2) then
310: p_rec.setup_sub_task_action :=
311: per_ssb_shd.g_old_rec.setup_sub_task_action;
307: per_ssb_shd.g_old_rec.setup_sub_task_data_pump_link;
308: End If;
309: If (p_rec.setup_sub_task_action = hr_api.g_varchar2) then
310: p_rec.setup_sub_task_action :=
311: per_ssb_shd.g_old_rec.setup_sub_task_action;
312: End If;
313: If (p_rec.setup_sub_task_creation_date = hr_api.g_date) then
314: p_rec.setup_sub_task_creation_date :=
315: per_ssb_shd.g_old_rec.setup_sub_task_creation_date;
311: per_ssb_shd.g_old_rec.setup_sub_task_action;
312: End If;
313: If (p_rec.setup_sub_task_creation_date = hr_api.g_date) then
314: p_rec.setup_sub_task_creation_date :=
315: per_ssb_shd.g_old_rec.setup_sub_task_creation_date;
316: End If;
317: If (p_rec.setup_sub_task_last_mod_date = hr_api.g_date) then
318: p_rec.setup_sub_task_last_mod_date :=
319: per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date;
315: per_ssb_shd.g_old_rec.setup_sub_task_creation_date;
316: End If;
317: If (p_rec.setup_sub_task_last_mod_date = hr_api.g_date) then
318: p_rec.setup_sub_task_last_mod_date :=
319: per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date;
320: End If;
321: If (p_rec.legislation_code = hr_api.g_varchar2) then
322: p_rec.legislation_code := per_ssb_shd.g_old_rec.legislation_code;
323: End If;
318: p_rec.setup_sub_task_last_mod_date :=
319: per_ssb_shd.g_old_rec.setup_sub_task_last_mod_date;
320: End If;
321: If (p_rec.legislation_code = hr_api.g_varchar2) then
322: p_rec.legislation_code := per_ssb_shd.g_old_rec.legislation_code;
323: End If;
324:
325: --
326: End convert_defs;
329: -- |---------------------------------< upd >----------------------------------|
330: -- ----------------------------------------------------------------------------
331: Procedure upd
332: (p_effective_date in date
333: ,p_rec in out nocopy per_ssb_shd.g_rec_type
334: ) is
335: --
336: l_proc varchar2(72) := g_package||'upd';
337: --
339: hr_utility.set_location('Entering:'||l_proc, 5);
340: --
341: -- We must lock the row which we need to update.
342: --
343: per_ssb_shd.lck
344: (p_rec.setup_sub_task_code
345: ,p_rec.object_version_number
346: );
347: --
396: ,p_setup_sub_task_last_mod_date in date default hr_api.g_date
397: ,p_legislation_code in varchar2 default hr_api.g_varchar2
398: ) is
399: --
400: l_rec per_ssb_shd.g_rec_type;
401: l_proc varchar2(72) := g_package||'upd';
402: --
403: Begin
404: hr_utility.set_location('Entering:'||l_proc, 5);
406: -- Call conversion function to turn arguments into the
407: -- l_rec structure.
408: --
409: l_rec :=
410: per_ssb_shd.convert_args
411: (p_setup_sub_task_code
412: ,p_setup_task_code
413: ,p_setup_sub_task_sequence
414: ,p_setup_sub_task_status