48: --
49: -- {End Of Comments}
50: -- ----------------------------------------------------------------------------
51: Procedure delete_dml
52: (p_rec in per_psp_shd.g_rec_type
53: ) is
54: --
55: l_proc varchar2(72) := g_package||'delete_dml';
56: --
56: --
57: Begin
58: hr_utility.set_location('Entering:'||l_proc, 5);
59: --
60: per_psp_shd.g_api_dml := true; -- Set the api dml status
61: --
62: -- Delete the per_spinal_points row.
63: --
64: delete from per_spinal_points
63: --
64: delete from per_spinal_points
65: where spinal_point_id = p_rec.spinal_point_id;
66: --
67: per_psp_shd.g_api_dml := false; -- Unset the api dml status
68: --
69: hr_utility.set_location(' Leaving:'||l_proc, 10);
70: --
71: Exception
70: --
71: Exception
72: When hr_api.child_integrity_violated then
73: -- Child integrity has been violated
74: per_psp_shd.g_api_dml := false; -- Unset the api dml status
75: per_psp_shd.constraint_error
76: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
77: When Others Then
78: per_psp_shd.g_api_dml := false; -- Unset the api dml status
71: Exception
72: When hr_api.child_integrity_violated then
73: -- Child integrity has been violated
74: per_psp_shd.g_api_dml := false; -- Unset the api dml status
75: per_psp_shd.constraint_error
76: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
77: When Others Then
78: per_psp_shd.g_api_dml := false; -- Unset the api dml status
79: Raise;
74: per_psp_shd.g_api_dml := false; -- Unset the api dml status
75: per_psp_shd.constraint_error
76: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
77: When Others Then
78: per_psp_shd.g_api_dml := false; -- Unset the api dml status
79: Raise;
80: End delete_dml;
81: --
82: -- ----------------------------------------------------------------------------
110: -- Internal Row Handler Use Only.
111: --
112: -- {End Of Comments}
113: -- ----------------------------------------------------------------------------
114: Procedure pre_delete(p_rec in per_psp_shd.g_rec_type) is
115: --
116: l_proc varchar2(72) := g_package||'pre_delete';
117: l_return varchar2(30);
118: l_message varchar2(2000) := null;
178: -- Internal Row Handler Use Only.
179: --
180: -- {End Of Comments}
181: -- -----------------------------------------------------------------------------
182: Procedure post_delete(p_rec in per_psp_shd.g_rec_type) is
183: --
184: l_proc varchar2(72) := g_package||'post_delete';
185: --
186: Begin
190: per_psp_rkd.after_delete
191: (p_spinal_point_id
192: => p_rec.spinal_point_id
193: ,p_business_group_id_o
194: => per_psp_shd.g_old_rec.business_group_id
195: ,p_parent_spine_id_o
196: => per_psp_shd.g_old_rec.parent_spine_id
197: ,p_sequence_o
198: => per_psp_shd.g_old_rec.sequence
192: => p_rec.spinal_point_id
193: ,p_business_group_id_o
194: => per_psp_shd.g_old_rec.business_group_id
195: ,p_parent_spine_id_o
196: => per_psp_shd.g_old_rec.parent_spine_id
197: ,p_sequence_o
198: => per_psp_shd.g_old_rec.sequence
199: ,p_spinal_point_o
200: => per_psp_shd.g_old_rec.spinal_point
194: => per_psp_shd.g_old_rec.business_group_id
195: ,p_parent_spine_id_o
196: => per_psp_shd.g_old_rec.parent_spine_id
197: ,p_sequence_o
198: => per_psp_shd.g_old_rec.sequence
199: ,p_spinal_point_o
200: => per_psp_shd.g_old_rec.spinal_point
201: ,p_request_id_o
202: => per_psp_shd.g_old_rec.request_id
196: => per_psp_shd.g_old_rec.parent_spine_id
197: ,p_sequence_o
198: => per_psp_shd.g_old_rec.sequence
199: ,p_spinal_point_o
200: => per_psp_shd.g_old_rec.spinal_point
201: ,p_request_id_o
202: => per_psp_shd.g_old_rec.request_id
203: ,p_program_application_id_o
204: => per_psp_shd.g_old_rec.program_application_id
198: => per_psp_shd.g_old_rec.sequence
199: ,p_spinal_point_o
200: => per_psp_shd.g_old_rec.spinal_point
201: ,p_request_id_o
202: => per_psp_shd.g_old_rec.request_id
203: ,p_program_application_id_o
204: => per_psp_shd.g_old_rec.program_application_id
205: ,p_program_id_o
206: => per_psp_shd.g_old_rec.program_id
200: => per_psp_shd.g_old_rec.spinal_point
201: ,p_request_id_o
202: => per_psp_shd.g_old_rec.request_id
203: ,p_program_application_id_o
204: => per_psp_shd.g_old_rec.program_application_id
205: ,p_program_id_o
206: => per_psp_shd.g_old_rec.program_id
207: ,p_program_update_date_o
208: => per_psp_shd.g_old_rec.program_update_date
202: => per_psp_shd.g_old_rec.request_id
203: ,p_program_application_id_o
204: => per_psp_shd.g_old_rec.program_application_id
205: ,p_program_id_o
206: => per_psp_shd.g_old_rec.program_id
207: ,p_program_update_date_o
208: => per_psp_shd.g_old_rec.program_update_date
209: ,p_object_version_number_o
210: => per_psp_shd.g_old_rec.object_version_number
204: => per_psp_shd.g_old_rec.program_application_id
205: ,p_program_id_o
206: => per_psp_shd.g_old_rec.program_id
207: ,p_program_update_date_o
208: => per_psp_shd.g_old_rec.program_update_date
209: ,p_object_version_number_o
210: => per_psp_shd.g_old_rec.object_version_number
211: --
212: ,p_information_category_o
206: => per_psp_shd.g_old_rec.program_id
207: ,p_program_update_date_o
208: => per_psp_shd.g_old_rec.program_update_date
209: ,p_object_version_number_o
210: => per_psp_shd.g_old_rec.object_version_number
211: --
212: ,p_information_category_o
213: => per_psp_shd.g_old_rec.information_category
214: ,p_information1_o
209: ,p_object_version_number_o
210: => per_psp_shd.g_old_rec.object_version_number
211: --
212: ,p_information_category_o
213: => per_psp_shd.g_old_rec.information_category
214: ,p_information1_o
215: => per_psp_shd.g_old_rec.information1
216: ,p_information2_o
217: => per_psp_shd.g_old_rec.information2
211: --
212: ,p_information_category_o
213: => per_psp_shd.g_old_rec.information_category
214: ,p_information1_o
215: => per_psp_shd.g_old_rec.information1
216: ,p_information2_o
217: => per_psp_shd.g_old_rec.information2
218: ,p_information3_o
219: => per_psp_shd.g_old_rec.information3
213: => per_psp_shd.g_old_rec.information_category
214: ,p_information1_o
215: => per_psp_shd.g_old_rec.information1
216: ,p_information2_o
217: => per_psp_shd.g_old_rec.information2
218: ,p_information3_o
219: => per_psp_shd.g_old_rec.information3
220: ,p_information4_o
221: => per_psp_shd.g_old_rec.information4
215: => per_psp_shd.g_old_rec.information1
216: ,p_information2_o
217: => per_psp_shd.g_old_rec.information2
218: ,p_information3_o
219: => per_psp_shd.g_old_rec.information3
220: ,p_information4_o
221: => per_psp_shd.g_old_rec.information4
222: ,p_information5_o
223: => per_psp_shd.g_old_rec.information5
217: => per_psp_shd.g_old_rec.information2
218: ,p_information3_o
219: => per_psp_shd.g_old_rec.information3
220: ,p_information4_o
221: => per_psp_shd.g_old_rec.information4
222: ,p_information5_o
223: => per_psp_shd.g_old_rec.information5
224: ,p_information6_o
225: => per_psp_shd.g_old_rec.information6
219: => per_psp_shd.g_old_rec.information3
220: ,p_information4_o
221: => per_psp_shd.g_old_rec.information4
222: ,p_information5_o
223: => per_psp_shd.g_old_rec.information5
224: ,p_information6_o
225: => per_psp_shd.g_old_rec.information6
226: ,p_information7_o
227: => per_psp_shd.g_old_rec.information7
221: => per_psp_shd.g_old_rec.information4
222: ,p_information5_o
223: => per_psp_shd.g_old_rec.information5
224: ,p_information6_o
225: => per_psp_shd.g_old_rec.information6
226: ,p_information7_o
227: => per_psp_shd.g_old_rec.information7
228: ,p_information8_o
229: => per_psp_shd.g_old_rec.information8
223: => per_psp_shd.g_old_rec.information5
224: ,p_information6_o
225: => per_psp_shd.g_old_rec.information6
226: ,p_information7_o
227: => per_psp_shd.g_old_rec.information7
228: ,p_information8_o
229: => per_psp_shd.g_old_rec.information8
230: ,p_information9_o
231: => per_psp_shd.g_old_rec.information9
225: => per_psp_shd.g_old_rec.information6
226: ,p_information7_o
227: => per_psp_shd.g_old_rec.information7
228: ,p_information8_o
229: => per_psp_shd.g_old_rec.information8
230: ,p_information9_o
231: => per_psp_shd.g_old_rec.information9
232: ,p_information10_o
233: => per_psp_shd.g_old_rec.information10
227: => per_psp_shd.g_old_rec.information7
228: ,p_information8_o
229: => per_psp_shd.g_old_rec.information8
230: ,p_information9_o
231: => per_psp_shd.g_old_rec.information9
232: ,p_information10_o
233: => per_psp_shd.g_old_rec.information10
234: ,p_information11_o
235: => per_psp_shd.g_old_rec.information11
229: => per_psp_shd.g_old_rec.information8
230: ,p_information9_o
231: => per_psp_shd.g_old_rec.information9
232: ,p_information10_o
233: => per_psp_shd.g_old_rec.information10
234: ,p_information11_o
235: => per_psp_shd.g_old_rec.information11
236: ,p_information12_o
237: => per_psp_shd.g_old_rec.information12
231: => per_psp_shd.g_old_rec.information9
232: ,p_information10_o
233: => per_psp_shd.g_old_rec.information10
234: ,p_information11_o
235: => per_psp_shd.g_old_rec.information11
236: ,p_information12_o
237: => per_psp_shd.g_old_rec.information12
238: ,p_information13_o
239: => per_psp_shd.g_old_rec.information13
233: => per_psp_shd.g_old_rec.information10
234: ,p_information11_o
235: => per_psp_shd.g_old_rec.information11
236: ,p_information12_o
237: => per_psp_shd.g_old_rec.information12
238: ,p_information13_o
239: => per_psp_shd.g_old_rec.information13
240: ,p_information14_o
241: => per_psp_shd.g_old_rec.information14
235: => per_psp_shd.g_old_rec.information11
236: ,p_information12_o
237: => per_psp_shd.g_old_rec.information12
238: ,p_information13_o
239: => per_psp_shd.g_old_rec.information13
240: ,p_information14_o
241: => per_psp_shd.g_old_rec.information14
242: ,p_information15_o
243: => per_psp_shd.g_old_rec.information15
237: => per_psp_shd.g_old_rec.information12
238: ,p_information13_o
239: => per_psp_shd.g_old_rec.information13
240: ,p_information14_o
241: => per_psp_shd.g_old_rec.information14
242: ,p_information15_o
243: => per_psp_shd.g_old_rec.information15
244: ,p_information16_o
245: => per_psp_shd.g_old_rec.information16
239: => per_psp_shd.g_old_rec.information13
240: ,p_information14_o
241: => per_psp_shd.g_old_rec.information14
242: ,p_information15_o
243: => per_psp_shd.g_old_rec.information15
244: ,p_information16_o
245: => per_psp_shd.g_old_rec.information16
246: ,p_information17_o
247: => per_psp_shd.g_old_rec.information17
241: => per_psp_shd.g_old_rec.information14
242: ,p_information15_o
243: => per_psp_shd.g_old_rec.information15
244: ,p_information16_o
245: => per_psp_shd.g_old_rec.information16
246: ,p_information17_o
247: => per_psp_shd.g_old_rec.information17
248: ,p_information18_o
249: => per_psp_shd.g_old_rec.information18
243: => per_psp_shd.g_old_rec.information15
244: ,p_information16_o
245: => per_psp_shd.g_old_rec.information16
246: ,p_information17_o
247: => per_psp_shd.g_old_rec.information17
248: ,p_information18_o
249: => per_psp_shd.g_old_rec.information18
250: ,p_information19_o
251: => per_psp_shd.g_old_rec.information19
245: => per_psp_shd.g_old_rec.information16
246: ,p_information17_o
247: => per_psp_shd.g_old_rec.information17
248: ,p_information18_o
249: => per_psp_shd.g_old_rec.information18
250: ,p_information19_o
251: => per_psp_shd.g_old_rec.information19
252: ,p_information20_o
253: => per_psp_shd.g_old_rec.information20
247: => per_psp_shd.g_old_rec.information17
248: ,p_information18_o
249: => per_psp_shd.g_old_rec.information18
250: ,p_information19_o
251: => per_psp_shd.g_old_rec.information19
252: ,p_information20_o
253: => per_psp_shd.g_old_rec.information20
254: ,p_information21_o
255: => per_psp_shd.g_old_rec.information21
249: => per_psp_shd.g_old_rec.information18
250: ,p_information19_o
251: => per_psp_shd.g_old_rec.information19
252: ,p_information20_o
253: => per_psp_shd.g_old_rec.information20
254: ,p_information21_o
255: => per_psp_shd.g_old_rec.information21
256: ,p_information22_o
257: => per_psp_shd.g_old_rec.information22
251: => per_psp_shd.g_old_rec.information19
252: ,p_information20_o
253: => per_psp_shd.g_old_rec.information20
254: ,p_information21_o
255: => per_psp_shd.g_old_rec.information21
256: ,p_information22_o
257: => per_psp_shd.g_old_rec.information22
258: ,p_information23_o
259: => per_psp_shd.g_old_rec.information23
253: => per_psp_shd.g_old_rec.information20
254: ,p_information21_o
255: => per_psp_shd.g_old_rec.information21
256: ,p_information22_o
257: => per_psp_shd.g_old_rec.information22
258: ,p_information23_o
259: => per_psp_shd.g_old_rec.information23
260: ,p_information24_o
261: => per_psp_shd.g_old_rec.information24
255: => per_psp_shd.g_old_rec.information21
256: ,p_information22_o
257: => per_psp_shd.g_old_rec.information22
258: ,p_information23_o
259: => per_psp_shd.g_old_rec.information23
260: ,p_information24_o
261: => per_psp_shd.g_old_rec.information24
262: ,p_information25_o
263: => per_psp_shd.g_old_rec.information25
257: => per_psp_shd.g_old_rec.information22
258: ,p_information23_o
259: => per_psp_shd.g_old_rec.information23
260: ,p_information24_o
261: => per_psp_shd.g_old_rec.information24
262: ,p_information25_o
263: => per_psp_shd.g_old_rec.information25
264: ,p_information26_o
265: => per_psp_shd.g_old_rec.information26
259: => per_psp_shd.g_old_rec.information23
260: ,p_information24_o
261: => per_psp_shd.g_old_rec.information24
262: ,p_information25_o
263: => per_psp_shd.g_old_rec.information25
264: ,p_information26_o
265: => per_psp_shd.g_old_rec.information26
266: ,p_information27_o
267: => per_psp_shd.g_old_rec.information27
261: => per_psp_shd.g_old_rec.information24
262: ,p_information25_o
263: => per_psp_shd.g_old_rec.information25
264: ,p_information26_o
265: => per_psp_shd.g_old_rec.information26
266: ,p_information27_o
267: => per_psp_shd.g_old_rec.information27
268: ,p_information28_o
269: => per_psp_shd.g_old_rec.information28
263: => per_psp_shd.g_old_rec.information25
264: ,p_information26_o
265: => per_psp_shd.g_old_rec.information26
266: ,p_information27_o
267: => per_psp_shd.g_old_rec.information27
268: ,p_information28_o
269: => per_psp_shd.g_old_rec.information28
270: ,p_information29_o
271: => per_psp_shd.g_old_rec.information29
265: => per_psp_shd.g_old_rec.information26
266: ,p_information27_o
267: => per_psp_shd.g_old_rec.information27
268: ,p_information28_o
269: => per_psp_shd.g_old_rec.information28
270: ,p_information29_o
271: => per_psp_shd.g_old_rec.information29
272: ,p_information30_o
273: => per_psp_shd.g_old_rec.information30
267: => per_psp_shd.g_old_rec.information27
268: ,p_information28_o
269: => per_psp_shd.g_old_rec.information28
270: ,p_information29_o
271: => per_psp_shd.g_old_rec.information29
272: ,p_information30_o
273: => per_psp_shd.g_old_rec.information30
274: --
275: );
269: => per_psp_shd.g_old_rec.information28
270: ,p_information29_o
271: => per_psp_shd.g_old_rec.information29
272: ,p_information30_o
273: => per_psp_shd.g_old_rec.information30
274: --
275: );
276: --
277: exception
290: -- ----------------------------------------------------------------------------
291: -- |---------------------------------< del >----------------------------------|
292: -- ----------------------------------------------------------------------------
293: Procedure del
294: (p_rec in per_psp_shd.g_rec_type
295: ) is
296: --
297: l_proc varchar2(72) := g_package||'del';
298: --
300: hr_utility.set_location('Entering:'||l_proc, 10);
301: --
302: -- We must lock the row which we need to delete.
303: --
304: per_psp_shd.lck
305: (p_rec.spinal_point_id
306: ,p_rec.object_version_number
307: );
308: --
351: (p_spinal_point_id in number
352: ,p_object_version_number in number
353: ) is
354: --
355: l_rec per_psp_shd.g_rec_type;
356: l_proc varchar2(72) := g_package||'del';
357: --
358: Begin
359: hr_utility.set_location('Entering:'||l_proc, 5);