[Home] [Help]
61: --
62: l_proc varchar2(72) := g_package||'dt_delete_dml';
63: --
64: Begin
65: hr_utility.set_location('Entering:'||l_proc, 5);
66: If (p_datetrack_mode = hr_api.g_delete_next_change) then
67: pay_ele_shd.g_api_dml := true; -- Set the api dml status
68: --
69: -- Delete the where the effective start date is equal
86: --
87: pay_ele_shd.g_api_dml := false; -- Unset the api dml status
88: End If;
89: --
90: hr_utility.set_location(' Leaving:'||l_proc, 20);
91: --
92: Exception
93: When Others Then
94: pay_ele_shd.g_api_dml := false; -- Unset the api dml status
109: --
110: l_proc varchar2(72) := g_package||'delete_dml';
111: --
112: Begin
113: hr_utility.set_location('Entering:'||l_proc, 5);
114: --
115: pay_ele_del.dt_delete_dml
116: (p_rec => p_rec
117: ,p_effective_date => p_effective_date
119: ,p_validation_start_date => p_validation_start_date
120: ,p_validation_end_date => p_validation_end_date
121: );
122: --
123: hr_utility.set_location(' Leaving:'||l_proc, 10);
124: End delete_dml;
125: --
126: -- ----------------------------------------------------------------------------
127: -- |----------------------------< dt_pre_delete >-----------------------------|
166: --
167: l_proc varchar2(72) := g_package||'dt_pre_delete';
168: --
169: Begin
170: hr_utility.set_location('Entering:'||l_proc, 5);
171: --
172: If (p_datetrack_mode <> hr_api.g_zap) then
173: --
174: p_rec.effective_start_date
193: Else
194: p_rec.effective_start_date := null;
195: p_rec.effective_end_date := null;
196: End If;
197: hr_utility.set_location(' Leaving:'||l_proc, 10);
198: End dt_pre_delete;
199: --
200: -- ----------------------------------------------------------------------------
201: -- |------------------------------< pre_delete >------------------------------|
258: or t2.effective_end_date < p_validation_start_date));
259: --
260: --
261: Begin
262: hr_utility.set_location('Entering:'||l_proc, 5);
263: --
264: --
265: -- Delete any possible comments
266: --
276: ,p_validation_start_date => p_validation_start_date
277: ,p_validation_end_date => p_validation_end_date
278: );
279: --
280: hr_utility.set_location(' Leaving:'||l_proc, 10);
281: End pre_delete;
282: --
283: -- ----------------------------------------------------------------------------
284: -- |----------------------------< post_delete >-------------------------------|
322: --
323: l_proc varchar2(72) := g_package||'post_delete';
324: --
325: Begin
326: hr_utility.set_location('Entering:'||l_proc, 5);
327: begin
328: --
329: pay_ele_rkd.after_delete
330: (p_effective_date
476: --
477: -- 11-NOV-03
478: -- Hard calls to DYT_PKG removed, perfomed in pyentapi.pkb
479:
480: hr_utility.set_location('Leaving:'||l_proc, 900);
481: --
482: End post_delete;
483: --
484: -- ----------------------------------------------------------------------------
494: l_validation_start_date date;
495: l_validation_end_date date;
496: --
497: Begin
498: hr_utility.set_location('Entering:'||l_proc, 5);
499: --
500: -- Ensure that the DateTrack delete mode is valid
501: --
502: dt_api.validate_dt_del_mode(p_datetrack_mode => p_datetrack_mode);
550: ,p_validation_start_date => l_validation_start_date
551: ,p_validation_end_date => l_validation_end_date
552: );
553: --
554: hr_utility.set_location(' Leaving:'||l_proc, 5);
555: End del;
556: --
557: -- ----------------------------------------------------------------------------
558: -- |--------------------------------< del >-----------------------------------|
569: l_rec pay_ele_shd.g_rec_type;
570: l_proc varchar2(72) := g_package||'del';
571: --
572: Begin
573: hr_utility.set_location('Entering:'||l_proc, 5);
574: --
575: -- As the delete procedure accepts a plsql record structure we do need to
576: -- convert the arguments into the record structure.
577: -- We don't need to call the supplied conversion argument routine as we
595: p_object_version_number := l_rec.object_version_number;
596: p_effective_start_date := l_rec.effective_start_date;
597: p_effective_end_date := l_rec.effective_end_date;
598: --
599: hr_utility.set_location(' Leaving:'||l_proc, 10);
600: End del;
601: --
602: end pay_ele_del;