54: --
55: l_proc varchar2(72) := g_package||'delete_dml';
56: --
57: Begin
58: hr_utility.set_location('Entering:'||l_proc,5);
59: --
60: --
61: --
62: -- Delete the pqh_roles row.
65: where role_id = p_rec.role_id;
66: --
67: --
68: --
69: hr_utility.set_location(' Leaving:'||l_proc,10);
70: --
71: Exception
72: When hr_api.child_integrity_violated then
73: -- Child integrity has been violated
115: --
116: l_proc varchar2(72) := g_package||'pre_delete';
117: --
118: Begin
119: hr_utility.set_location('Entering:'||l_proc,5);
120: --
121: hr_utility.set_location(' Leaving:'||l_proc,10);
122: End pre_delete;
123: --
117: --
118: Begin
119: hr_utility.set_location('Entering:'||l_proc,5);
120: --
121: hr_utility.set_location(' Leaving:'||l_proc,10);
122: End pre_delete;
123: --
124: -- ----------------------------------------------------------------------------
125: -- |-----------------------------< post_delete >------------------------------|
160: l_proc varchar2(72) := g_package||'post_delete';
161: l_start_date date := trunc(sysdate);
162: --
163: Begin
164: hr_utility.set_location('Entering:'||l_proc,5);
165: begin
166: --
167:
168:
261: ,p_hook_type => 'AD');
262: --
263: end;
264: --
265: hr_utility.set_location(' Leaving:'||l_proc,10);
266: End post_delete;
267: --
268: -- ----------------------------------------------------------------------------
269: -- |---------------------------------< del >----------------------------------|
274: --
275: l_proc varchar2(72) := g_package||'del';
276: --
277: Begin
278: hr_utility.set_location('Entering:'||l_proc, 5);
279: --
280: -- We must lock the row which we need to delete.
281: --
282: pqh_rls_shd.lck
314: l_rec pqh_rls_shd.g_rec_type;
315: l_proc varchar2(72) := g_package||'del';
316: --
317: Begin
318: hr_utility.set_location('Entering:'||l_proc, 5);
319: --
320: -- As the delete procedure accepts a plsql record structure we do need to
321: -- convert the arguments into the record structure.
322: -- We don't need to call the supplied conversion argument routine as we
330: -- business process
331: --
332: pqh_rls_del.del(p_effective_date,l_rec);
333: --
334: hr_utility.set_location(' Leaving:'||l_proc, 10);
335: End del;
336: --
337: end pqh_rls_del;