[Home] [Help]
50: --
51: -- {End Of Comments}
52: -- ----------------------------------------------------------------------------
53: Procedure dt_delete_dml
54: (p_rec in out nocopy pay_rtu_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
130: -- ----------------------------------------------------------------------------
131: -- |------------------------------< delete_dml >------------------------------|
132: -- ----------------------------------------------------------------------------
133: Procedure delete_dml
134: (p_rec in out nocopy pay_rtu_shd.g_rec_type
135: ,p_effective_date in date
136: ,p_datetrack_mode in varchar2
137: ,p_validation_start_date in date
138: ,p_validation_end_date in date
187: --
188: -- {End Of Comments}
189: -- ----------------------------------------------------------------------------
190: Procedure dt_pre_delete
191: (p_rec in out nocopy pay_rtu_shd.g_rec_type
192: ,p_effective_date in date
193: ,p_datetrack_mode in varchar2
194: ,p_validation_start_date in date
195: ,p_validation_end_date in date
202: --
203: If (p_datetrack_mode <> hr_api.g_zap) then
204: --
205: p_rec.effective_start_date
206: := pay_rtu_shd.g_old_rec.effective_start_date;
207: --
208: If (p_datetrack_mode = hr_api.g_delete) then
209: p_rec.effective_end_date := p_validation_start_date - 1;
210: Else
212: End If;
213: --
214: -- Update the current effective end date record
215: --
216: pay_rtu_shd.upd_effective_end_date
217: (p_effective_date => p_effective_date
218: ,p_base_key_value => p_rec.run_type_usage_id
219: ,p_new_effective_end_date => p_rec.effective_end_date
220: ,p_validation_start_date => p_validation_start_date
261: --
262: -- {End Of Comments}
263: -- ----------------------------------------------------------------------------
264: Procedure pre_delete
265: (p_rec in out nocopy pay_rtu_shd.g_rec_type
266: ,p_effective_date in date
267: ,p_datetrack_mode in varchar2
268: ,p_validation_start_date in date
269: ,p_validation_end_date in date
321: --
322: -- {End Of Comments}
323: -- ----------------------------------------------------------------------------
324: Procedure post_delete
325: (p_rec in pay_rtu_shd.g_rec_type
326: ,p_effective_date in date
327: ,p_datetrack_mode in varchar2
328: ,p_validation_start_date in date
329: ,p_validation_end_date in date
359: => p_rec.effective_end_date
360: ,p_run_type_usage_id
361: => p_rec.run_type_usage_id
362: ,p_parent_run_type_id_o
363: => pay_rtu_shd.g_old_rec.parent_run_type_id
364: ,p_child_run_type_id_o
365: => pay_rtu_shd.g_old_rec.child_run_type_id
366: ,p_effective_start_date_o
367: => pay_rtu_shd.g_old_rec.effective_start_date
361: => p_rec.run_type_usage_id
362: ,p_parent_run_type_id_o
363: => pay_rtu_shd.g_old_rec.parent_run_type_id
364: ,p_child_run_type_id_o
365: => pay_rtu_shd.g_old_rec.child_run_type_id
366: ,p_effective_start_date_o
367: => pay_rtu_shd.g_old_rec.effective_start_date
368: ,p_effective_end_date_o
369: => pay_rtu_shd.g_old_rec.effective_end_date
363: => pay_rtu_shd.g_old_rec.parent_run_type_id
364: ,p_child_run_type_id_o
365: => pay_rtu_shd.g_old_rec.child_run_type_id
366: ,p_effective_start_date_o
367: => pay_rtu_shd.g_old_rec.effective_start_date
368: ,p_effective_end_date_o
369: => pay_rtu_shd.g_old_rec.effective_end_date
370: ,p_sequence_o
371: => pay_rtu_shd.g_old_rec.sequence
365: => pay_rtu_shd.g_old_rec.child_run_type_id
366: ,p_effective_start_date_o
367: => pay_rtu_shd.g_old_rec.effective_start_date
368: ,p_effective_end_date_o
369: => pay_rtu_shd.g_old_rec.effective_end_date
370: ,p_sequence_o
371: => pay_rtu_shd.g_old_rec.sequence
372: ,p_object_version_number_o
373: => pay_rtu_shd.g_old_rec.object_version_number
367: => pay_rtu_shd.g_old_rec.effective_start_date
368: ,p_effective_end_date_o
369: => pay_rtu_shd.g_old_rec.effective_end_date
370: ,p_sequence_o
371: => pay_rtu_shd.g_old_rec.sequence
372: ,p_object_version_number_o
373: => pay_rtu_shd.g_old_rec.object_version_number
374: ,p_business_group_id_o
375: => pay_rtu_shd.g_old_rec.business_group_id
369: => pay_rtu_shd.g_old_rec.effective_end_date
370: ,p_sequence_o
371: => pay_rtu_shd.g_old_rec.sequence
372: ,p_object_version_number_o
373: => pay_rtu_shd.g_old_rec.object_version_number
374: ,p_business_group_id_o
375: => pay_rtu_shd.g_old_rec.business_group_id
376: ,p_legislation_code_o
377: => pay_rtu_shd.g_old_rec.legislation_code
371: => pay_rtu_shd.g_old_rec.sequence
372: ,p_object_version_number_o
373: => pay_rtu_shd.g_old_rec.object_version_number
374: ,p_business_group_id_o
375: => pay_rtu_shd.g_old_rec.business_group_id
376: ,p_legislation_code_o
377: => pay_rtu_shd.g_old_rec.legislation_code
378: );
379: --
373: => pay_rtu_shd.g_old_rec.object_version_number
374: ,p_business_group_id_o
375: => pay_rtu_shd.g_old_rec.business_group_id
376: ,p_legislation_code_o
377: => pay_rtu_shd.g_old_rec.legislation_code
378: );
379: --
380: exception
381: --
395: -- ----------------------------------------------------------------------------
396: Procedure del
397: (p_effective_date in date
398: ,p_datetrack_mode in varchar2
399: ,p_rec in out nocopy pay_rtu_shd.g_rec_type
400: ) is
401: --
402: l_proc varchar2(72) := g_package||'del';
403: l_validation_start_date date;
411: dt_api.validate_dt_del_mode(p_datetrack_mode => p_datetrack_mode);
412: --
413: -- We must lock the row which we need to delete.
414: --
415: pay_rtu_shd.lck
416: (p_effective_date => p_effective_date
417: ,p_datetrack_mode => p_datetrack_mode
418: ,p_run_type_usage_id => p_rec.run_type_usage_id
419: ,p_object_version_number => p_rec.object_version_number
474: ,p_effective_start_date out nocopy date
475: ,p_effective_end_date out nocopy date
476: ) is
477: --
478: l_rec pay_rtu_shd.g_rec_type;
479: l_proc varchar2(72) := g_package||'del';
480: --
481: Begin
482: hr_utility.set_location('Entering:'||l_proc, 5);