50: --
51: -- {End Of Comments}
52: -- ----------------------------------------------------------------------------
53: Procedure delete_dml
54: (p_rec in hxc_mcu_shd.g_rec_type
55: ) is
56: --
57: l_proc varchar2(72);
58: --
63: l_proc := g_package||'delete_dml';
64: hr_utility.set_location('Entering:'||l_proc, 5);
65: end if;
66: --
67: hxc_mcu_shd.g_api_dml := true; -- Set the api dml status
68: --
69: -- Delete the hxc_mapping_comp_usages row.
70: --
71: delete from hxc_mapping_comp_usages
70: --
71: delete from hxc_mapping_comp_usages
72: where mapping_comp_usage_id = p_rec.mapping_comp_usage_id;
73: --
74: hxc_mcu_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_mcu_shd.g_api_dml := false; -- Unset the api dml status
84: hxc_mcu_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When Others Then
87: hxc_mcu_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_mcu_shd.g_api_dml := false; -- Unset the api dml status
84: hxc_mcu_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When Others Then
87: hxc_mcu_shd.g_api_dml := false; -- Unset the api dml status
88: Raise;
83: hxc_mcu_shd.g_api_dml := false; -- Unset the api dml status
84: hxc_mcu_shd.constraint_error
85: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
86: When Others Then
87: hxc_mcu_shd.g_api_dml := false; -- Unset the api dml status
88: Raise;
89: End delete_dml;
90: --
91: -- ----------------------------------------------------------------------------
119: -- Internal Row Handler Use Only.
120: --
121: -- {End Of Comments}
122: -- ----------------------------------------------------------------------------
123: Procedure pre_delete(p_rec in hxc_mcu_shd.g_rec_type) is
124: --
125: l_proc varchar2(72);
126: --
127: Begin
166: -- Internal Row Handler Use Only.
167: --
168: -- {End Of Comments}
169: -- -----------------------------------------------------------------------------
170: Procedure post_delete(p_rec in hxc_mcu_shd.g_rec_type) is
171: --
172: l_proc varchar2(72);
173: --
174: Begin
183: hxc_mcu_rkd.after_delete
184: (p_mapping_comp_usage_id
185: => p_rec.mapping_comp_usage_id
186: ,p_object_version_number_o
187: => hxc_mcu_shd.g_old_rec.object_version_number
188: ,p_mapping_component_id_o
189: => hxc_mcu_shd.g_old_rec.mapping_component_id
190: ,p_mapping_id_o
191: => hxc_mcu_shd.g_old_rec.mapping_id
185: => p_rec.mapping_comp_usage_id
186: ,p_object_version_number_o
187: => hxc_mcu_shd.g_old_rec.object_version_number
188: ,p_mapping_component_id_o
189: => hxc_mcu_shd.g_old_rec.mapping_component_id
190: ,p_mapping_id_o
191: => hxc_mcu_shd.g_old_rec.mapping_id
192: );
193: --
187: => hxc_mcu_shd.g_old_rec.object_version_number
188: ,p_mapping_component_id_o
189: => hxc_mcu_shd.g_old_rec.mapping_component_id
190: ,p_mapping_id_o
191: => hxc_mcu_shd.g_old_rec.mapping_id
192: );
193: --
194: exception
195: --
209: -- ----------------------------------------------------------------------------
210: -- |---------------------------------< del >----------------------------------|
211: -- ----------------------------------------------------------------------------
212: Procedure del
213: (p_rec in hxc_mcu_shd.g_rec_type
214: ) is
215: --
216: l_proc varchar2(72);
217: --
224: end if;
225: --
226: -- We must lock the row which we need to delete.
227: --
228: hxc_mcu_shd.lck
229: (p_rec.mapping_comp_usage_id
230: ,p_rec.object_version_number
231: );
232: --
255: (p_mapping_comp_usage_id in number
256: ,p_object_version_number in number
257: ) is
258: --
259: l_rec hxc_mcu_shd.g_rec_type;
260: l_proc varchar2(72);
261: --
262: Begin
263: g_debug := hr_utility.debug_enabled;