47: -- Internal Row Handler Use Only.
48: --
49: -- ----------------------------------------------------------------------------
50: Procedure delete_dml
51: (p_rec in hxc_heg_shd.g_rec_type
52: ) is
53: --
54: l_proc varchar2(72);
55: --
58: l_proc := g_package||'delete_dml';
59: hr_utility.set_location('Entering:'||l_proc, 5);
60: end if;
61: --
62: hxc_heg_shd.g_api_dml := true; -- Set the api dml status
63:
64: -- first of all delete any child rows
65:
66: delete from hxc_entity_group_comps egc
70: --
71: delete from hxc_entity_groups heg
72: where heg.entity_group_id = p_rec.entity_group_id;
73: --
74: hxc_heg_shd.g_api_dml := false; -- Unset the api dml status
75: --
76: if g_debug then
77: hr_utility.set_location(' Leaving:'||l_proc, 10);
78: end if;
79: --
80: Exception
81: When hr_api.child_integrity_violated then
82: -- Child integrity has been violated
83: hxc_heg_shd.g_api_dml := false; -- Unset the api dml status
84: hxc_heg_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When Others Then
87: hxc_heg_shd.g_api_dml := false; -- Unset the api dml status
80: Exception
81: When hr_api.child_integrity_violated then
82: -- Child integrity has been violated
83: hxc_heg_shd.g_api_dml := false; -- Unset the api dml status
84: hxc_heg_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When Others Then
87: hxc_heg_shd.g_api_dml := false; -- Unset the api dml status
88: Raise;
83: hxc_heg_shd.g_api_dml := false; -- Unset the api dml status
84: hxc_heg_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When Others Then
87: hxc_heg_shd.g_api_dml := false; -- Unset the api dml status
88: Raise;
89: End delete_dml;
90: --
91: -- ----------------------------------------------------------------------------
117: -- Access Status:
118: -- Internal Row Handler Use Only.
119: --
120: -- ----------------------------------------------------------------------------
121: Procedure pre_delete(p_rec in hxc_heg_shd.g_rec_type) is
122: --
123: l_proc varchar2(72);
124: --
125: Begin
160: -- Access Status:
161: -- Internal Row Handler Use Only.
162: --
163: -- -----------------------------------------------------------------------------
164: Procedure post_delete(p_rec in hxc_heg_shd.g_rec_type) is
165: --
166: l_proc varchar2(72);
167: --
168: Begin
175: hxc_heg_rkd.after_delete
176: (p_entity_group_id
177: => p_rec.entity_group_id
178: ,p_name_o
179: => hxc_heg_shd.g_old_rec.name
180: ,p_entity_type_o
181: => hxc_heg_shd.g_old_rec.entity_type
182: ,p_object_version_number_o
183: => hxc_heg_shd.g_old_rec.object_version_number
177: => p_rec.entity_group_id
178: ,p_name_o
179: => hxc_heg_shd.g_old_rec.name
180: ,p_entity_type_o
181: => hxc_heg_shd.g_old_rec.entity_type
182: ,p_object_version_number_o
183: => hxc_heg_shd.g_old_rec.object_version_number
184: ,p_description_o
185: => hxc_heg_shd.g_old_rec.description
179: => hxc_heg_shd.g_old_rec.name
180: ,p_entity_type_o
181: => hxc_heg_shd.g_old_rec.entity_type
182: ,p_object_version_number_o
183: => hxc_heg_shd.g_old_rec.object_version_number
184: ,p_description_o
185: => hxc_heg_shd.g_old_rec.description
186: ,p_business_group_id_o
187: => hxc_heg_shd.g_old_rec.business_group_id
181: => hxc_heg_shd.g_old_rec.entity_type
182: ,p_object_version_number_o
183: => hxc_heg_shd.g_old_rec.object_version_number
184: ,p_description_o
185: => hxc_heg_shd.g_old_rec.description
186: ,p_business_group_id_o
187: => hxc_heg_shd.g_old_rec.business_group_id
188: ,p_legislation_code_o
189: => hxc_heg_shd.g_old_rec.legislation_code
183: => hxc_heg_shd.g_old_rec.object_version_number
184: ,p_description_o
185: => hxc_heg_shd.g_old_rec.description
186: ,p_business_group_id_o
187: => hxc_heg_shd.g_old_rec.business_group_id
188: ,p_legislation_code_o
189: => hxc_heg_shd.g_old_rec.legislation_code
190: );
191: --
185: => hxc_heg_shd.g_old_rec.description
186: ,p_business_group_id_o
187: => hxc_heg_shd.g_old_rec.business_group_id
188: ,p_legislation_code_o
189: => hxc_heg_shd.g_old_rec.legislation_code
190: );
191: --
192: exception
193: --
207: -- ----------------------------------------------------------------------------
208: -- |---------------------------------< del >----------------------------------|
209: -- ----------------------------------------------------------------------------
210: Procedure del
211: (p_rec in hxc_heg_shd.g_rec_type
212: ) is
213: --
214: l_proc varchar2(72);
215: --
221: end if;
222: --
223: -- We must lock the row which we need to delete.
224: --
225: hxc_heg_shd.lck
226: (p_rec.entity_group_id
227: ,p_rec.object_version_number
228: );
229: --
252: (p_entity_group_id in number
253: ,p_object_version_number in number
254: ) is
255: --
256: l_rec hxc_heg_shd.g_rec_type;
257: l_proc varchar2(72);
258: --
259: Begin
260: g_debug:=hr_utility.debug_enabled;