51: --
52: -- {End Of Comments}
53: -- ----------------------------------------------------------------------------
54: Procedure update_dml
55: (p_rec in out nocopy pqh_rap_shd.g_rec_type
56: ) is
57: --
58: l_proc constant varchar2(72):= g_package||'update_dml';
59: --
87: Exception
88: When hr_api.check_integrity_violated Then
89: -- A check constraint has been violated
90: --
91: pqh_rap_shd.constraint_error
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.parent_integrity_violated Then
94: -- Parent integrity has been violated
95: --
92: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
93: When hr_api.parent_integrity_violated Then
94: -- Parent integrity has been violated
95: --
96: pqh_rap_shd.constraint_error
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
98: When hr_api.unique_integrity_violated Then
99: -- Unique integrity has been violated
100: --
97: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
98: When hr_api.unique_integrity_violated Then
99: -- Unique integrity has been violated
100: --
101: pqh_rap_shd.constraint_error
102: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
103: When Others Then
104: --
105: Raise;
137: --
138: -- {End Of Comments}
139: -- ----------------------------------------------------------------------------
140: Procedure pre_update
141: (p_rec in pqh_rap_shd.g_rec_type
142: ) is
143: --
144: l_proc constant varchar2(72):= g_package||'pre_update';
145: --
183: -- {End Of Comments}
184: -- ----------------------------------------------------------------------------
185: Procedure post_update
186: (p_effective_date in date
187: ,p_rec in pqh_rap_shd.g_rec_type
188: ) is
189: --
190: l_proc constant varchar2(72):= g_package||'post_update';
191: --
212: => p_rec.proposed_rank
213: ,p_object_version_number
214: => p_rec.object_version_number
215: ,p_rank_process_id_o
216: => pqh_rap_shd.g_old_rec.rank_process_id
217: ,p_approval_date_o
218: => pqh_rap_shd.g_old_rec.approval_date
219: ,p_supervisor_id_o
220: => pqh_rap_shd.g_old_rec.supervisor_id
214: => p_rec.object_version_number
215: ,p_rank_process_id_o
216: => pqh_rap_shd.g_old_rec.rank_process_id
217: ,p_approval_date_o
218: => pqh_rap_shd.g_old_rec.approval_date
219: ,p_supervisor_id_o
220: => pqh_rap_shd.g_old_rec.supervisor_id
221: ,p_system_rank_o
222: => pqh_rap_shd.g_old_rec.system_rank
216: => pqh_rap_shd.g_old_rec.rank_process_id
217: ,p_approval_date_o
218: => pqh_rap_shd.g_old_rec.approval_date
219: ,p_supervisor_id_o
220: => pqh_rap_shd.g_old_rec.supervisor_id
221: ,p_system_rank_o
222: => pqh_rap_shd.g_old_rec.system_rank
223: ,p_population_count_o
224: => pqh_rap_shd.g_old_rec.population_count
218: => pqh_rap_shd.g_old_rec.approval_date
219: ,p_supervisor_id_o
220: => pqh_rap_shd.g_old_rec.supervisor_id
221: ,p_system_rank_o
222: => pqh_rap_shd.g_old_rec.system_rank
223: ,p_population_count_o
224: => pqh_rap_shd.g_old_rec.population_count
225: ,p_proposed_rank_o
226: => pqh_rap_shd.g_old_rec.proposed_rank
220: => pqh_rap_shd.g_old_rec.supervisor_id
221: ,p_system_rank_o
222: => pqh_rap_shd.g_old_rec.system_rank
223: ,p_population_count_o
224: => pqh_rap_shd.g_old_rec.population_count
225: ,p_proposed_rank_o
226: => pqh_rap_shd.g_old_rec.proposed_rank
227: ,p_object_version_number_o
228: => pqh_rap_shd.g_old_rec.object_version_number
222: => pqh_rap_shd.g_old_rec.system_rank
223: ,p_population_count_o
224: => pqh_rap_shd.g_old_rec.population_count
225: ,p_proposed_rank_o
226: => pqh_rap_shd.g_old_rec.proposed_rank
227: ,p_object_version_number_o
228: => pqh_rap_shd.g_old_rec.object_version_number
229: );
230: --
224: => pqh_rap_shd.g_old_rec.population_count
225: ,p_proposed_rank_o
226: => pqh_rap_shd.g_old_rec.proposed_rank
227: ,p_object_version_number_o
228: => pqh_rap_shd.g_old_rec.object_version_number
229: );
230: --
231: exception
232: --
284: --
285: -- {End Of Comments}
286: -- ----------------------------------------------------------------------------
287: Procedure convert_defs
288: (p_rec in out nocopy pqh_rap_shd.g_rec_type
289: ) is
290: --
291: Begin
292: --
296: -- is being used then we must set to the 'current' argument value.
297: --
298: If (p_rec.rank_process_id = hr_api.g_number) then
299: p_rec.rank_process_id :=
300: pqh_rap_shd.g_old_rec.rank_process_id;
301: End If;
302: If (p_rec.approval_date = hr_api.g_date) then
303: p_rec.approval_date :=
304: pqh_rap_shd.g_old_rec.approval_date;
300: pqh_rap_shd.g_old_rec.rank_process_id;
301: End If;
302: If (p_rec.approval_date = hr_api.g_date) then
303: p_rec.approval_date :=
304: pqh_rap_shd.g_old_rec.approval_date;
305: End If;
306: If (p_rec.supervisor_id = hr_api.g_number) then
307: p_rec.supervisor_id :=
308: pqh_rap_shd.g_old_rec.supervisor_id;
304: pqh_rap_shd.g_old_rec.approval_date;
305: End If;
306: If (p_rec.supervisor_id = hr_api.g_number) then
307: p_rec.supervisor_id :=
308: pqh_rap_shd.g_old_rec.supervisor_id;
309: End If;
310: If (p_rec.system_rank = hr_api.g_number) then
311: p_rec.system_rank :=
312: pqh_rap_shd.g_old_rec.system_rank;
308: pqh_rap_shd.g_old_rec.supervisor_id;
309: End If;
310: If (p_rec.system_rank = hr_api.g_number) then
311: p_rec.system_rank :=
312: pqh_rap_shd.g_old_rec.system_rank;
313: End If;
314: If (p_rec.population_count = hr_api.g_number) then
315: p_rec.population_count :=
316: pqh_rap_shd.g_old_rec.population_count;
312: pqh_rap_shd.g_old_rec.system_rank;
313: End If;
314: If (p_rec.population_count = hr_api.g_number) then
315: p_rec.population_count :=
316: pqh_rap_shd.g_old_rec.population_count;
317: End If;
318: If (p_rec.proposed_rank = hr_api.g_number) then
319: p_rec.proposed_rank :=
320: pqh_rap_shd.g_old_rec.proposed_rank;
316: pqh_rap_shd.g_old_rec.population_count;
317: End If;
318: If (p_rec.proposed_rank = hr_api.g_number) then
319: p_rec.proposed_rank :=
320: pqh_rap_shd.g_old_rec.proposed_rank;
321: End If;
322: --
323: End convert_defs;
324: --
326: -- |---------------------------------< upd >----------------------------------|
327: -- ----------------------------------------------------------------------------
328: Procedure upd
329: (p_effective_date in date
330: ,p_rec in out nocopy pqh_rap_shd.g_rec_type
331: ) is
332: --
333: l_proc constant varchar2(72):= g_package||'upd';
334: --
337: hr_utility.set_location('Entering:'||l_proc, 5);
338: --
339: -- We must lock the row which we need to update.
340: --
341: pqh_rap_shd.lck
342: (p_rec.rank_process_approval_id
343: ,p_rec.object_version_number
344: );
345: --
391: ,p_population_count in number default hr_api.g_number
392: ,p_proposed_rank in number default hr_api.g_number
393: ) is
394: --
395: l_rec pqh_rap_shd.g_rec_type;
396: l_proc constant varchar2(72):= g_package||'upd';
397: --
398: Begin
399:
402: -- Call conversion function to turn arguments into the
403: -- l_rec structure.
404: --
405: l_rec :=
406: pqh_rap_shd.convert_args
407: (p_rank_process_approval_id
408: ,p_rank_process_id
409: ,p_approval_date
410: ,p_supervisor_id