50: --
51: -- {End Of Comments}
52: -- ----------------------------------------------------------------------------
53: Procedure delete_dml
54: (p_rec in hxc_map_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_map_shd.g_api_dml := true; -- Set the api dml status
68: --
69: -- First of all delete any child rows
70: --
71: delete from hxc_mapping_comp_usages
75: --
76: delete from hxc_mappings
77: where mapping_id = p_rec.mapping_id;
78: --
79: hxc_map_shd.g_api_dml := false; -- Unset the api dml status
80: --
81: if g_debug then
82: hr_utility.set_location(' Leaving:'||l_proc, 10);
83: end if;
84: --
85: Exception
86: When hr_api.child_integrity_violated then
87: -- Child integrity has been violated
88: hxc_map_shd.g_api_dml := false; -- Unset the api dml status
89: hxc_map_shd.constraint_error
90: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
91: When Others Then
92: hxc_map_shd.g_api_dml := false; -- Unset the api dml status
85: Exception
86: When hr_api.child_integrity_violated then
87: -- Child integrity has been violated
88: hxc_map_shd.g_api_dml := false; -- Unset the api dml status
89: hxc_map_shd.constraint_error
90: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
91: When Others Then
92: hxc_map_shd.g_api_dml := false; -- Unset the api dml status
93: Raise;
88: hxc_map_shd.g_api_dml := false; -- Unset the api dml status
89: hxc_map_shd.constraint_error
90: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
91: When Others Then
92: hxc_map_shd.g_api_dml := false; -- Unset the api dml status
93: Raise;
94: End delete_dml;
95: --
96: -- ----------------------------------------------------------------------------
124: -- Internal Row Handler Use Only.
125: --
126: -- {End Of Comments}
127: -- ----------------------------------------------------------------------------
128: Procedure pre_delete(p_rec in hxc_map_shd.g_rec_type) is
129: --
130: l_proc varchar2(72);
131: --
132: Begin
171: -- Internal Row Handler Use Only.
172: --
173: -- {End Of Comments}
174: -- -----------------------------------------------------------------------------
175: Procedure post_delete(p_rec in hxc_map_shd.g_rec_type) is
176: --
177: l_proc varchar2(72);
178: --
179: Begin
188: hxc_map_rkd.after_delete
189: (p_mapping_id
190: => p_rec.mapping_id
191: ,p_name_o
192: => hxc_map_shd.g_old_rec.name
193: ,p_object_version_number_o
194: => hxc_map_shd.g_old_rec.object_version_number
195: );
196: --
190: => p_rec.mapping_id
191: ,p_name_o
192: => hxc_map_shd.g_old_rec.name
193: ,p_object_version_number_o
194: => hxc_map_shd.g_old_rec.object_version_number
195: );
196: --
197: exception
198: --
212: -- ----------------------------------------------------------------------------
213: -- |---------------------------------< del >----------------------------------|
214: -- ----------------------------------------------------------------------------
215: Procedure del
216: (p_rec in hxc_map_shd.g_rec_type
217: ) is
218: --
219: l_proc varchar2(72);
220: --
227: end if;
228: --
229: -- We must lock the row which we need to delete.
230: --
231: hxc_map_shd.lck
232: (p_rec.mapping_id
233: ,p_rec.object_version_number
234: );
235: --
258: (p_mapping_id in number
259: ,p_object_version_number in number
260: ) is
261: --
262: l_rec hxc_map_shd.g_rec_type;
263: l_proc varchar2(72);
264: --
265: Begin
266: g_debug := hr_utility.debug_enabled;