56: --
57: l_proc varchar2(72) := g_package||'delete_dml';
58: --
59: Begin
60: hr_utility.set_location('Entering:'||l_proc, 5);
61: --
62: -- Delete the per_people_extra_info row.
63: --
64: delete from per_people_extra_info
63: --
64: delete from per_people_extra_info
65: where person_extra_info_id = p_rec.person_extra_info_id;
66: --
67: hr_utility.set_location(' Leaving:'||l_proc, 10);
68: --
69: Exception
70: When hr_api.child_integrity_violated then
71: -- Child integrity has been violated
111: --
112: l_proc varchar2(72) := g_package||'pre_delete';
113: --
114: Begin
115: hr_utility.set_location('Entering:'||l_proc, 5);
116: --
117: hr_utility.set_location(' Leaving:'||l_proc, 10);
118: End pre_delete;
119: --
113: --
114: Begin
115: hr_utility.set_location('Entering:'||l_proc, 5);
116: --
117: hr_utility.set_location(' Leaving:'||l_proc, 10);
118: End pre_delete;
119: --
120: -- ----------------------------------------------------------------------------
121: -- |-----------------------------< post_delete >------------------------------|
153: --
154: l_proc varchar2(72) := g_package||'post_delete';
155: --
156: Begin
157: hr_utility.set_location('Entering:'||l_proc, 5);
158: --
159: -- This is a hook point and the user hook for post_delete is called here.
160: --
161: begin
253: close c1;
254: end if;
255: end;
256: end if;
257: hr_utility.set_location(' Leaving:'||l_proc, 10);
258: End post_delete;
259: --
260: -- ----------------------------------------------------------------------------
261: -- |---------------------------------< del >----------------------------------|
268: --
269: l_proc varchar2(72) := g_package||'del';
270: --
271: Begin
272: hr_utility.set_location('Entering:'||l_proc, 5);
273: --
274: -- Determine if the business process is to be validated.
275: --
276: If p_validate then
309: If p_validate then
310: Raise HR_Api.Validate_Enabled;
311: End If;
312: --
313: hr_utility.set_location(' Leaving:'||l_proc, 10);
314: Exception
315: When HR_Api.Validate_Enabled Then
316: --
317: -- As the Validate_Enabled exception has been raised
333: l_rec pe_pei_shd.g_rec_type;
334: l_proc varchar2(72) := g_package||'del';
335: --
336: Begin
337: hr_utility.set_location('Entering:'||l_proc, 5);
338: --
339: -- As the delete procedure accepts a plsql record structure we do need to
340: -- convert the arguments into the record structure.
341: -- We don't need to call the supplied conversion argument routine as we
349: -- business process
350: --
351: del(l_rec, p_validate);
352: --
353: hr_utility.set_location(' Leaving:'||l_proc, 10);
354: End del;
355: --
356: end pe_pei_del;