DBA Data[Home] [Help]

PACKAGE BODY: APPS.GHR_PAH_DEL

Source


1 Package Body ghr_pah_del as
2 /* $Header: ghpahrhi.pkb 115.3 2003/01/30 19:25:31 asubrahm ship $ */
3 --
4 -- ----------------------------------------------------------------------------
5 -- |                     Private Global Definitions                           |
6 -- ----------------------------------------------------------------------------
7 --
8 g_package  varchar2(33)	:= '  ghr_pah_del.';  -- Global package name
9 --
10 -- ----------------------------------------------------------------------------
11 -- |------------------------------< delete_dml >------------------------------|
12 -- ----------------------------------------------------------------------------
13 -- {Start Of Comments}
14 --
15 -- Description:
16 --   This procedure controls the actual dml delete logic. The functions of
17 --   this procedure are as follows:
18 --   1) To set and unset the g_api_dml status as required (as we are about to
19 --      perform dml).
20 --   2) To delete the specified row from the schema using the primary key in
21 --      the predicates.
22 --   3) To trap any constraint violations that may have occurred.
23 --   4) To raise any other errors.
24 --
25 -- Prerequisites:
26 --   This is an internal private procedure which must be called from the del
27 --   procedure.
28 --
29 -- In Parameters:
30 --   A Pl/Sql record structre.
31 --
32 -- Post Success:
33 --   The specified row will be delete from the schema.
34 --
35 -- Post Failure:
36 --   On the delete dml failure it is important to note that we always reset the
37 --   g_api_dml status to false.
38 --   If a child integrity constraint violation is raised the
39 --   constraint_error procedure will be called.
40 --   If any other error is reported, the error will be raised after the
41 --   g_api_dml status is reset.
42 --
43 -- Developer Implementation Notes:
44 --   None.
45 --
46 -- Access Status:
47 --   Internal Row Handler Use Only.
48 --
49 -- {End Of Comments}
50 -- ----------------------------------------------------------------------------
51 Procedure delete_dml(p_rec in ghr_pah_shd.g_rec_type) is
52 --
53   l_proc  varchar2(72) := g_package||'delete_dml';
54 --
55 Begin
56   hr_utility.set_location('Entering:'||l_proc, 5);
57   --
58   ghr_pah_shd.g_api_dml := true;  -- Set the api dml status
59   --
60   -- Delete the ghr_pa_history row.
61   --
62   delete from ghr_pa_history
63   where pa_history_id = p_rec.pa_history_id;
64   --
65   ghr_pah_shd.g_api_dml := false;   -- Unset the api dml status
66   --
67   hr_utility.set_location(' Leaving:'||l_proc, 10);
68 --
69 Exception
70   When hr_api.child_integrity_violated then
71     -- Child integrity has been violated
72     ghr_pah_shd.g_api_dml := false;   -- Unset the api dml status
73     ghr_pah_shd.constraint_error
74       (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
75   When Others Then
76     ghr_pah_shd.g_api_dml := false;   -- Unset the api dml status
77     Raise;
78 End delete_dml;
79 --
80 -- ----------------------------------------------------------------------------
81 -- |------------------------------< pre_delete >------------------------------|
82 -- ----------------------------------------------------------------------------
83 -- {Start Of Comments}
84 --
85 -- Description:
86 --   This private procedure contains any processing which is required before
87 --   the delete dml.
88 --
89 -- Prerequisites:
90 --   This is an internal procedure which is called from the del procedure.
91 --
92 -- In Parameters:
93 --   A Pl/Sql record structre.
94 --
95 -- Post Success:
96 --   Processing continues.
97 --
98 -- Post Failure:
99 --   If an error has occurred, an error message and exception will be raised
100 --   but not handled.
101 --
102 -- Developer Implementation Notes:
103 --   Any pre-processing required before the delete dml is issued should be
104 --   coded within this procedure. It is important to note that any 3rd party
105 --   maintenance should be reviewed before placing in this procedure.
106 --
107 -- Access Status:
108 --   Internal Row Handler Use Only.
109 --
110 -- {End Of Comments}
111 -- ----------------------------------------------------------------------------
112 Procedure pre_delete(p_rec in ghr_pah_shd.g_rec_type) is
113 --
114   l_proc  varchar2(72) := g_package||'pre_delete';
115 --
116 Begin
117   hr_utility.set_location('Entering:'||l_proc, 5);
118   --
119   hr_utility.set_location(' Leaving:'||l_proc, 10);
120 End pre_delete;
121 --
122 -- ----------------------------------------------------------------------------
123 -- |-----------------------------< post_delete >------------------------------|
124 -- ----------------------------------------------------------------------------
125 -- {Start Of Comments}
126 --
127 -- Description:
128 --   This private procedure contains any processing which is required after the
129 --   delete dml.
130 --
131 -- Prerequisites:
132 --   This is an internal procedure which is called from the del procedure.
133 --
134 -- In Parameters:
135 --   A Pl/Sql record structre.
136 --
137 -- Post Success:
138 --   Processing continues.
139 --
140 -- Post Failure:
141 --   If an error has occurred, an error message and exception will be raised
142 --   but not handled.
143 --
144 -- Developer Implementation Notes:
145 --   Any post-processing required after the delete dml is issued should be
146 --   coded within this procedure. It is important to note that any 3rd party
147 --   maintenance should be reviewed before placing in this procedure.
148 --
149 -- Access Status:
150 --   Internal table Handler Use Only.
151 --
152 -- {End Of Comments}
153 -- ----------------------------------------------------------------------------
154 Procedure post_delete(p_rec in ghr_pah_shd.g_rec_type) is
155 --
156   l_proc  varchar2(72) := g_package||'post_delete';
157 --
158 Begin
159   hr_utility.set_location('Entering:'||l_proc, 5);
160   --
161   -- This is a hook point and the user hook for post_delete is called here.
162   --
163   begin
164      ghr_pah_rkd.after_delete	(
165 	p_PA_HISTORY_ID_o			=>	ghr_pah_shd.g_old_rec.PA_HISTORY_ID	,
166 	p_PA_REQUEST_ID_o			=>	ghr_pah_shd.g_old_rec.PA_REQUEST_ID	,
167 	p_PROCESS_DATE_o			=>	ghr_pah_shd.g_old_rec.PROCESS_DATE	,
168 	p_NATURE_OF_ACTION_ID_o		=>	ghr_pah_shd.g_old_rec.NATURE_OF_ACTION_ID	,
169 	p_EFFECTIVE_DATE_o		=>	ghr_pah_shd.g_old_rec.EFFECTIVE_DATE		,
170 	p_ALTERED_PA_REQUEST_ID_o	=>	ghr_pah_shd.g_old_rec.ALTERED_PA_REQUEST_ID	,
171 	p_PERSON_ID_o			=>	ghr_pah_shd.g_old_rec.PERSON_ID		,
172 	p_ASSIGNMENT_ID_o			=>	ghr_pah_shd.g_old_rec.ASSIGNMENT_ID	,
173 	p_DML_OPERATION_o			=>	ghr_pah_shd.g_old_rec.DML_OPERATION	,
174 	p_TABLE_NAME_o			=>	ghr_pah_shd.g_old_rec.TABLE_NAME		,
175 	p_PRE_VALUES_FLAG_o		=>	ghr_pah_shd.g_old_rec.PRE_VALUES_FLAG	,
176 	p_INFORMATION1_o			=>	ghr_pah_shd.g_old_rec.INFORMATION1	,
177 	p_INFORMATION2_o			=>	ghr_pah_shd.g_old_rec.INFORMATION2	,
178 	p_INFORMATION3_o			=>	ghr_pah_shd.g_old_rec.INFORMATION3	,
179 	p_INFORMATION4_o			=>	ghr_pah_shd.g_old_rec.INFORMATION4	,
180 	p_INFORMATION5_o			=>	ghr_pah_shd.g_old_rec.INFORMATION5	,
181 	p_INFORMATION6_o			=>	ghr_pah_shd.g_old_rec.INFORMATION6	,
182 	p_INFORMATION7_o			=>	ghr_pah_shd.g_old_rec.INFORMATION7	,
183 	p_INFORMATION8_o			=>	ghr_pah_shd.g_old_rec.INFORMATION8	,
184 	p_INFORMATION9_o			=>	ghr_pah_shd.g_old_rec.INFORMATION9	,
185 	p_INFORMATION10_o			=>	ghr_pah_shd.g_old_rec.INFORMATION10	,
186 	p_INFORMATION11_o			=>	ghr_pah_shd.g_old_rec.INFORMATION11	,
187 	p_INFORMATION12_o			=>	ghr_pah_shd.g_old_rec.INFORMATION12	,
188 	p_INFORMATION13_o			=>	ghr_pah_shd.g_old_rec.INFORMATION13	,
189 	p_INFORMATION14_o			=>	ghr_pah_shd.g_old_rec.INFORMATION14	,
190 	p_INFORMATION15_o			=>	ghr_pah_shd.g_old_rec.INFORMATION15	,
191 	p_INFORMATION16_o			=>	ghr_pah_shd.g_old_rec.INFORMATION16	,
192 	p_INFORMATION17_o			=>	ghr_pah_shd.g_old_rec.INFORMATION17	,
193 	p_INFORMATION18_o			=>	ghr_pah_shd.g_old_rec.INFORMATION18	,
194 	p_INFORMATION19_o			=>	ghr_pah_shd.g_old_rec.INFORMATION19	,
195 	p_INFORMATION20_o			=>	ghr_pah_shd.g_old_rec.INFORMATION20	,
196 	p_INFORMATION21_o			=>	ghr_pah_shd.g_old_rec.INFORMATION21	,
197 	p_INFORMATION22_o			=>	ghr_pah_shd.g_old_rec.INFORMATION22	,
198 	p_INFORMATION23_o			=>	ghr_pah_shd.g_old_rec.INFORMATION23	,
199 	p_INFORMATION24_o			=>	ghr_pah_shd.g_old_rec.INFORMATION24	,
200 	p_INFORMATION25_o			=>	ghr_pah_shd.g_old_rec.INFORMATION25	,
201 	p_INFORMATION26_o			=>	ghr_pah_shd.g_old_rec.INFORMATION26	,
202 	p_INFORMATION27_o			=>	ghr_pah_shd.g_old_rec.INFORMATION27	,
203 	p_INFORMATION28_o			=>	ghr_pah_shd.g_old_rec.INFORMATION28	,
204 	p_INFORMATION29_o			=>	ghr_pah_shd.g_old_rec.INFORMATION29	,
205 	p_INFORMATION30_o			=>	ghr_pah_shd.g_old_rec.INFORMATION30	,
206 	p_INFORMATION31_o			=>	ghr_pah_shd.g_old_rec.INFORMATION31	,
207 	p_INFORMATION32_o			=>	ghr_pah_shd.g_old_rec.INFORMATION32	,
208 	p_INFORMATION33_o			=>	ghr_pah_shd.g_old_rec.INFORMATION33	,
209 	p_INFORMATION34_o			=>	ghr_pah_shd.g_old_rec.INFORMATION34	,
210 	p_INFORMATION35_o			=>	ghr_pah_shd.g_old_rec.INFORMATION35	,
211 	p_INFORMATION36_o			=>	ghr_pah_shd.g_old_rec.INFORMATION36	,
212 	p_INFORMATION37_o			=>	ghr_pah_shd.g_old_rec.INFORMATION37	,
213 	p_INFORMATION38_o			=>	ghr_pah_shd.g_old_rec.INFORMATION38	,
214 	p_INFORMATION39_o			=>	ghr_pah_shd.g_old_rec.INFORMATION39	,
215 	p_INFORMATION47_o			=>	ghr_pah_shd.g_old_rec.INFORMATION47	,
216 	p_INFORMATION48_o			=>	ghr_pah_shd.g_old_rec.INFORMATION48	,
217 	p_INFORMATION49_o			=>	ghr_pah_shd.g_old_rec.INFORMATION49	,
218 	p_INFORMATION40_o			=>	ghr_pah_shd.g_old_rec.INFORMATION40	,
219 	p_INFORMATION41_o			=>	ghr_pah_shd.g_old_rec.INFORMATION41	,
220 	p_INFORMATION42_o			=>	ghr_pah_shd.g_old_rec.INFORMATION42	,
221 	p_INFORMATION43_o			=>	ghr_pah_shd.g_old_rec.INFORMATION43	,
222 	p_INFORMATION44_o			=>	ghr_pah_shd.g_old_rec.INFORMATION44	,
223 	p_INFORMATION45_o			=>	ghr_pah_shd.g_old_rec.INFORMATION45	,
224 	p_INFORMATION46_o			=>	ghr_pah_shd.g_old_rec.INFORMATION46	,
225 	p_INFORMATION50_o			=>	ghr_pah_shd.g_old_rec.INFORMATION50	,
226 	p_INFORMATION51_o			=>	ghr_pah_shd.g_old_rec.INFORMATION51	,
227 	p_INFORMATION52_o			=>	ghr_pah_shd.g_old_rec.INFORMATION52	,
228 	p_INFORMATION53_o			=>	ghr_pah_shd.g_old_rec.INFORMATION53	,
229 	p_INFORMATION54_o			=>	ghr_pah_shd.g_old_rec.INFORMATION54	,
230 	p_INFORMATION55_o			=>	ghr_pah_shd.g_old_rec.INFORMATION55	,
231 	p_INFORMATION56_o			=>	ghr_pah_shd.g_old_rec.INFORMATION56	,
232 	p_INFORMATION57_o			=>	ghr_pah_shd.g_old_rec.INFORMATION57	,
233 	p_INFORMATION58_o			=>	ghr_pah_shd.g_old_rec.INFORMATION58	,
234 	p_INFORMATION59_o			=>	ghr_pah_shd.g_old_rec.INFORMATION59	,
235 	p_INFORMATION60_o			=>	ghr_pah_shd.g_old_rec.INFORMATION60	,
236 	p_INFORMATION61_o			=>	ghr_pah_shd.g_old_rec.INFORMATION61	,
237 	p_INFORMATION62_o			=>	ghr_pah_shd.g_old_rec.INFORMATION62	,
238 	p_INFORMATION63_o			=>	ghr_pah_shd.g_old_rec.INFORMATION63	,
239 	p_INFORMATION64_o			=>	ghr_pah_shd.g_old_rec.INFORMATION64	,
240 	p_INFORMATION65_o			=>	ghr_pah_shd.g_old_rec.INFORMATION65	,
241 	p_INFORMATION66_o			=>	ghr_pah_shd.g_old_rec.INFORMATION66	,
242 	p_INFORMATION67_o			=>	ghr_pah_shd.g_old_rec.INFORMATION67	,
243 	p_INFORMATION68_o			=>	ghr_pah_shd.g_old_rec.INFORMATION68	,
244 	p_INFORMATION69_o			=>	ghr_pah_shd.g_old_rec.INFORMATION69	,
245 	p_INFORMATION70_o			=>	ghr_pah_shd.g_old_rec.INFORMATION70	,
246 	p_INFORMATION71_o			=>	ghr_pah_shd.g_old_rec.INFORMATION71	,
250 	p_INFORMATION75_o			=>	ghr_pah_shd.g_old_rec.INFORMATION75	,
247 	p_INFORMATION72_o			=>	ghr_pah_shd.g_old_rec.INFORMATION72	,
248 	p_INFORMATION73_o			=>	ghr_pah_shd.g_old_rec.INFORMATION73	,
249 	p_INFORMATION74_o			=>	ghr_pah_shd.g_old_rec.INFORMATION74	,
251 	p_INFORMATION76_o			=>	ghr_pah_shd.g_old_rec.INFORMATION76	,
252 	p_INFORMATION77_o			=>	ghr_pah_shd.g_old_rec.INFORMATION77	,
253 	p_INFORMATION78_o			=>	ghr_pah_shd.g_old_rec.INFORMATION78	,
254 	p_INFORMATION79_o			=>	ghr_pah_shd.g_old_rec.INFORMATION79	,
255 	p_INFORMATION80_o			=>	ghr_pah_shd.g_old_rec.INFORMATION80	,
256 	p_INFORMATION81_o			=>	ghr_pah_shd.g_old_rec.INFORMATION81	,
257 	p_INFORMATION82_o			=>	ghr_pah_shd.g_old_rec.INFORMATION82	,
258 	p_INFORMATION83_o			=>	ghr_pah_shd.g_old_rec.INFORMATION83	,
259 	p_INFORMATION84_o			=>	ghr_pah_shd.g_old_rec.INFORMATION84	,
260 	p_INFORMATION85_o			=>	ghr_pah_shd.g_old_rec.INFORMATION85	,
261 	p_INFORMATION86_o			=>	ghr_pah_shd.g_old_rec.INFORMATION86	,
262 	p_INFORMATION87_o			=>	ghr_pah_shd.g_old_rec.INFORMATION87	,
263 	p_INFORMATION88_o			=>	ghr_pah_shd.g_old_rec.INFORMATION88	,
264 	p_INFORMATION89_o			=>	ghr_pah_shd.g_old_rec.INFORMATION89	,
265 	p_INFORMATION90_o			=>	ghr_pah_shd.g_old_rec.INFORMATION90	,
266 	p_INFORMATION91_o			=>	ghr_pah_shd.g_old_rec.INFORMATION91	,
267 	p_INFORMATION92_o			=>	ghr_pah_shd.g_old_rec.INFORMATION92	,
268 	p_INFORMATION93_o			=>	ghr_pah_shd.g_old_rec.INFORMATION93	,
269 	p_INFORMATION94_o			=>	ghr_pah_shd.g_old_rec.INFORMATION94	,
270 	p_INFORMATION95_o			=>	ghr_pah_shd.g_old_rec.INFORMATION95	,
271 	p_INFORMATION96_o			=>	ghr_pah_shd.g_old_rec.INFORMATION96	,
272 	p_INFORMATION97_o			=>	ghr_pah_shd.g_old_rec.INFORMATION97	,
273 	p_INFORMATION98_o			=>	ghr_pah_shd.g_old_rec.INFORMATION98	,
274 	p_INFORMATION99_o			=>	ghr_pah_shd.g_old_rec.INFORMATION99	,
275 	p_INFORMATION100_o		=>	ghr_pah_shd.g_old_rec.INFORMATION100	,
276 	p_INFORMATION101_o		=>	ghr_pah_shd.g_old_rec.INFORMATION101	,
277 	p_INFORMATION102_o		=>	ghr_pah_shd.g_old_rec.INFORMATION102	,
278 	p_INFORMATION103_o		=>	ghr_pah_shd.g_old_rec.INFORMATION103	,
279 	p_INFORMATION104_o		=>	ghr_pah_shd.g_old_rec.INFORMATION104	,
280 	p_INFORMATION105_o		=>	ghr_pah_shd.g_old_rec.INFORMATION105	,
281 	p_INFORMATION106_o		=>	ghr_pah_shd.g_old_rec.INFORMATION106	,
282 	p_INFORMATION107_o		=>	ghr_pah_shd.g_old_rec.INFORMATION107	,
283 	p_INFORMATION108_o		=>	ghr_pah_shd.g_old_rec.INFORMATION108	,
284 	p_INFORMATION109_o		=>	ghr_pah_shd.g_old_rec.INFORMATION109	,
285 	p_INFORMATION110_o		=>	ghr_pah_shd.g_old_rec.INFORMATION110	,
286 	p_INFORMATION111_o		=>	ghr_pah_shd.g_old_rec.INFORMATION111	,
287 	p_INFORMATION112_o		=>	ghr_pah_shd.g_old_rec.INFORMATION112	,
288 	p_INFORMATION113_o		=>	ghr_pah_shd.g_old_rec.INFORMATION113	,
289 	p_INFORMATION114_o		=>	ghr_pah_shd.g_old_rec.INFORMATION114	,
290 	p_INFORMATION115_o		=>	ghr_pah_shd.g_old_rec.INFORMATION115	,
291 	p_INFORMATION116_o		=>	ghr_pah_shd.g_old_rec.INFORMATION116	,
292 	p_INFORMATION117_o		=>	ghr_pah_shd.g_old_rec.INFORMATION117	,
293 	p_INFORMATION118_o		=>	ghr_pah_shd.g_old_rec.INFORMATION118	,
294 	p_INFORMATION119_o		=>	ghr_pah_shd.g_old_rec.INFORMATION119	,
295 	p_INFORMATION120_o		=>	ghr_pah_shd.g_old_rec.INFORMATION120	,
296 	p_INFORMATION121_o		=>	ghr_pah_shd.g_old_rec.INFORMATION121	,
297 	p_INFORMATION122_o		=>	ghr_pah_shd.g_old_rec.INFORMATION122	,
298 	p_INFORMATION123_o		=>	ghr_pah_shd.g_old_rec.INFORMATION123	,
299 	p_INFORMATION124_o		=>	ghr_pah_shd.g_old_rec.INFORMATION124	,
300 	p_INFORMATION125_o		=>	ghr_pah_shd.g_old_rec.INFORMATION125	,
301 	p_INFORMATION126_o		=>	ghr_pah_shd.g_old_rec.INFORMATION126	,
302 	p_INFORMATION127_o		=>	ghr_pah_shd.g_old_rec.INFORMATION127	,
303 	p_INFORMATION128_o		=>	ghr_pah_shd.g_old_rec.INFORMATION128	,
304 	p_INFORMATION129_o		=>	ghr_pah_shd.g_old_rec.INFORMATION129	,
305 	p_INFORMATION130_o		=>	ghr_pah_shd.g_old_rec.INFORMATION130	,
306 	p_INFORMATION131_o		=>	ghr_pah_shd.g_old_rec.INFORMATION131	,
307 	p_INFORMATION132_o		=>	ghr_pah_shd.g_old_rec.INFORMATION132	,
308 	p_INFORMATION133_o		=>	ghr_pah_shd.g_old_rec.INFORMATION133	,
309 	p_INFORMATION134_o		=>	ghr_pah_shd.g_old_rec.INFORMATION134	,
310 	p_INFORMATION135_o		=>	ghr_pah_shd.g_old_rec.INFORMATION135	,
311 	p_INFORMATION136_o		=>	ghr_pah_shd.g_old_rec.INFORMATION136	,
312 	p_INFORMATION137_o		=>	ghr_pah_shd.g_old_rec.INFORMATION137	,
313 	p_INFORMATION138_o		=>	ghr_pah_shd.g_old_rec.INFORMATION138	,
314 	p_INFORMATION139_o		=>	ghr_pah_shd.g_old_rec.INFORMATION139	,
315 	p_INFORMATION140_o		=>	ghr_pah_shd.g_old_rec.INFORMATION140	,
316 	p_INFORMATION141_o		=>	ghr_pah_shd.g_old_rec.INFORMATION141	,
317 	p_INFORMATION142_o		=>	ghr_pah_shd.g_old_rec.INFORMATION142	,
318 	p_INFORMATION143_o		=>	ghr_pah_shd.g_old_rec.INFORMATION143	,
319 	p_INFORMATION144_o		=>	ghr_pah_shd.g_old_rec.INFORMATION144	,
320 	p_INFORMATION145_o		=>	ghr_pah_shd.g_old_rec.INFORMATION145	,
321 	p_INFORMATION146_o		=>	ghr_pah_shd.g_old_rec.INFORMATION146	,
322 	p_INFORMATION147_o		=>	ghr_pah_shd.g_old_rec.INFORMATION147	,
323 	p_INFORMATION148_o		=>	ghr_pah_shd.g_old_rec.INFORMATION148	,
324 	p_INFORMATION149_o		=>	ghr_pah_shd.g_old_rec.INFORMATION149	,
325 	p_INFORMATION150_o		=>	ghr_pah_shd.g_old_rec.INFORMATION150	,
326 	p_INFORMATION151_o		=>	ghr_pah_shd.g_old_rec.INFORMATION151	,
327 	p_INFORMATION152_o		=>	ghr_pah_shd.g_old_rec.INFORMATION152	,
328 	p_INFORMATION153_o		=>	ghr_pah_shd.g_old_rec.INFORMATION153	,
329 	p_INFORMATION154_o		=>	ghr_pah_shd.g_old_rec.INFORMATION154	,
330 	p_INFORMATION155_o		=>	ghr_pah_shd.g_old_rec.INFORMATION155	,
331 	p_INFORMATION156_o		=>	ghr_pah_shd.g_old_rec.INFORMATION156	,
332 	p_INFORMATION157_o		=>	ghr_pah_shd.g_old_rec.INFORMATION157	,
333 	p_INFORMATION158_o		=>	ghr_pah_shd.g_old_rec.INFORMATION158	,
334 	p_INFORMATION159_o		=>	ghr_pah_shd.g_old_rec.INFORMATION159	,
335 	p_INFORMATION160_o		=>	ghr_pah_shd.g_old_rec.INFORMATION160	,
336 	p_INFORMATION161_o		=>	ghr_pah_shd.g_old_rec.INFORMATION161	,
337 	p_INFORMATION162_o		=>	ghr_pah_shd.g_old_rec.INFORMATION162	,
338 	p_INFORMATION163_o		=>	ghr_pah_shd.g_old_rec.INFORMATION163	,
339 	p_INFORMATION164_o		=>	ghr_pah_shd.g_old_rec.INFORMATION164	,
340 	p_INFORMATION165_o		=>	ghr_pah_shd.g_old_rec.INFORMATION165	,
341 	p_INFORMATION166_o		=>	ghr_pah_shd.g_old_rec.INFORMATION166	,
342 	p_INFORMATION167_o		=>	ghr_pah_shd.g_old_rec.INFORMATION167	,
343 	p_INFORMATION168_o		=>	ghr_pah_shd.g_old_rec.INFORMATION168	,
344 	p_INFORMATION169_o		=>	ghr_pah_shd.g_old_rec.INFORMATION169	,
345 	p_INFORMATION170_o		=>	ghr_pah_shd.g_old_rec.INFORMATION170	,
346 	p_INFORMATION171_o		=>	ghr_pah_shd.g_old_rec.INFORMATION171	,
347 	p_INFORMATION172_o		=>	ghr_pah_shd.g_old_rec.INFORMATION172	,
348 	p_INFORMATION173_o		=>	ghr_pah_shd.g_old_rec.INFORMATION173	,
349 	p_INFORMATION174_o		=>	ghr_pah_shd.g_old_rec.INFORMATION174	,
350 	p_INFORMATION175_o		=>	ghr_pah_shd.g_old_rec.INFORMATION175	,
351 	p_INFORMATION176_o		=>	ghr_pah_shd.g_old_rec.INFORMATION176	,
352 	p_INFORMATION177_o		=>	ghr_pah_shd.g_old_rec.INFORMATION177	,
353 	p_INFORMATION178_o		=>	ghr_pah_shd.g_old_rec.INFORMATION178	,
354 	p_INFORMATION179_o		=>	ghr_pah_shd.g_old_rec.INFORMATION179	,
355 	p_INFORMATION180_o		=>	ghr_pah_shd.g_old_rec.INFORMATION180	,
356 	p_INFORMATION181_o		=>	ghr_pah_shd.g_old_rec.INFORMATION181	,
357 	p_INFORMATION182_o		=>	ghr_pah_shd.g_old_rec.INFORMATION182	,
358 	p_INFORMATION183_o		=>	ghr_pah_shd.g_old_rec.INFORMATION183	,
359 	p_INFORMATION184_o		=>	ghr_pah_shd.g_old_rec.INFORMATION184	,
360 	p_INFORMATION185_o		=>	ghr_pah_shd.g_old_rec.INFORMATION185	,
361 	p_INFORMATION186_o		=>	ghr_pah_shd.g_old_rec.INFORMATION186	,
362 	p_INFORMATION187_o		=>	ghr_pah_shd.g_old_rec.INFORMATION187	,
363 	p_INFORMATION188_o		=>	ghr_pah_shd.g_old_rec.INFORMATION188	,
364 	p_INFORMATION189_o		=>	ghr_pah_shd.g_old_rec.INFORMATION189	,
365 	p_INFORMATION190_o		=>	ghr_pah_shd.g_old_rec.INFORMATION190	,
366 	p_INFORMATION191_o		=>	ghr_pah_shd.g_old_rec.INFORMATION191	,
367 	p_INFORMATION192_o		=>	ghr_pah_shd.g_old_rec.INFORMATION192	,
368 	p_INFORMATION193_o		=>	ghr_pah_shd.g_old_rec.INFORMATION193	,
369 	p_INFORMATION194_o		=>	ghr_pah_shd.g_old_rec.INFORMATION194	,
370 	p_INFORMATION195_o		=>	ghr_pah_shd.g_old_rec.INFORMATION195	,
371 	p_INFORMATION196_o		=>	ghr_pah_shd.g_old_rec.INFORMATION196	,
372 	p_INFORMATION197_o		=>	ghr_pah_shd.g_old_rec.INFORMATION197	,
373 	p_INFORMATION198_o		=>	ghr_pah_shd.g_old_rec.INFORMATION198	,
374 	p_INFORMATION199_o		=>	ghr_pah_shd.g_old_rec.INFORMATION199	,
375 	p_INFORMATION200_o		=>	ghr_pah_shd.g_old_rec.INFORMATION200
376 	);
377      exception
378         when hr_api.cannot_find_prog_unit then
379              hr_api.cannot_find_prog_unit_error
380 		 (	p_module_name => 'GHR_PA_HISTORY'
381 			,p_hook_type  => 'AD'
382 	        );
383   end;
384   -- End of API User Hook for post_delete.
385   hr_utility.set_location(' Leaving:'||l_proc, 10);
386 End post_delete;
387 --
388 -- ----------------------------------------------------------------------------
389 -- |---------------------------------< del >----------------------------------|
390 -- ----------------------------------------------------------------------------
391 Procedure del
392   (
393   p_rec	      in ghr_pah_shd.g_rec_type
394   ) is
395 --
396   l_proc  varchar2(72) := g_package||'del';
397 --
398 Begin
399   hr_utility.set_location('Entering:'||l_proc, 5);
400   --
401   -- We must lock the row which we need to delete.
402   --
403   ghr_pah_shd.lck
404 	(
405 	p_rec.pa_history_id
406 	);
407   --
408   -- Call the supporting delete validate operation
409   --
410   ghr_pah_bus.delete_validate(p_rec);
411   --
412   -- Call the supporting pre-delete operation
413   --
414   pre_delete(p_rec);
415   --
416   -- Delete the row.
417   --
418   delete_dml(p_rec);
419   --
420   -- Call the supporting post-delete operation
421   --
422   post_delete(p_rec);
423 End del;
424 --
425 -- ----------------------------------------------------------------------------
426 -- |---------------------------------< del >----------------------------------|
427 -- ----------------------------------------------------------------------------
428 Procedure del
429   (
430   p_pa_history_id                      in number
431   ) is
432 --
433   l_rec	  ghr_pah_shd.g_rec_type;
434   l_proc  varchar2(72) := g_package||'del';
435 --
436 Begin
437   hr_utility.set_location('Entering:'||l_proc, 5);
438   --
439   -- As the delete procedure accepts a plsql record structure we do need to
440   -- convert the  arguments into the record structure.
441   -- We don't need to call the supplied conversion argument routine as we
442   -- only need a few attributes.
443   --
444   l_rec.pa_history_id:= p_pa_history_id;
445   --
446   --
447   -- Having converted the arguments into the ghr_pah_rec
448   -- plsql record structure we must call the corresponding entity
449   -- business process
450   --
451   del(l_rec);
452   --
453   hr_utility.set_location(' Leaving:'||l_proc, 10);
454 End del;
455 --
456 end ghr_pah_del;