47: -- Internal Row Handler Use Only.
48: --
49: -- {End Of Comments}
50: -- ----------------------------------------------------------------------------
51: Procedure delete_dml(p_rec in ben_ecr_shd.g_rec_type) is
52: --
53: l_proc varchar2(72) := g_package||'delete_dml';
54: --
55: Begin
54: --
55: Begin
56: hr_utility.set_location('Entering:'||l_proc, 5);
57: --
58: ben_ecr_shd.g_api_dml := true; -- Set the api dml status
59: --
60: -- Delete the ben_enrt_rt row.
61: --
62: delete from ben_enrt_rt
61: --
62: delete from ben_enrt_rt
63: where enrt_rt_id = p_rec.enrt_rt_id;
64: --
65: ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
66: --
67: hr_utility.set_location(' Leaving:'||l_proc, 10);
68: --
69: Exception
68: --
69: Exception
70: When hr_api.child_integrity_violated then
71: -- Child integrity has been violated
72: ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
73: ben_ecr_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
69: Exception
70: When hr_api.child_integrity_violated then
71: -- Child integrity has been violated
72: ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
73: ben_ecr_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
77: Raise;
72: ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
73: ben_ecr_shd.constraint_error
74: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75: When Others Then
76: ben_ecr_shd.g_api_dml := false; -- Unset the api dml status
77: Raise;
78: End delete_dml;
79: --
80: -- ----------------------------------------------------------------------------
108: -- Internal Row Handler Use Only.
109: --
110: -- {End Of Comments}
111: -- ----------------------------------------------------------------------------
112: Procedure pre_delete(p_rec in ben_ecr_shd.g_rec_type) is
113: --
114: l_proc varchar2(72) := g_package||'pre_delete';
115: --
116: Begin
150: -- Internal table Handler Use Only.
151: --
152: -- {End Of Comments}
153: -- ----------------------------------------------------------------------------
154: Procedure post_delete(p_rec in ben_ecr_shd.g_rec_type,
155: p_effective_date in date) is
156: --
157: l_proc varchar2(72) := g_package||'post_delete';
158: --
165: -- ----------------------------------------------------------------------------
166: -- |---------------------------------< del >----------------------------------|
167: -- ----------------------------------------------------------------------------
168: Procedure del
169: (p_rec in ben_ecr_shd.g_rec_type,
170: p_effective_date in date) is
171: --
172: l_proc varchar2(72) := g_package||'del';
173: --
175: hr_utility.set_location('Entering:'||l_proc, 5);
176: --
177: -- We must lock the row which we need to delete.
178: --
179: ben_ecr_shd.lck
180: (p_rec.enrt_rt_id,
181: p_rec.object_version_number);
182: --
183: -- Call the supporting delete validate operation
206: p_enrt_rt_id in number,
207: p_object_version_number in number
208: ) is
209: --
210: l_rec ben_ecr_shd.g_rec_type;
211: l_proc varchar2(72) := g_package||'del';
212: --
213: Begin
214: hr_utility.set_location('Entering:'||l_proc, 5);