DBA Data[Home] [Help]

PACKAGE BODY: APPS.BEN_LER_RQRS_ENRT_CTFN_API

Source


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