[Home] [Help]
60: --
61: l_proc varchar2(72) := g_package||'dt_delete_dml';
62: --
63: Begin
64: hr_utility.set_location('Entering:'||l_proc, 5);
65: If (p_datetrack_mode = hr_api.g_delete_next_change) then
66: pay_cal_shd.g_api_dml := true; -- Set the api dml status
67: --
68: -- Delete the where the effective start date is equal
85: --
86: pay_cal_shd.g_api_dml := false; -- Unset the api dml status
87: End If;
88: --
89: hr_utility.set_location(' Leaving:'||l_proc, 20);
90: --
91: Exception
92: When Others Then
93: pay_cal_shd.g_api_dml := false; -- Unset the api dml status
108: --
109: l_proc varchar2(72) := g_package||'delete_dml';
110: --
111: Begin
112: hr_utility.set_location('Entering:'||l_proc, 5);
113: --
114: pay_cal_del.dt_delete_dml
115: (p_rec => p_rec
116: ,p_effective_date => p_effective_date
118: ,p_validation_start_date => p_validation_start_date
119: ,p_validation_end_date => p_validation_end_date
120: );
121: --
122: hr_utility.set_location(' Leaving:'||l_proc, 10);
123: End delete_dml;
124: --
125: -- ----------------------------------------------------------------------------
126: -- |----------------------------< dt_pre_delete >-----------------------------|
165: --
166: l_proc varchar2(72) := g_package||'dt_pre_delete';
167: --
168: Begin
169: hr_utility.set_location('Entering:'||l_proc, 5);
170: --
171: If (p_datetrack_mode <> hr_api.g_zap) then
172: --
173: p_rec.effective_start_date
196: Else
197: p_rec.effective_start_date := null;
198: p_rec.effective_end_date := null;
199: End If;
200: hr_utility.set_location(' Leaving:'||l_proc, 10);
201: End dt_pre_delete;
202: --
203: -- ----------------------------------------------------------------------------
204: -- |------------------------------< pre_delete >------------------------------|
245: --
246: --
247: --
248: Begin
249: hr_utility.set_location('Entering:'||l_proc, 5);
250: --
251: --
252: --
253: pay_cal_del.dt_pre_delete
257: ,p_validation_start_date => p_validation_start_date
258: ,p_validation_end_date => p_validation_end_date
259: );
260: --
261: hr_utility.set_location(' Leaving:'||l_proc, 10);
262: End pre_delete;
263: --
264: -- ----------------------------------------------------------------------------
265: -- |----------------------------< post_delete >-------------------------------|
303: --
304: l_proc varchar2(72) := g_package||'post_delete';
305: --
306: Begin
307: hr_utility.set_location('Entering:'||l_proc, 5);
308: begin
309: --
310: pay_cal_rkd.after_delete
311: (p_effective_date
355: ,p_hook_type => 'AD');
356: --
357: end;
358: --
359: hr_utility.set_location(' Leaving:'||l_proc, 10);
360: End post_delete;
361: --
362: -- ----------------------------------------------------------------------------
363: -- |---------------------------------< del >----------------------------------|
372: l_validation_start_date date;
373: l_validation_end_date date;
374: --
375: Begin
376: hr_utility.set_location('Entering:'||l_proc, 5);
377: --
378: -- Ensure that the DateTrack delete mode is valid
379: --
380: dt_api.validate_dt_del_mode(p_datetrack_mode => p_datetrack_mode);
434: --
435: -- Call to raise any errors on multi-message list
436: hr_multi_message.end_validation_set;
437: --
438: hr_utility.set_location(' Leaving:'||l_proc, 5);
439: End del;
440: --
441: -- ----------------------------------------------------------------------------
442: -- |--------------------------------< del >-----------------------------------|
453: l_rec pay_cal_shd.g_rec_type;
454: l_proc varchar2(72) := g_package||'del';
455: --
456: Begin
457: hr_utility.set_location('Entering:'||l_proc, 5);
458: --
459: -- As the delete procedure accepts a plsql record structure we do need to
460: -- convert the arguments into the record structure.
461: -- We don't need to call the supplied conversion argument routine as we
480: p_object_version_number := l_rec.object_version_number;
481: p_effective_start_date := l_rec.effective_start_date;
482: p_effective_end_date := l_rec.effective_end_date;
483: --
484: hr_utility.set_location(' Leaving:'||l_proc, 10);
485: End del;
486: --
487: end pay_cal_del;