[Home] [Help]
PACKAGE BODY: APPS.BEN_QUA_IN_GR_RT_API
Source
1 Package Body ben_QUA_IN_GR_RT_api as
2 /* $Header: beqigapi.pkb 115.1 2002/12/11 11:31:46 lakrish noship $ */
3 --
4 -- Package Variables
5 --
6 g_package varchar2(33) := ' ben_QUA_IN_GR_RT_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_QUA_IN_GR_RT >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_qua_in_gr_rt
13 (p_validate in boolean default false
14 ,p_qua_in_gr_rt_id out nocopy number
15 ,p_effective_start_date out nocopy date
16 ,p_effective_end_date out nocopy date
17 ,p_ordr_num in number default null
18 ,p_excld_flag in varchar2 default null
19 ,p_quar_in_grade_cd in varchar2 default null
20 ,p_vrbl_rt_prfl_id in number default null
21 ,p_business_group_id in number default null
22 ,p_qig_attribute_category in varchar2 default null
23 ,p_qig_attribute1 in varchar2 default null
24 ,p_qig_attribute2 in varchar2 default null
25 ,p_qig_attribute3 in varchar2 default null
26 ,p_qig_attribute4 in varchar2 default null
27 ,p_qig_attribute5 in varchar2 default null
28 ,p_qig_attribute6 in varchar2 default null
29 ,p_qig_attribute7 in varchar2 default null
30 ,p_qig_attribute8 in varchar2 default null
31 ,p_qig_attribute9 in varchar2 default null
32 ,p_qig_attribute10 in varchar2 default null
33 ,p_qig_attribute11 in varchar2 default null
34 ,p_qig_attribute12 in varchar2 default null
35 ,p_qig_attribute13 in varchar2 default null
36 ,p_qig_attribute14 in varchar2 default null
37 ,p_qig_attribute15 in varchar2 default null
38 ,p_qig_attribute16 in varchar2 default null
39 ,p_qig_attribute17 in varchar2 default null
40 ,p_qig_attribute18 in varchar2 default null
41 ,p_qig_attribute19 in varchar2 default null
42 ,p_qig_attribute20 in varchar2 default null
43 ,p_qig_attribute21 in varchar2 default null
44 ,p_qig_attribute22 in varchar2 default null
45 ,p_qig_attribute23 in varchar2 default null
46 ,p_qig_attribute24 in varchar2 default null
47 ,p_qig_attribute25 in varchar2 default null
48 ,p_qig_attribute26 in varchar2 default null
49 ,p_qig_attribute27 in varchar2 default null
50 ,p_qig_attribute28 in varchar2 default null
51 ,p_qig_attribute29 in varchar2 default null
52 ,p_qig_attribute30 in varchar2 default null
53 ,p_object_version_number out nocopy number
54 ,p_effective_date in date
55 ) is
56 --
57 -- Declare cursors and local variables
58 --
59 l_qua_in_gr_rt_id ben_qua_in_gr_rt_f.qua_in_gr_rt_id%TYPE;
60 l_effective_start_date ben_qua_in_gr_rt_f.effective_start_date%TYPE;
61 l_effective_end_date ben_qua_in_gr_rt_f.effective_end_date%TYPE;
62 l_proc varchar2(72) := g_package||'create_QUA_IN_GR_RT';
63 l_object_version_number ben_qua_in_gr_rt_f.object_version_number%TYPE;
64 --
65 begin
66 --
67 hr_utility.set_location('Entering:'|| l_proc, 10);
68 --
69 -- Issue a savepoint if operating in validation only mode
70 --
71 savepoint create_QUA_IN_GR_RT;
72 --
73 hr_utility.set_location(l_proc, 20);
74 --
75 -- Process Logic
76 --
77 begin
78 --
79 -- Start of API User Hook for the before hook of create_QUA_IN_GR_RT
80 --
81 ben_QUA_IN_GR_RT_bk1.create_QUA_IN_GR_RT_b
82 (
83 p_ordr_num => p_ordr_num
84 ,p_excld_flag => p_excld_flag
85 ,p_quar_in_grade_cd => p_quar_in_grade_cd
86 ,p_vrbl_rt_prfl_id => p_vrbl_rt_prfl_id
87 ,p_business_group_id => p_business_group_id
88 ,p_qig_attribute_category => p_qig_attribute_category
89 ,p_qig_attribute1 => p_qig_attribute1
90 ,p_qig_attribute2 => p_qig_attribute2
91 ,p_qig_attribute3 => p_qig_attribute3
92 ,p_qig_attribute4 => p_qig_attribute4
93 ,p_qig_attribute5 => p_qig_attribute5
94 ,p_qig_attribute6 => p_qig_attribute6
95 ,p_qig_attribute7 => p_qig_attribute7
96 ,p_qig_attribute8 => p_qig_attribute8
97 ,p_qig_attribute9 => p_qig_attribute9
98 ,p_qig_attribute10 => p_qig_attribute10
99 ,p_qig_attribute11 => p_qig_attribute11
100 ,p_qig_attribute12 => p_qig_attribute12
101 ,p_qig_attribute13 => p_qig_attribute13
102 ,p_qig_attribute14 => p_qig_attribute14
103 ,p_qig_attribute15 => p_qig_attribute15
104 ,p_qig_attribute16 => p_qig_attribute16
105 ,p_qig_attribute17 => p_qig_attribute17
106 ,p_qig_attribute18 => p_qig_attribute18
107 ,p_qig_attribute19 => p_qig_attribute19
108 ,p_qig_attribute20 => p_qig_attribute20
109 ,p_qig_attribute21 => p_qig_attribute21
110 ,p_qig_attribute22 => p_qig_attribute22
111 ,p_qig_attribute23 => p_qig_attribute23
112 ,p_qig_attribute24 => p_qig_attribute24
113 ,p_qig_attribute25 => p_qig_attribute25
114 ,p_qig_attribute26 => p_qig_attribute26
115 ,p_qig_attribute27 => p_qig_attribute27
116 ,p_qig_attribute28 => p_qig_attribute28
117 ,p_qig_attribute29 => p_qig_attribute29
118 ,p_qig_attribute30 => p_qig_attribute30
119 ,p_effective_date => trunc(p_effective_date)
120 );
121 exception
122 when hr_api.cannot_find_prog_unit then
123 hr_api.cannot_find_prog_unit_error
124 (
125 p_module_name => 'CREATE_QUA_IN_GR_RT'
126 ,p_hook_type => 'BP'
127 );
128 --
129 -- End of API User Hook for the before hook of create_QUA_IN_GR_RT
130 --
131 end;
132 --
133 ben_qig_ins.ins
134 (
135 p_qua_in_gr_rt_id => l_qua_in_gr_rt_id
136 ,p_effective_start_date => l_effective_start_date
137 ,p_effective_end_date => l_effective_end_date
138 ,p_ordr_num => p_ordr_num
139 ,p_excld_flag => p_excld_flag
140 ,p_quar_in_grade_cd => p_quar_in_grade_cd
141 ,p_vrbl_rt_prfl_id => p_vrbl_rt_prfl_id
142 ,p_business_group_id => p_business_group_id
143 ,p_qig_attribute_category => p_qig_attribute_category
144 ,p_qig_attribute1 => p_qig_attribute1
145 ,p_qig_attribute2 => p_qig_attribute2
146 ,p_qig_attribute3 => p_qig_attribute3
147 ,p_qig_attribute4 => p_qig_attribute4
148 ,p_qig_attribute5 => p_qig_attribute5
149 ,p_qig_attribute6 => p_qig_attribute6
150 ,p_qig_attribute7 => p_qig_attribute7
151 ,p_qig_attribute8 => p_qig_attribute8
152 ,p_qig_attribute9 => p_qig_attribute9
153 ,p_qig_attribute10 => p_qig_attribute10
154 ,p_qig_attribute11 => p_qig_attribute11
155 ,p_qig_attribute12 => p_qig_attribute12
156 ,p_qig_attribute13 => p_qig_attribute13
157 ,p_qig_attribute14 => p_qig_attribute14
158 ,p_qig_attribute15 => p_qig_attribute15
159 ,p_qig_attribute16 => p_qig_attribute16
160 ,p_qig_attribute17 => p_qig_attribute17
161 ,p_qig_attribute18 => p_qig_attribute18
162 ,p_qig_attribute19 => p_qig_attribute19
163 ,p_qig_attribute20 => p_qig_attribute20
164 ,p_qig_attribute21 => p_qig_attribute21
165 ,p_qig_attribute22 => p_qig_attribute22
166 ,p_qig_attribute23 => p_qig_attribute23
167 ,p_qig_attribute24 => p_qig_attribute24
168 ,p_qig_attribute25 => p_qig_attribute25
169 ,p_qig_attribute26 => p_qig_attribute26
170 ,p_qig_attribute27 => p_qig_attribute27
171 ,p_qig_attribute28 => p_qig_attribute28
172 ,p_qig_attribute29 => p_qig_attribute29
173 ,p_qig_attribute30 => p_qig_attribute30
174 ,p_object_version_number => l_object_version_number
175 ,p_effective_date => trunc(p_effective_date)
176 );
177 --
178 begin
179 --
180 -- Start of API User Hook for the after hook of create_QUA_IN_GR_RT
181 --
182 ben_QUA_IN_GR_RT_bk1.create_QUA_IN_GR_RT_a
183 (
184 p_qua_in_gr_rt_id => l_qua_in_gr_rt_id
185 ,p_effective_start_date => l_effective_start_date
186 ,p_effective_end_date => l_effective_end_date
187 ,p_ordr_num => p_ordr_num
188 ,p_excld_flag => p_excld_flag
189 ,p_quar_in_grade_cd => p_quar_in_grade_cd
190 ,p_vrbl_rt_prfl_id => p_vrbl_rt_prfl_id
191 ,p_business_group_id => p_business_group_id
192 ,p_qig_attribute_category => p_qig_attribute_category
193 ,p_qig_attribute1 => p_qig_attribute1
194 ,p_qig_attribute2 => p_qig_attribute2
195 ,p_qig_attribute3 => p_qig_attribute3
196 ,p_qig_attribute4 => p_qig_attribute4
197 ,p_qig_attribute5 => p_qig_attribute5
198 ,p_qig_attribute6 => p_qig_attribute6
199 ,p_qig_attribute7 => p_qig_attribute7
200 ,p_qig_attribute8 => p_qig_attribute8
201 ,p_qig_attribute9 => p_qig_attribute9
202 ,p_qig_attribute10 => p_qig_attribute10
203 ,p_qig_attribute11 => p_qig_attribute11
204 ,p_qig_attribute12 => p_qig_attribute12
205 ,p_qig_attribute13 => p_qig_attribute13
206 ,p_qig_attribute14 => p_qig_attribute14
207 ,p_qig_attribute15 => p_qig_attribute15
208 ,p_qig_attribute16 => p_qig_attribute16
209 ,p_qig_attribute17 => p_qig_attribute17
210 ,p_qig_attribute18 => p_qig_attribute18
211 ,p_qig_attribute19 => p_qig_attribute19
212 ,p_qig_attribute20 => p_qig_attribute20
213 ,p_qig_attribute21 => p_qig_attribute21
214 ,p_qig_attribute22 => p_qig_attribute22
215 ,p_qig_attribute23 => p_qig_attribute23
216 ,p_qig_attribute24 => p_qig_attribute24
217 ,p_qig_attribute25 => p_qig_attribute25
218 ,p_qig_attribute26 => p_qig_attribute26
219 ,p_qig_attribute27 => p_qig_attribute27
220 ,p_qig_attribute28 => p_qig_attribute28
221 ,p_qig_attribute29 => p_qig_attribute29
222 ,p_qig_attribute30 => p_qig_attribute30
223 ,p_object_version_number => l_object_version_number
224 ,p_effective_date => trunc(p_effective_date)
225 );
226 exception
227 when hr_api.cannot_find_prog_unit then
228 hr_api.cannot_find_prog_unit_error
229 (p_module_name => 'CREATE_QUA_IN_GR_RT'
230 ,p_hook_type => 'AP'
231 );
232 --
233 -- End of API User Hook for the after hook of create_QUA_IN_GR_RT
234 --
235 end;
236 --
237
238 ben_profile_handler.event_handler
239 (p_event => 'CREATE',
240 p_base_table => 'BEN_VRBL_RT_PRFL_F',
241 p_base_table_column => 'VRBL_RT_PRFL_ID',
242 p_base_table_column_value => p_vrbl_rt_prfl_id,
243 p_base_table_reference_column => 'RT_QUA_IN_GR_FLAG',
244 p_reference_table => 'BEN_QUA_IN_GR_RT_F',
245 p_reference_table_column => 'VRBL_RT_PRFL_ID');
246 --
247 hr_utility.set_location(l_proc, 60);
248 --
249 -- When in validation only mode raise the Validate_Enabled exception
250 --
251 if p_validate then
252 raise hr_api.validate_enabled;
253 end if;
254 --
255 -- Set all output arguments
256 --
257 p_qua_in_gr_rt_id := l_qua_in_gr_rt_id;
258 p_effective_start_date := l_effective_start_date;
259 p_effective_end_date := l_effective_end_date;
260 p_object_version_number := l_object_version_number;
261 --
262 hr_utility.set_location(' Leaving:'||l_proc, 70);
263 --
264 exception
265 --
266 when hr_api.validate_enabled then
267 --
268 -- As the Validate_Enabled exception has been raised
269 -- we must rollback to the savepoint
270 --
271 ROLLBACK TO create_QUA_IN_GR_RT;
272 --
273 -- Only set output warning arguments
274 -- (Any key or derived arguments must be set to null
275 -- when validation only mode is being used.)
276 --
277 p_qua_in_gr_rt_id := null;
278 p_effective_start_date := null;
279 p_effective_end_date := null;
280 p_object_version_number := null;
281 hr_utility.set_location(' Leaving:'||l_proc, 80);
282 --
283 when others then
284 --
285 -- A validation or unexpected error has occured
286 --
287 ROLLBACK TO create_QUA_IN_GR_RT;
288
289 -- NOCOPY, Reset out parameters
290 p_qua_in_gr_rt_id := null;
291 p_effective_start_date := null;
292 p_effective_end_date := null;
293 p_object_version_number := null;
294
295 raise;
296 --
297 end create_QUA_IN_GR_RT;
298 -- ----------------------------------------------------------------------------
299 -- |------------------------< update_QUA_IN_GR_RT >--- ------------------|
300 -- ----------------------------------------------------------------------------
301 --
302 procedure update_QUA_IN_GR_RT
303 (p_validate in boolean default false
304 ,p_qua_in_gr_rt_id in number
305 ,p_effective_start_date out nocopy date
306 ,p_effective_end_date out nocopy date
307 ,p_ordr_num in number default hr_api.g_number
308 ,p_excld_flag in varchar2 default hr_api.g_varchar2
309 ,p_quar_in_grade_cd in varchar2 default hr_api.g_varchar2
310 ,p_vrbl_rt_prfl_id in number default hr_api.g_number
311 ,p_business_group_id in number default hr_api.g_number
312 ,p_qig_attribute_category in varchar2 default hr_api.g_varchar2
313 ,p_qig_attribute1 in varchar2 default hr_api.g_varchar2
314 ,p_qig_attribute2 in varchar2 default hr_api.g_varchar2
315 ,p_qig_attribute3 in varchar2 default hr_api.g_varchar2
316 ,p_qig_attribute4 in varchar2 default hr_api.g_varchar2
317 ,p_qig_attribute5 in varchar2 default hr_api.g_varchar2
318 ,p_qig_attribute6 in varchar2 default hr_api.g_varchar2
319 ,p_qig_attribute7 in varchar2 default hr_api.g_varchar2
320 ,p_qig_attribute8 in varchar2 default hr_api.g_varchar2
321 ,p_qig_attribute9 in varchar2 default hr_api.g_varchar2
322 ,p_qig_attribute10 in varchar2 default hr_api.g_varchar2
323 ,p_qig_attribute11 in varchar2 default hr_api.g_varchar2
324 ,p_qig_attribute12 in varchar2 default hr_api.g_varchar2
325 ,p_qig_attribute13 in varchar2 default hr_api.g_varchar2
326 ,p_qig_attribute14 in varchar2 default hr_api.g_varchar2
327 ,p_qig_attribute15 in varchar2 default hr_api.g_varchar2
328 ,p_qig_attribute16 in varchar2 default hr_api.g_varchar2
329 ,p_qig_attribute17 in varchar2 default hr_api.g_varchar2
330 ,p_qig_attribute18 in varchar2 default hr_api.g_varchar2
331 ,p_qig_attribute19 in varchar2 default hr_api.g_varchar2
332 ,p_qig_attribute20 in varchar2 default hr_api.g_varchar2
333 ,p_qig_attribute21 in varchar2 default hr_api.g_varchar2
334 ,p_qig_attribute22 in varchar2 default hr_api.g_varchar2
335 ,p_qig_attribute23 in varchar2 default hr_api.g_varchar2
336 ,p_qig_attribute24 in varchar2 default hr_api.g_varchar2
337 ,p_qig_attribute25 in varchar2 default hr_api.g_varchar2
338 ,p_qig_attribute26 in varchar2 default hr_api.g_varchar2
339 ,p_qig_attribute27 in varchar2 default hr_api.g_varchar2
340 ,p_qig_attribute28 in varchar2 default hr_api.g_varchar2
341 ,p_qig_attribute29 in varchar2 default hr_api.g_varchar2
342 ,p_qig_attribute30 in varchar2 default hr_api.g_varchar2
343 ,p_object_version_number in out nocopy number
344 ,p_effective_date in date
345 ,p_datetrack_mode in varchar2
346 ) is
347 --
348 -- Declare cursors and local variables
349 --
350 l_proc varchar2(72) := g_package||'update_QUA_IN_GR_RT';
351 l_object_version_number ben_qua_in_gr_rt_f.object_version_number%TYPE;
352 l_effective_start_date ben_qua_in_gr_rt_f.effective_start_date%TYPE;
353 l_effective_end_date ben_qua_in_gr_rt_f.effective_end_date%TYPE;
354 --
355 begin
356 --
357 hr_utility.set_location('Entering:'|| l_proc, 10);
358 --
359 -- Issue a savepoint if operating in validation only mode
360 --
361 savepoint update_QUA_IN_GR_RT;
362 --
363 hr_utility.set_location(l_proc, 20);
364 --
365 -- Process Logic
366 --
367 l_object_version_number := p_object_version_number;
368 --
369 begin
370 --
371 -- Start of API User Hook for the before hook of update_QUA_IN_GR_RT
372 --
373 ben_QUA_IN_GR_RT_bk2.update_QUA_IN_GR_RT_b
374 (
375 p_qua_in_gr_rt_id => p_qua_in_gr_rt_id
376 ,p_ordr_num => p_ordr_num
377 ,p_excld_flag => p_excld_flag
378 ,p_quar_in_grade_cd => p_quar_in_grade_cd
379 ,p_vrbl_rt_prfl_id => p_vrbl_rt_prfl_id
380 ,p_business_group_id => p_business_group_id
381 ,p_qig_attribute_category => p_qig_attribute_category
382 ,p_qig_attribute1 => p_qig_attribute1
383 ,p_qig_attribute2 => p_qig_attribute2
384 ,p_qig_attribute3 => p_qig_attribute3
385 ,p_qig_attribute4 => p_qig_attribute4
386 ,p_qig_attribute5 => p_qig_attribute5
387 ,p_qig_attribute6 => p_qig_attribute6
388 ,p_qig_attribute7 => p_qig_attribute7
389 ,p_qig_attribute8 => p_qig_attribute8
390 ,p_qig_attribute9 => p_qig_attribute9
391 ,p_qig_attribute10 => p_qig_attribute10
392 ,p_qig_attribute11 => p_qig_attribute11
393 ,p_qig_attribute12 => p_qig_attribute12
394 ,p_qig_attribute13 => p_qig_attribute13
395 ,p_qig_attribute14 => p_qig_attribute14
396 ,p_qig_attribute15 => p_qig_attribute15
397 ,p_qig_attribute16 => p_qig_attribute16
398 ,p_qig_attribute17 => p_qig_attribute17
399 ,p_qig_attribute18 => p_qig_attribute18
400 ,p_qig_attribute19 => p_qig_attribute19
401 ,p_qig_attribute20 => p_qig_attribute20
402 ,p_qig_attribute21 => p_qig_attribute21
403 ,p_qig_attribute22 => p_qig_attribute22
404 ,p_qig_attribute23 => p_qig_attribute23
405 ,p_qig_attribute24 => p_qig_attribute24
406 ,p_qig_attribute25 => p_qig_attribute25
407 ,p_qig_attribute26 => p_qig_attribute26
408 ,p_qig_attribute27 => p_qig_attribute27
409 ,p_qig_attribute28 => p_qig_attribute28
410 ,p_qig_attribute29 => p_qig_attribute29
411 ,p_qig_attribute30 => p_qig_attribute30
412 ,p_object_version_number => p_object_version_number
413 ,p_effective_date => trunc(p_effective_date)
414 ,p_datetrack_mode => p_datetrack_mode
415 );
416 exception
417 when hr_api.cannot_find_prog_unit then
418 hr_api.cannot_find_prog_unit_error
419 (p_module_name => 'UPDATE_QUA_IN_GR_RT'
420 ,p_hook_type => 'BP'
421 );
422 --
423 -- End of API User Hook for the before hook of update_QUA_IN_GR_RT
424 --
425 end;
426 --
427 ben_qig_upd.upd
428 (
429 p_qua_in_gr_rt_id => p_qua_in_gr_rt_id
430 ,p_effective_start_date => l_effective_start_date
431 ,p_effective_end_date => l_effective_end_date
432 ,p_ordr_num => p_ordr_num
433 ,p_excld_flag => p_excld_flag
434 ,p_quar_in_grade_cd => p_quar_in_grade_cd
435 ,p_vrbl_rt_prfl_id => p_vrbl_rt_prfl_id
436 ,p_business_group_id => p_business_group_id
437 ,p_qig_attribute_category => p_qig_attribute_category
438 ,p_qig_attribute1 => p_qig_attribute1
439 ,p_qig_attribute2 => p_qig_attribute2
440 ,p_qig_attribute3 => p_qig_attribute3
441 ,p_qig_attribute4 => p_qig_attribute4
442 ,p_qig_attribute5 => p_qig_attribute5
443 ,p_qig_attribute6 => p_qig_attribute6
444 ,p_qig_attribute7 => p_qig_attribute7
445 ,p_qig_attribute8 => p_qig_attribute8
446 ,p_qig_attribute9 => p_qig_attribute9
447 ,p_qig_attribute10 => p_qig_attribute10
448 ,p_qig_attribute11 => p_qig_attribute11
449 ,p_qig_attribute12 => p_qig_attribute12
450 ,p_qig_attribute13 => p_qig_attribute13
451 ,p_qig_attribute14 => p_qig_attribute14
452 ,p_qig_attribute15 => p_qig_attribute15
453 ,p_qig_attribute16 => p_qig_attribute16
454 ,p_qig_attribute17 => p_qig_attribute17
455 ,p_qig_attribute18 => p_qig_attribute18
456 ,p_qig_attribute19 => p_qig_attribute19
457 ,p_qig_attribute20 => p_qig_attribute20
458 ,p_qig_attribute21 => p_qig_attribute21
459 ,p_qig_attribute22 => p_qig_attribute22
460 ,p_qig_attribute23 => p_qig_attribute23
461 ,p_qig_attribute24 => p_qig_attribute24
462 ,p_qig_attribute25 => p_qig_attribute25
463 ,p_qig_attribute26 => p_qig_attribute26
464 ,p_qig_attribute27 => p_qig_attribute27
465 ,p_qig_attribute28 => p_qig_attribute28
466 ,p_qig_attribute29 => p_qig_attribute29
467 ,p_qig_attribute30 => p_qig_attribute30
468 ,p_object_version_number => l_object_version_number
469 ,p_effective_date => trunc(p_effective_date)
470 ,p_datetrack_mode => p_datetrack_mode
471 );
472 --
473 begin
474 --
475 -- Start of API User Hook for the after hook of update_QUA_IN_GR_RT
476 --
477 ben_QUA_IN_GR_RT_bk2.update_QUA_IN_GR_RT_a
478 (
479 p_qua_in_gr_rt_id => p_qua_in_gr_rt_id
480 ,p_effective_start_date => l_effective_start_date
481 ,p_effective_end_date => l_effective_end_date
482 ,p_ordr_num => p_ordr_num
483 ,p_excld_flag => p_excld_flag
484 ,p_quar_in_grade_cd => p_quar_in_grade_cd
485 ,p_vrbl_rt_prfl_id => p_vrbl_rt_prfl_id
486 ,p_business_group_id => p_business_group_id
487 ,p_qig_attribute_category => p_qig_attribute_category
488 ,p_qig_attribute1 => p_qig_attribute1
489 ,p_qig_attribute2 => p_qig_attribute2
490 ,p_qig_attribute3 => p_qig_attribute3
491 ,p_qig_attribute4 => p_qig_attribute4
492 ,p_qig_attribute5 => p_qig_attribute5
493 ,p_qig_attribute6 => p_qig_attribute6
494 ,p_qig_attribute7 => p_qig_attribute7
495 ,p_qig_attribute8 => p_qig_attribute8
496 ,p_qig_attribute9 => p_qig_attribute9
497 ,p_qig_attribute10 => p_qig_attribute10
498 ,p_qig_attribute11 => p_qig_attribute11
499 ,p_qig_attribute12 => p_qig_attribute12
500 ,p_qig_attribute13 => p_qig_attribute13
501 ,p_qig_attribute14 => p_qig_attribute14
502 ,p_qig_attribute15 => p_qig_attribute15
503 ,p_qig_attribute16 => p_qig_attribute16
504 ,p_qig_attribute17 => p_qig_attribute17
505 ,p_qig_attribute18 => p_qig_attribute18
506 ,p_qig_attribute19 => p_qig_attribute19
507 ,p_qig_attribute20 => p_qig_attribute20
508 ,p_qig_attribute21 => p_qig_attribute21
509 ,p_qig_attribute22 => p_qig_attribute22
510 ,p_qig_attribute23 => p_qig_attribute23
511 ,p_qig_attribute24 => p_qig_attribute24
512 ,p_qig_attribute25 => p_qig_attribute25
513 ,p_qig_attribute26 => p_qig_attribute26
514 ,p_qig_attribute27 => p_qig_attribute27
515 ,p_qig_attribute28 => p_qig_attribute28
516 ,p_qig_attribute29 => p_qig_attribute29
517 ,p_qig_attribute30 => p_qig_attribute30
518 ,p_object_version_number => l_object_version_number
519 ,p_effective_date => trunc(p_effective_date)
520 ,p_datetrack_mode => p_datetrack_mode
521 );
522 exception
523 when hr_api.cannot_find_prog_unit then
524 hr_api.cannot_find_prog_unit_error
525 (p_module_name => 'UPDATE_QUA_IN_GR_RT'
526 ,p_hook_type => 'AP'
527 );
528 --
529 -- End of API User Hook for the after hook of update_QUA_IN_GR_RT
530 --
531 end;
532 --
533 hr_utility.set_location(l_proc, 60);
534 --
535 -- When in validation only mode raise the Validate_Enabled exception
536 --
537 if p_validate then
538 raise hr_api.validate_enabled;
539 end if;
540 --
541 -- Set all output arguments
542 --
543 p_object_version_number := l_object_version_number;
544 p_effective_start_date := l_effective_start_date;
545 p_effective_end_date := l_effective_end_date;
546 --
547 hr_utility.set_location(' Leaving:'||l_proc, 70);
548 --
549 exception
550 --
551 when hr_api.validate_enabled then
552 --
553 -- As the Validate_Enabled exception has been raised
554 -- we must rollback to the savepoint
555 --
556 ROLLBACK TO update_QUA_IN_GR_RT;
557 --
558 -- Only set output warning arguments
559 -- (Any key or derived arguments must be set to null
560 -- when validation only mode is being used.)
561 --
562 p_effective_start_date := null;
563 p_effective_end_date := null;
564
565 hr_utility.set_location(' Leaving:'||l_proc, 80);
566 --
567 when others then
568 --
569 -- A validation or unexpected error has occured
570 --
571 ROLLBACK TO update_QUA_IN_GR_RT;
572
573 -- NOCOPY, Reset out parameters
574 p_effective_start_date := null;
575 p_effective_end_date := null;
576
577 raise;
578 --
579 end update_QUA_IN_GR_RT;
580 -- ----------------------------------------------------------------------------
581 -- |------------------------< delete_QUA_IN_GR_RT >----------------------|
582 -- ----------------------------------------------------------------------------
583 --
584 procedure delete_QUA_IN_GR_RT
585 (p_validate in boolean default false
586 ,p_qua_in_gr_rt_id in number
587 ,p_effective_start_date out nocopy date
588 ,p_effective_end_date out nocopy date
589 ,p_object_version_number in out nocopy number
590 ,p_effective_date in date
591 ,p_datetrack_mode in varchar2
592 ) is
593 --
594 -- Declare cursors and local variables
595 --
596 l_proc varchar2(72) := g_package||'update_QUA_IN_GR_RT';
597 l_object_version_number ben_qua_in_gr_rt_f.object_version_number%TYPE;
598 l_effective_start_date ben_qua_in_gr_rt_f.effective_start_date%TYPE;
599 l_effective_end_date ben_qua_in_gr_rt_f.effective_end_date%TYPE;
600 --
601 begin
602 --
603 hr_utility.set_location('Entering:'|| l_proc, 10);
604 --
605 -- Issue a savepoint if operating in validation only mode
606 --
607 savepoint delete_QUA_IN_GR_RT;
608 --
609 hr_utility.set_location(l_proc, 20);
610 --
611 -- Process Logic
612 --
613 l_object_version_number := p_object_version_number;
614 --
615 --
616 begin
617 --
618 -- Start of API User Hook for the before hook of delete_QUA_IN_GR_RT
619 --
620 ben_QUA_IN_GR_RT_bk3.delete_QUA_IN_GR_RT_b
621 (
622 p_qua_in_gr_rt_id => p_qua_in_gr_rt_id
623 ,p_object_version_number => p_object_version_number
624 ,p_effective_date => trunc(p_effective_date)
625 ,p_datetrack_mode => p_datetrack_mode
626 );
627 exception
628 when hr_api.cannot_find_prog_unit then
629 hr_api.cannot_find_prog_unit_error
630 (p_module_name => 'DELETE_QUA_IN_GR_RT'
631 ,p_hook_type => 'BP'
632 );
633 --
634 -- End of API User Hook for the before hook of delete_QUA_IN_GR_RT
635 --
636 end;
637 --
638 ben_qig_del.del
639 (
640 p_qua_in_gr_rt_id => p_qua_in_gr_rt_id
641 ,p_effective_start_date => l_effective_start_date
642 ,p_effective_end_date => l_effective_end_date
643 ,p_object_version_number => l_object_version_number
644 ,p_effective_date => p_effective_date
645 ,p_datetrack_mode => p_datetrack_mode
646 );
647 --
648 begin
649 --
650 -- Start of API User Hook for the after hook of delete_QUA_IN_GR_RT
651 --
652 ben_QUA_IN_GR_RT_bk3.delete_QUA_IN_GR_RT_a
653 (
654 p_qua_in_gr_rt_id => p_qua_in_gr_rt_id
655 ,p_effective_start_date => l_effective_start_date
656 ,p_effective_end_date => l_effective_end_date
657 ,p_object_version_number => l_object_version_number
658 ,p_effective_date => trunc(p_effective_date)
659 ,p_datetrack_mode => p_datetrack_mode
660 );
661 exception
662 when hr_api.cannot_find_prog_unit then
663 hr_api.cannot_find_prog_unit_error
664 (p_module_name => 'DELETE_QUA_IN_GR_RT'
665 ,p_hook_type => 'AP'
666 );
667 --
668 -- End of API User Hook for the after hook of delete_QUA_IN_GR_RT
669 --
670 end;
671 --
672 ben_profile_handler.event_handler
673 (p_event => 'DELETE',
674 p_base_table => 'BEN_VRBL_RT_PRFL_F',
675 p_base_table_column => 'VRBL_RT_PRFL_ID',
676 p_base_table_column_value => ben_qig_shd.g_old_rec.vrbl_rt_prfl_id,
677 p_base_table_reference_column => 'RT_QUA_IN_GR_FLAG',
678 p_reference_table => 'BEN_QUA_IN_GR_RT_F',
679 p_reference_table_column => 'VRBL_RT_PRFL_ID');
680 --
681 hr_utility.set_location(l_proc, 60);
682 --
683 -- When in validation only mode raise the Validate_Enabled exception
684 --
685 if p_validate then
686 raise hr_api.validate_enabled;
687 end if;
688 --
689 hr_utility.set_location(' Leaving:'||l_proc, 70);
690 --
691 exception
692 --
693 when hr_api.validate_enabled then
694 --
695 -- As the Validate_Enabled exception has been raised
696 -- we must rollback to the savepoint
697 --
698 ROLLBACK TO delete_QUA_IN_GR_RT;
699 --
700 -- Only set output warning arguments
701 -- (Any key or derived arguments must be set to null
702 -- when validation only mode is being used.)
703 --
704 p_effective_start_date := null;
705 p_effective_end_date := null;
706 --
707 when others then
708 --
709 -- A validation or unexpected error has occured
710 --
711 ROLLBACK TO delete_QUA_IN_GR_RT;
712
713 -- NOCOPY, Reset out parameters
714 p_effective_start_date := null;
715 p_effective_end_date := null;
716
717 raise;
718 --
719 end delete_QUA_IN_GR_RT;
720 --
721 -- ----------------------------------------------------------------------------
722 -- |-------------------------------< lck >------------------------------------|
723 -- ----------------------------------------------------------------------------
724 --
725 procedure lck
726 (
727 p_qua_in_gr_rt_id in number
728 ,p_object_version_number in number
729 ,p_effective_date in date
730 ,p_datetrack_mode in varchar2
731 ,p_validation_start_date out nocopy date
732 ,p_validation_end_date out nocopy date
733 ) is
734 --
735 --
736 -- Declare cursors and local variables
737 --
738 l_proc varchar2(72) := g_package||'lck';
739 l_validation_start_date date;
740 l_validation_end_date date;
741 --
742 begin
743 --
744 hr_utility.set_location('Entering:'|| l_proc, 10);
745 --
746 ben_qig_shd.lck
747 (
748 p_qua_in_gr_rt_id => p_qua_in_gr_rt_id
749 ,p_validation_start_date => l_validation_start_date
750 ,p_validation_end_date => l_validation_end_date
751 ,p_object_version_number => p_object_version_number
752 ,p_effective_date => p_effective_date
753 ,p_datetrack_mode => p_datetrack_mode
754 );
755 --
756 hr_utility.set_location(' Leaving:'||l_proc, 70);
757 --
758 end lck;
759 --
760 end ben_QUA_IN_GR_RT_api;