50: --
51: -- {End Of Comments}
52: -- ----------------------------------------------------------------------------
53: Procedure dt_delete_dml
54: (p_rec in out nocopy per_abv_shd.g_rec_type
55: ,p_effective_date in date
56: ,p_datetrack_mode in varchar2
57: ,p_validation_start_date in date
58: ,p_validation_end_date in date
93: -- ----------------------------------------------------------------------------
94: -- |------------------------------< delete_dml >------------------------------|
95: -- ----------------------------------------------------------------------------
96: Procedure delete_dml
97: (p_rec in out nocopy per_abv_shd.g_rec_type
98: ,p_effective_date in date
99: ,p_datetrack_mode in varchar2
100: ,p_validation_start_date in date
101: ,p_validation_end_date in date
150: --
151: -- {End Of Comments}
152: -- ----------------------------------------------------------------------------
153: Procedure dt_pre_delete
154: (p_rec in out nocopy per_abv_shd.g_rec_type
155: ,p_effective_date in date
156: ,p_datetrack_mode in varchar2
157: ,p_validation_start_date in date
158: ,p_validation_end_date in date
165: --
166: If (p_datetrack_mode <> hr_api.g_zap) then
167: --
168: p_rec.effective_start_date
169: := per_abv_shd.g_old_rec.effective_start_date;
170: --
171: If (p_datetrack_mode = hr_api.g_delete) then
172: p_rec.effective_end_date := p_validation_start_date - 1;
173: Else
175: End If;
176: --
177: -- Update the current effective end date record
178: --
179: per_abv_shd.upd_effective_end_date
180: (p_effective_date => p_effective_date
181: ,p_base_key_value => p_rec.assignment_budget_value_id
182: ,p_new_effective_end_date => p_rec.effective_end_date
183: ,p_validation_start_date => p_validation_start_date
224: --
225: -- {End Of Comments}
226: -- ----------------------------------------------------------------------------
227: Procedure pre_delete
228: (p_rec in out nocopy per_abv_shd.g_rec_type
229: ,p_effective_date in date
230: ,p_datetrack_mode in varchar2
231: ,p_validation_start_date in date
232: ,p_validation_end_date in date
284: --
285: -- {End Of Comments}
286: -- ----------------------------------------------------------------------------
287: Procedure post_delete
288: (p_rec in per_abv_shd.g_rec_type
289: ,p_effective_date in date
290: ,p_datetrack_mode in varchar2
291: ,p_validation_start_date in date
292: ,p_validation_end_date in date
313: => p_rec.effective_start_date
314: ,p_effective_end_date
315: => p_rec.effective_end_date
316: ,p_effective_start_date_o
317: => per_abv_shd.g_old_rec.effective_start_date
318: ,p_effective_end_date_o
319: => per_abv_shd.g_old_rec.effective_end_date
320: ,p_business_group_id_o
321: => per_abv_shd.g_old_rec.business_group_id
315: => p_rec.effective_end_date
316: ,p_effective_start_date_o
317: => per_abv_shd.g_old_rec.effective_start_date
318: ,p_effective_end_date_o
319: => per_abv_shd.g_old_rec.effective_end_date
320: ,p_business_group_id_o
321: => per_abv_shd.g_old_rec.business_group_id
322: ,p_assignment_id_o
323: => per_abv_shd.g_old_rec.assignment_id
317: => per_abv_shd.g_old_rec.effective_start_date
318: ,p_effective_end_date_o
319: => per_abv_shd.g_old_rec.effective_end_date
320: ,p_business_group_id_o
321: => per_abv_shd.g_old_rec.business_group_id
322: ,p_assignment_id_o
323: => per_abv_shd.g_old_rec.assignment_id
324: ,p_unit_o
325: => per_abv_shd.g_old_rec.unit
319: => per_abv_shd.g_old_rec.effective_end_date
320: ,p_business_group_id_o
321: => per_abv_shd.g_old_rec.business_group_id
322: ,p_assignment_id_o
323: => per_abv_shd.g_old_rec.assignment_id
324: ,p_unit_o
325: => per_abv_shd.g_old_rec.unit
326: ,p_value_o
327: => per_abv_shd.g_old_rec.value
321: => per_abv_shd.g_old_rec.business_group_id
322: ,p_assignment_id_o
323: => per_abv_shd.g_old_rec.assignment_id
324: ,p_unit_o
325: => per_abv_shd.g_old_rec.unit
326: ,p_value_o
327: => per_abv_shd.g_old_rec.value
328: ,p_request_id_o
329: => per_abv_shd.g_old_rec.request_id
323: => per_abv_shd.g_old_rec.assignment_id
324: ,p_unit_o
325: => per_abv_shd.g_old_rec.unit
326: ,p_value_o
327: => per_abv_shd.g_old_rec.value
328: ,p_request_id_o
329: => per_abv_shd.g_old_rec.request_id
330: ,p_program_application_id_o
331: => per_abv_shd.g_old_rec.program_application_id
325: => per_abv_shd.g_old_rec.unit
326: ,p_value_o
327: => per_abv_shd.g_old_rec.value
328: ,p_request_id_o
329: => per_abv_shd.g_old_rec.request_id
330: ,p_program_application_id_o
331: => per_abv_shd.g_old_rec.program_application_id
332: ,p_program_id_o
333: => per_abv_shd.g_old_rec.program_id
327: => per_abv_shd.g_old_rec.value
328: ,p_request_id_o
329: => per_abv_shd.g_old_rec.request_id
330: ,p_program_application_id_o
331: => per_abv_shd.g_old_rec.program_application_id
332: ,p_program_id_o
333: => per_abv_shd.g_old_rec.program_id
334: ,p_program_update_date_o
335: => per_abv_shd.g_old_rec.program_update_date
329: => per_abv_shd.g_old_rec.request_id
330: ,p_program_application_id_o
331: => per_abv_shd.g_old_rec.program_application_id
332: ,p_program_id_o
333: => per_abv_shd.g_old_rec.program_id
334: ,p_program_update_date_o
335: => per_abv_shd.g_old_rec.program_update_date
336: ,p_object_version_number_o
337: => per_abv_shd.g_old_rec.object_version_number
331: => per_abv_shd.g_old_rec.program_application_id
332: ,p_program_id_o
333: => per_abv_shd.g_old_rec.program_id
334: ,p_program_update_date_o
335: => per_abv_shd.g_old_rec.program_update_date
336: ,p_object_version_number_o
337: => per_abv_shd.g_old_rec.object_version_number
338: );
339: --
333: => per_abv_shd.g_old_rec.program_id
334: ,p_program_update_date_o
335: => per_abv_shd.g_old_rec.program_update_date
336: ,p_object_version_number_o
337: => per_abv_shd.g_old_rec.object_version_number
338: );
339: --
340: exception
341: --
355: -- ----------------------------------------------------------------------------
356: Procedure del
357: (p_effective_date in date
358: ,p_datetrack_mode in varchar2
359: ,p_rec in out nocopy per_abv_shd.g_rec_type
360: ) is
361: --
362: l_proc varchar2(72) := g_package||'del';
363: l_validation_start_date date;
371: dt_api.validate_dt_del_mode(p_datetrack_mode => p_datetrack_mode);
372: --
373: -- We must lock the row which we need to delete.
374: --
375: per_abv_shd.lck
376: (p_effective_date => p_effective_date
377: ,p_datetrack_mode => p_datetrack_mode
378: ,p_assignment_budget_value_id => p_rec.assignment_budget_value_id
379: ,p_object_version_number => p_rec.object_version_number
434: ,p_effective_start_date out nocopy date
435: ,p_effective_end_date out nocopy date
436: ) is
437: --
438: l_rec per_abv_shd.g_rec_type;
439: l_proc varchar2(72) := g_package||'del';
440: --
441: Begin
442: hr_utility.set_location('Entering:'||l_proc, 5);