DBA Data[Home] [Help]

PACKAGE BODY: APPS.BEN_PLAN_IN_PROGRAM_API

Source


1 Package Body ben_Plan_in_Program_api as
2 /* $Header: becppapi.pkb 120.0 2005/05/28 01:16:26 appldev noship $ */
3 --
4 -- Package Variables
5 --
6 g_package  varchar2(33) := '  ben_Plan_in_Program_api.';
7 --
8 -- ----------------------------------------------------------------------------
9 -- |------------------------< create_Plan_in_Program >----------------------|
10 -- ----------------------------------------------------------------------------
11 --
12 procedure create_Plan_in_Program
13   (p_validate                       in  boolean   default false
14   ,p_plip_id                        out nocopy number
15   ,p_effective_start_date           out nocopy date
16   ,p_effective_end_date             out nocopy date
17   ,p_dflt_flag                      in  varchar2  default null
18   ,p_plip_stat_cd                   in  varchar2  default null
19   ,p_dflt_enrt_cd                   in  varchar2  default null
20   ,p_dflt_enrt_det_rl               in  number    default null
21   ,p_ordr_num                       in  number    default null
22   ,p_ivr_ident                      in  varchar2  default null
23   ,p_enrt_cd                        in  varchar2  default null
24   ,p_enrt_mthd_cd                   in  varchar2  default null
25   ,p_auto_enrt_mthd_rl              in  number    default null
26   ,p_enrt_rl                        in  number    default null
27   ,p_alws_unrstrctd_enrt_flag       in  varchar2  default 'N'
28   ,p_enrt_cvg_strt_dt_cd            in  varchar2  default null
29   ,p_enrt_cvg_strt_dt_rl            in  number    default null
30   ,p_enrt_cvg_end_dt_cd             in  varchar2  default null
31   ,p_enrt_cvg_end_dt_rl             in  number    default null
32   ,p_rt_strt_dt_cd                  in  varchar2  default null
33   ,p_rt_strt_dt_rl                  in  number    default null
34   ,p_rt_end_dt_cd                   in  varchar2  default null
35   ,p_rt_end_dt_rl                   in  number    default null
36   ,p_drvbl_fctr_apls_rts_flag       in  varchar2  default 'N'
37   ,p_drvbl_fctr_prtn_elig_flag      in  varchar2  default 'N'
38   ,p_elig_apls_flag                 in  varchar2  default 'N'
39   ,p_prtn_elig_ovrid_alwd_flag      in  varchar2  default 'N'
40   ,p_trk_inelig_per_flag            in  varchar2  default 'N'
41   ,p_postelcn_edit_rl               in  number    default null
42   ,p_pgm_id                         in  number    default null
43   ,p_pl_id                          in  number    default null
44   ,p_cmbn_plip_id                   in  number    default null
45   ,p_business_group_id              in  number    default null
46   ,p_per_cvrd_cd                    in  varchar2  default null
47   ,p_short_name                    in  varchar2  default null
48   ,p_short_code                    in  varchar2  default null
49     ,p_legislation_code                    in  varchar2  default null
50     ,p_legislation_subgroup                    in  varchar2  default null
51   ,P_vrfy_fmly_mmbr_rl              in  number    default null
52   ,P_vrfy_fmly_mmbr_cd              in  varchar2  default null
53   ,P_use_csd_rsd_prccng_cd          in  varchar2  default null
54   ,p_cpp_attribute_category         in  varchar2  default null
55   ,p_cpp_attribute1                 in  varchar2  default null
56   ,p_cpp_attribute2                 in  varchar2  default null
57   ,p_cpp_attribute3                 in  varchar2  default null
58   ,p_cpp_attribute4                 in  varchar2  default null
59   ,p_cpp_attribute5                 in  varchar2  default null
60   ,p_cpp_attribute6                 in  varchar2  default null
61   ,p_cpp_attribute7                 in  varchar2  default null
62   ,p_cpp_attribute8                 in  varchar2  default null
63   ,p_cpp_attribute9                 in  varchar2  default null
64   ,p_cpp_attribute10                in  varchar2  default null
65   ,p_cpp_attribute11                in  varchar2  default null
66   ,p_cpp_attribute12                in  varchar2  default null
67   ,p_cpp_attribute13                in  varchar2  default null
68   ,p_cpp_attribute14                in  varchar2  default null
69   ,p_cpp_attribute15                in  varchar2  default null
70   ,p_cpp_attribute16                in  varchar2  default null
71   ,p_cpp_attribute17                in  varchar2  default null
72   ,p_cpp_attribute18                in  varchar2  default null
73   ,p_cpp_attribute19                in  varchar2  default null
74   ,p_cpp_attribute20                in  varchar2  default null
75   ,p_cpp_attribute21                in  varchar2  default null
76   ,p_cpp_attribute22                in  varchar2  default null
77   ,p_cpp_attribute23                in  varchar2  default null
78   ,p_cpp_attribute24                in  varchar2  default null
79   ,p_cpp_attribute25                in  varchar2  default null
80   ,p_cpp_attribute26                in  varchar2  default null
81   ,p_cpp_attribute27                in  varchar2  default null
82   ,p_cpp_attribute28                in  varchar2  default null
83   ,p_cpp_attribute29                in  varchar2  default null
84   ,p_cpp_attribute30                in  varchar2  default null
85   ,p_object_version_number          out nocopy number
86   ,p_url_ref_name                   in  varchar2  default null
87   ,p_dflt_to_asn_pndg_ctfn_cd       in  varchar2  default null
88   ,p_dflt_to_asn_pndg_ctfn_rl       in  number    default null
89   ,p_mn_cvg_amt                     in  number    default null
90   ,p_mn_cvg_rl                      in  number    default null
91   ,p_mx_cvg_alwd_amt                in  number    default null
92   ,p_mx_cvg_incr_alwd_amt           in  number    default null
93   ,p_mx_cvg_incr_wcf_alwd_amt       in  number    default null
94   ,p_mx_cvg_mlt_incr_num            in  number    default null
95   ,p_mx_cvg_mlt_incr_wcf_num        in  number    default null
96   ,p_mx_cvg_rl                      in  number    default null
97   ,p_mx_cvg_wcfn_amt                in  number    default null
98   ,p_mx_cvg_wcfn_mlt_num            in  number    default null
99   ,p_no_mn_cvg_amt_apls_flag        in  varchar2  default 'N'
100   ,p_no_mn_cvg_incr_apls_flag       in  varchar2  default 'N'
101   ,p_no_mx_cvg_amt_apls_flag        in  varchar2  default 'N'
102   ,p_no_mx_cvg_incr_apls_flag       in  varchar2  default 'N'
103   ,p_unsspnd_enrt_cd                in  varchar2  default null
104   ,p_prort_prtl_yr_cvg_rstrn_cd     in  varchar2  default null
105   ,p_prort_prtl_yr_cvg_rstrn_rl     in  number    default null
106   ,p_cvg_incr_r_decr_only_cd        in  varchar2  default null
107   ,p_bnft_or_option_rstrctn_cd      in  varchar2  default null
108   ,p_effective_date                 in  date
109   ) is
110   --
111  -- Declare cursors and local variables
112   --
113   cursor c_cop is
114      select cop.oipl_id
115      from   ben_oipl_f cop
116      where  cop.pl_id = p_pl_id
117      and    cop.business_group_id + 0 = p_business_group_id
118      and    p_effective_date between
119             cop.effective_start_date and cop.effective_end_date;
120   --
121   cursor c_otp is
122     select
123       plip.pgm_id,
124       pl.pl_typ_id,
125       ptip.ptip_id,
126       oipl.opt_id
127     from
128       ben_oipl_f oipl,
129       ben_ptip_f ptip,
130       ben_plip_f plip,
131       ben_pl_f pl
132     where
133         pl.pl_id = p_pl_id
134     and plip.pl_id = pl.pl_id
135     and ptip.pgm_id = p_pgm_id
136     and pl.business_group_id = p_business_group_id
137     and plip.business_group_id = p_business_group_id
138     and oipl.business_group_id = p_business_group_id
139     and plip.pgm_id = ptip.pgm_id
140     and pl.pl_typ_id = ptip.pl_typ_id
141     and pl.pl_id = oipl.pl_id
142     and p_effective_date between  plip.effective_start_date and  plip.effective_end_date
143     and p_effective_date between   pl.effective_start_date and   pl.effective_end_date
144     and p_effective_date between ptip.effective_start_date and ptip.effective_end_date
145     and p_effective_date between oipl.effective_start_date and oipl.effective_end_date ;
146 
147 
148   l_plip_id ben_plip_f.plip_id%TYPE;
149   l_effective_start_date ben_plip_f.effective_start_date%TYPE;
150   l_effective_end_date ben_plip_f.effective_end_date%TYPE;
151   l_proc varchar2(72) := g_package||'create_Plan_in_Program';
152   l_object_version_number ben_plip_f.object_version_number%TYPE;
153   --
154   l_oiplip_id                 ben_oiplip_f.oiplip_id%type;
155   l_opp_effective_start_date  ben_oiplip_f.effective_start_date%type;
156   l_opp_effective_end_date    ben_oiplip_f.effective_end_date%type;
157   l_opp_object_version_number ben_oiplip_f.object_version_number%type;
158   --
159   -- ben_optip_f
160   l_optip_id                  ben_optip_f.optip_id%type;
161   l_otp_effective_start_date  ben_optip_f.effective_start_date%type;
162   l_otp_effective_end_date    ben_optip_f.effective_end_date%type;
163   l_otp_object_version_number ben_optip_f.object_version_number%type;
164 
165 
166   --
167 begin
168   --
169   hr_utility.set_location('Entering:'|| l_proc, 10);
170   --
171   -- Issue a savepoint if operating in validation only mode
172   --
173   savepoint create_Plan_in_Program;
174   --
175   hr_utility.set_location(l_proc, 20);
176   --
177   -- Process Logic
178   --
179   begin
180     --
181     -- Start of API User Hook for the before hook of create_Plan_in_Program
182     --
183     ben_Plan_in_Program_bk1.create_Plan_in_Program_b
184       (
185        p_dflt_flag                      =>  p_dflt_flag
186       ,p_plip_stat_cd                   =>  p_plip_stat_cd
187       ,p_dflt_enrt_cd                   =>  p_dflt_enrt_cd
188       ,p_dflt_enrt_det_rl               =>  p_dflt_enrt_det_rl
189       ,p_ordr_num                       =>  p_ordr_num
190       ,p_ivr_ident                      =>  p_ivr_ident
191       ,p_enrt_cd                        =>  p_enrt_cd
192       ,p_enrt_mthd_cd                   =>  p_enrt_mthd_cd
193       ,p_auto_enrt_mthd_rl              =>  p_auto_enrt_mthd_rl
194       ,p_enrt_rl                        =>  p_enrt_rl
195       ,p_alws_unrstrctd_enrt_flag       =>  p_alws_unrstrctd_enrt_flag
196       ,p_enrt_cvg_strt_dt_cd            =>  p_enrt_cvg_strt_dt_cd
197       ,p_enrt_cvg_strt_dt_rl            =>  p_enrt_cvg_strt_dt_rl
198       ,p_enrt_cvg_end_dt_cd             =>  p_enrt_cvg_end_dt_cd
199       ,p_enrt_cvg_end_dt_rl             =>  p_enrt_cvg_end_dt_rl
200       ,p_rt_strt_dt_cd                  =>  p_rt_strt_dt_cd
201       ,p_rt_strt_dt_rl                  =>  p_rt_strt_dt_rl
202       ,p_rt_end_dt_cd                   =>  p_rt_end_dt_cd
203       ,p_rt_end_dt_rl                   =>  p_rt_end_dt_rl
204       ,p_drvbl_fctr_apls_rts_flag       =>  p_drvbl_fctr_apls_rts_flag
205       ,p_drvbl_fctr_prtn_elig_flag      =>  p_drvbl_fctr_prtn_elig_flag
206       ,p_elig_apls_flag                 =>  p_elig_apls_flag
207       ,p_prtn_elig_ovrid_alwd_flag      =>  p_prtn_elig_ovrid_alwd_flag
208       ,p_trk_inelig_per_flag            =>  p_trk_inelig_per_flag
209       ,p_postelcn_edit_rl               =>  p_postelcn_edit_rl
210       ,p_pgm_id                         =>  p_pgm_id
211       ,p_pl_id                          =>  p_pl_id
212       ,p_cmbn_plip_id                   =>  p_cmbn_plip_id
213       ,p_business_group_id              =>  p_business_group_id
214       ,p_per_cvrd_cd                    =>  p_per_cvrd_cd
215       ,p_short_name                    =>  p_short_name
216       ,p_short_code                    =>  p_short_code
217             ,p_legislation_code                    =>  p_legislation_code
218             ,p_legislation_subgroup                    =>  p_legislation_subgroup
219       ,P_vrfy_fmly_mmbr_rl              =>  P_vrfy_fmly_mmbr_rl
220       ,P_vrfy_fmly_mmbr_cd              =>  P_vrfy_fmly_mmbr_cd
221       ,P_use_csd_rsd_prccng_cd          =>  P_use_csd_rsd_prccng_cd
222       ,p_cpp_attribute_category         =>  p_cpp_attribute_category
223       ,p_cpp_attribute1                 =>  p_cpp_attribute1
224       ,p_cpp_attribute2                 =>  p_cpp_attribute2
225       ,p_cpp_attribute3                 =>  p_cpp_attribute3
226       ,p_cpp_attribute4                 =>  p_cpp_attribute4
227       ,p_cpp_attribute5                 =>  p_cpp_attribute5
228       ,p_cpp_attribute6                 =>  p_cpp_attribute6
229       ,p_cpp_attribute7                 =>  p_cpp_attribute7
230       ,p_cpp_attribute8                 =>  p_cpp_attribute8
231       ,p_cpp_attribute9                 =>  p_cpp_attribute9
232       ,p_cpp_attribute10                =>  p_cpp_attribute10
233       ,p_cpp_attribute11                =>  p_cpp_attribute11
234       ,p_cpp_attribute12                =>  p_cpp_attribute12
235       ,p_cpp_attribute13                =>  p_cpp_attribute13
236       ,p_cpp_attribute14                =>  p_cpp_attribute14
237       ,p_cpp_attribute15                =>  p_cpp_attribute15
238       ,p_cpp_attribute16                =>  p_cpp_attribute16
239       ,p_cpp_attribute17                =>  p_cpp_attribute17
240       ,p_cpp_attribute18                =>  p_cpp_attribute18
241       ,p_cpp_attribute19                =>  p_cpp_attribute19
242       ,p_cpp_attribute20                =>  p_cpp_attribute20
243       ,p_cpp_attribute21                =>  p_cpp_attribute21
244       ,p_cpp_attribute22                =>  p_cpp_attribute22
245       ,p_cpp_attribute23                =>  p_cpp_attribute23
246       ,p_cpp_attribute24                =>  p_cpp_attribute24
247       ,p_cpp_attribute25                =>  p_cpp_attribute25
248       ,p_cpp_attribute26                =>  p_cpp_attribute26
249       ,p_cpp_attribute27                =>  p_cpp_attribute27
250       ,p_cpp_attribute28                =>  p_cpp_attribute28
251       ,p_cpp_attribute29                =>  p_cpp_attribute29
252       ,p_cpp_attribute30                =>  p_cpp_attribute30
253       ,p_url_ref_name                   =>  p_url_ref_name
254       ,p_dflt_to_asn_pndg_ctfn_cd       =>  p_dflt_to_asn_pndg_ctfn_cd
255       ,p_dflt_to_asn_pndg_ctfn_rl       =>  p_dflt_to_asn_pndg_ctfn_rl
256       ,p_mn_cvg_amt                     =>  p_mn_cvg_amt
257       ,p_mn_cvg_rl                      =>  p_mn_cvg_rl
258       ,p_mx_cvg_alwd_amt                =>  p_mx_cvg_alwd_amt
259       ,p_mx_cvg_incr_alwd_amt           =>  p_mx_cvg_incr_alwd_amt
260       ,p_mx_cvg_incr_wcf_alwd_amt       =>  p_mx_cvg_incr_wcf_alwd_amt
261       ,p_mx_cvg_mlt_incr_num            =>  p_mx_cvg_mlt_incr_num
262       ,p_mx_cvg_mlt_incr_wcf_num        =>  p_mx_cvg_mlt_incr_wcf_num
263       ,p_mx_cvg_rl                      =>  p_mx_cvg_rl
264       ,p_mx_cvg_wcfn_amt                =>  p_mx_cvg_wcfn_amt
265       ,p_mx_cvg_wcfn_mlt_num            =>  p_mx_cvg_wcfn_mlt_num
266       ,p_no_mn_cvg_amt_apls_flag        =>  p_no_mn_cvg_amt_apls_flag
267       ,p_no_mn_cvg_incr_apls_flag       =>  p_no_mn_cvg_incr_apls_flag
268       ,p_no_mx_cvg_amt_apls_flag        =>  p_no_mx_cvg_amt_apls_flag
269       ,p_no_mx_cvg_incr_apls_flag       =>  p_no_mx_cvg_incr_apls_flag
270       ,p_unsspnd_enrt_cd                =>  p_unsspnd_enrt_cd
271       ,p_prort_prtl_yr_cvg_rstrn_cd     =>  p_prort_prtl_yr_cvg_rstrn_cd
272       ,p_prort_prtl_yr_cvg_rstrn_rl     =>  p_prort_prtl_yr_cvg_rstrn_rl
273       ,p_cvg_incr_r_decr_only_cd        =>  p_cvg_incr_r_decr_only_cd
274       ,p_bnft_or_option_rstrctn_cd      =>  p_bnft_or_option_rstrctn_cd
275       ,p_effective_date                 => trunc(p_effective_date)
276       );
277   exception
278     when hr_api.cannot_find_prog_unit then
279       hr_api.cannot_find_prog_unit_error
280         (
281          p_module_name => 'CREATE_Plan_in_Program'
282         ,p_hook_type   => 'BP'
283         );
284     --
285     -- End of API User Hook for the before hook of create_Plan_in_Program
286     --
287   end;
288   --
289   BEN_CPP_ins.ins
290     (
291      p_plip_id                       => l_plip_id
292     ,p_effective_start_date          => l_effective_start_date
293     ,p_effective_end_date            => l_effective_end_date
294     ,p_dflt_flag                     => p_dflt_flag
295     ,p_plip_stat_cd                  => p_plip_stat_cd
296     ,p_dflt_enrt_cd                  => p_dflt_enrt_cd
297     ,p_dflt_enrt_det_rl              => p_dflt_enrt_det_rl
298     ,p_ordr_num                      => p_ordr_num
299     ,p_ivr_ident                     => p_ivr_ident
300     ,p_enrt_cd                       => p_enrt_cd
301     ,p_enrt_mthd_cd                  => p_enrt_mthd_cd
302     ,p_auto_enrt_mthd_rl             => p_auto_enrt_mthd_rl
303     ,p_enrt_rl                       => p_enrt_rl
304     ,p_alws_unrstrctd_enrt_flag      => p_alws_unrstrctd_enrt_flag
305     ,p_enrt_cvg_strt_dt_cd           => p_enrt_cvg_strt_dt_cd
306     ,p_enrt_cvg_strt_dt_rl           => p_enrt_cvg_strt_dt_rl
307     ,p_enrt_cvg_end_dt_cd            => p_enrt_cvg_end_dt_cd
308     ,p_enrt_cvg_end_dt_rl            => p_enrt_cvg_end_dt_rl
309     ,p_rt_strt_dt_cd                 => p_rt_strt_dt_cd
310     ,p_rt_strt_dt_rl                 => p_rt_strt_dt_rl
311     ,p_rt_end_dt_cd                  => p_rt_end_dt_cd
312     ,p_rt_end_dt_rl                  => p_rt_end_dt_rl
313     ,p_drvbl_fctr_apls_rts_flag      => p_drvbl_fctr_apls_rts_flag
314     ,p_drvbl_fctr_prtn_elig_flag     => p_drvbl_fctr_prtn_elig_flag
315     ,p_elig_apls_flag                => p_elig_apls_flag
316     ,p_prtn_elig_ovrid_alwd_flag     => p_prtn_elig_ovrid_alwd_flag
317     ,p_trk_inelig_per_flag           => p_trk_inelig_per_flag
318     ,p_postelcn_edit_rl              => p_postelcn_edit_rl
319     ,p_pgm_id                        => p_pgm_id
320     ,p_pl_id                         => p_pl_id
321     ,p_cmbn_plip_id                  => p_cmbn_plip_id
322     ,p_business_group_id             => p_business_group_id
323     ,p_per_cvrd_cd                   => p_per_cvrd_cd
324     ,p_short_name                   => p_short_name
325     ,p_short_code                   => p_short_code
326         ,p_legislation_code                   => p_legislation_code
327         ,p_legislation_subgroup                   => p_legislation_subgroup
328     ,P_vrfy_fmly_mmbr_rl             => P_vrfy_fmly_mmbr_rl
329     ,P_vrfy_fmly_mmbr_cd             => P_vrfy_fmly_mmbr_cd
330     ,P_use_csd_rsd_prccng_cd         => P_use_csd_rsd_prccng_cd
331     ,p_cpp_attribute_category        => p_cpp_attribute_category
332     ,p_cpp_attribute1                => p_cpp_attribute1
333     ,p_cpp_attribute2                => p_cpp_attribute2
334     ,p_cpp_attribute3                => p_cpp_attribute3
335     ,p_cpp_attribute4                => p_cpp_attribute4
336     ,p_cpp_attribute5                => p_cpp_attribute5
337     ,p_cpp_attribute6                => p_cpp_attribute6
338     ,p_cpp_attribute7                => p_cpp_attribute7
339     ,p_cpp_attribute8                => p_cpp_attribute8
340     ,p_cpp_attribute9                => p_cpp_attribute9
341     ,p_cpp_attribute10               => p_cpp_attribute10
342     ,p_cpp_attribute11               => p_cpp_attribute11
343     ,p_cpp_attribute12               => p_cpp_attribute12
344     ,p_cpp_attribute13               => p_cpp_attribute13
345     ,p_cpp_attribute14               => p_cpp_attribute14
346     ,p_cpp_attribute15               => p_cpp_attribute15
347     ,p_cpp_attribute16               => p_cpp_attribute16
348     ,p_cpp_attribute17               => p_cpp_attribute17
349     ,p_cpp_attribute18               => p_cpp_attribute18
350     ,p_cpp_attribute19               => p_cpp_attribute19
351     ,p_cpp_attribute20               => p_cpp_attribute20
352     ,p_cpp_attribute21               => p_cpp_attribute21
353     ,p_cpp_attribute22               => p_cpp_attribute22
354     ,p_cpp_attribute23               => p_cpp_attribute23
355     ,p_cpp_attribute24               => p_cpp_attribute24
356     ,p_cpp_attribute25               => p_cpp_attribute25
357     ,p_cpp_attribute26               => p_cpp_attribute26
358     ,p_cpp_attribute27               => p_cpp_attribute27
359     ,p_cpp_attribute28               => p_cpp_attribute28
360     ,p_cpp_attribute29               => p_cpp_attribute29
361     ,p_cpp_attribute30               => p_cpp_attribute30
362     ,p_object_version_number         => l_object_version_number
363     ,p_url_ref_name                  => p_url_ref_name
364     ,p_dflt_to_asn_pndg_ctfn_cd      => p_dflt_to_asn_pndg_ctfn_cd
365     ,p_dflt_to_asn_pndg_ctfn_rl      => p_dflt_to_asn_pndg_ctfn_rl
366     ,p_mn_cvg_amt                    => p_mn_cvg_amt
367     ,p_mn_cvg_rl                     => p_mn_cvg_rl
368     ,p_mx_cvg_alwd_amt               => p_mx_cvg_alwd_amt
369     ,p_mx_cvg_incr_alwd_amt          => p_mx_cvg_incr_alwd_amt
370     ,p_mx_cvg_incr_wcf_alwd_amt      => p_mx_cvg_incr_wcf_alwd_amt
371     ,p_mx_cvg_mlt_incr_num           => p_mx_cvg_mlt_incr_num
372     ,p_mx_cvg_mlt_incr_wcf_num       => p_mx_cvg_mlt_incr_wcf_num
373     ,p_mx_cvg_rl                     => p_mx_cvg_rl
374     ,p_mx_cvg_wcfn_amt               => p_mx_cvg_wcfn_amt
375     ,p_mx_cvg_wcfn_mlt_num           => p_mx_cvg_wcfn_mlt_num
376     ,p_no_mn_cvg_amt_apls_flag       => p_no_mn_cvg_amt_apls_flag
377     ,p_no_mn_cvg_incr_apls_flag      => p_no_mn_cvg_incr_apls_flag
378     ,p_no_mx_cvg_amt_apls_flag       => p_no_mx_cvg_amt_apls_flag
379     ,p_no_mx_cvg_incr_apls_flag      => p_no_mx_cvg_incr_apls_flag
380     ,p_unsspnd_enrt_cd               => p_unsspnd_enrt_cd
381     ,p_prort_prtl_yr_cvg_rstrn_cd    => p_prort_prtl_yr_cvg_rstrn_cd
382     ,p_prort_prtl_yr_cvg_rstrn_rl    => p_prort_prtl_yr_cvg_rstrn_rl
383     ,p_cvg_incr_r_decr_only_cd       => p_cvg_incr_r_decr_only_cd
384     ,p_bnft_or_option_rstrctn_cd     => p_bnft_or_option_rstrctn_cd
385     ,p_effective_date                => trunc(p_effective_date)
386     );
387   --
388   begin
389     --
390     -- Start of API User Hook for the after hook of create_Plan_in_Program
391     --
392     ben_Plan_in_Program_bk1.create_Plan_in_Program_a
393       (
394        p_plip_id                        =>  l_plip_id
395       ,p_effective_start_date           =>  l_effective_start_date
396       ,p_effective_end_date             =>  l_effective_end_date
397       ,p_dflt_flag                      =>  p_dflt_flag
398       ,p_plip_stat_cd                   =>  p_plip_stat_cd
399       ,p_dflt_enrt_cd                   =>  p_dflt_enrt_cd
400       ,p_dflt_enrt_det_rl               =>  p_dflt_enrt_det_rl
401       ,p_ordr_num                       =>  p_ordr_num
402       ,p_ivr_ident                      =>  p_ivr_ident
403       ,p_enrt_cd                        =>  p_enrt_cd
404       ,p_enrt_mthd_cd                   =>  p_enrt_mthd_cd
405       ,p_auto_enrt_mthd_rl              =>  p_auto_enrt_mthd_rl
406       ,p_enrt_rl                        =>  p_enrt_rl
407       ,p_alws_unrstrctd_enrt_flag       =>  p_alws_unrstrctd_enrt_flag
408       ,p_enrt_cvg_strt_dt_cd            =>  p_enrt_cvg_strt_dt_cd
409       ,p_enrt_cvg_strt_dt_rl            =>  p_enrt_cvg_strt_dt_rl
410       ,p_enrt_cvg_end_dt_cd             =>  p_enrt_cvg_end_dt_cd
411       ,p_enrt_cvg_end_dt_rl             =>  p_enrt_cvg_end_dt_rl
412       ,p_rt_strt_dt_cd                  =>  p_rt_strt_dt_cd
413       ,p_rt_strt_dt_rl                  =>  p_rt_strt_dt_rl
414       ,p_rt_end_dt_cd                   =>  p_rt_end_dt_cd
415       ,p_rt_end_dt_rl                   =>  p_rt_end_dt_rl
416       ,p_drvbl_fctr_apls_rts_flag       =>  p_drvbl_fctr_apls_rts_flag
417       ,p_drvbl_fctr_prtn_elig_flag      =>  p_drvbl_fctr_prtn_elig_flag
418       ,p_elig_apls_flag                 =>  p_elig_apls_flag
419       ,p_prtn_elig_ovrid_alwd_flag      =>  p_prtn_elig_ovrid_alwd_flag
420       ,p_trk_inelig_per_flag            =>  p_trk_inelig_per_flag
421       ,p_postelcn_edit_rl               =>  p_postelcn_edit_rl
422       ,p_pgm_id                         =>  p_pgm_id
423       ,p_pl_id                          =>  p_pl_id
424       ,p_cmbn_plip_id                   =>  p_cmbn_plip_id
425       ,p_business_group_id              =>  p_business_group_id
426       ,p_per_cvrd_cd                    =>  p_per_cvrd_cd
427       ,p_short_name                    =>  p_short_name
428       ,p_short_code                    =>  p_short_code
429             ,p_legislation_code                    =>  p_legislation_code
430             ,p_legislation_subgroup                    =>  p_legislation_subgroup
431       ,P_vrfy_fmly_mmbr_rl              =>  P_vrfy_fmly_mmbr_rl
432       ,P_vrfy_fmly_mmbr_cd              =>  P_vrfy_fmly_mmbr_cd
433       ,P_use_csd_rsd_prccng_cd          =>  P_use_csd_rsd_prccng_cd
434       ,p_cpp_attribute_category         =>  p_cpp_attribute_category
435       ,p_cpp_attribute1                 =>  p_cpp_attribute1
436       ,p_cpp_attribute2                 =>  p_cpp_attribute2
437       ,p_cpp_attribute3                 =>  p_cpp_attribute3
438       ,p_cpp_attribute4                 =>  p_cpp_attribute4
439       ,p_cpp_attribute5                 =>  p_cpp_attribute5
440       ,p_cpp_attribute6                 =>  p_cpp_attribute6
441       ,p_cpp_attribute7                 =>  p_cpp_attribute7
442       ,p_cpp_attribute8                 =>  p_cpp_attribute8
443       ,p_cpp_attribute9                 =>  p_cpp_attribute9
444       ,p_cpp_attribute10                =>  p_cpp_attribute10
445       ,p_cpp_attribute11                =>  p_cpp_attribute11
446       ,p_cpp_attribute12                =>  p_cpp_attribute12
447       ,p_cpp_attribute13                =>  p_cpp_attribute13
448       ,p_cpp_attribute14                =>  p_cpp_attribute14
449       ,p_cpp_attribute15                =>  p_cpp_attribute15
450       ,p_cpp_attribute16                =>  p_cpp_attribute16
451       ,p_cpp_attribute17                =>  p_cpp_attribute17
452       ,p_cpp_attribute18                =>  p_cpp_attribute18
453       ,p_cpp_attribute19                =>  p_cpp_attribute19
454       ,p_cpp_attribute20                =>  p_cpp_attribute20
455       ,p_cpp_attribute21                =>  p_cpp_attribute21
456       ,p_cpp_attribute22                =>  p_cpp_attribute22
457       ,p_cpp_attribute23                =>  p_cpp_attribute23
458       ,p_cpp_attribute24                =>  p_cpp_attribute24
459       ,p_cpp_attribute25                =>  p_cpp_attribute25
460       ,p_cpp_attribute26                =>  p_cpp_attribute26
461       ,p_cpp_attribute27                =>  p_cpp_attribute27
462       ,p_cpp_attribute28                =>  p_cpp_attribute28
463       ,p_cpp_attribute29                =>  p_cpp_attribute29
464       ,p_cpp_attribute30                =>  p_cpp_attribute30
465       ,p_object_version_number          =>  l_object_version_number
466       ,p_url_ref_name                   =>  p_url_ref_name
467       ,p_dflt_to_asn_pndg_ctfn_cd       =>  p_dflt_to_asn_pndg_ctfn_cd
468       ,p_dflt_to_asn_pndg_ctfn_rl       =>  p_dflt_to_asn_pndg_ctfn_rl
469       ,p_mn_cvg_amt                     =>  p_mn_cvg_amt
470       ,p_mn_cvg_rl                      =>  p_mn_cvg_rl
471       ,p_mx_cvg_alwd_amt                =>  p_mx_cvg_alwd_amt
472       ,p_mx_cvg_incr_alwd_amt           =>  p_mx_cvg_incr_alwd_amt
473       ,p_mx_cvg_incr_wcf_alwd_amt       =>  p_mx_cvg_incr_wcf_alwd_amt
474       ,p_mx_cvg_mlt_incr_num            =>  p_mx_cvg_mlt_incr_num
475       ,p_mx_cvg_mlt_incr_wcf_num        =>  p_mx_cvg_mlt_incr_wcf_num
476       ,p_mx_cvg_rl                      =>  p_mx_cvg_rl
477       ,p_mx_cvg_wcfn_amt                =>  p_mx_cvg_wcfn_amt
478       ,p_mx_cvg_wcfn_mlt_num            =>  p_mx_cvg_wcfn_mlt_num
479       ,p_no_mn_cvg_amt_apls_flag        =>  p_no_mn_cvg_amt_apls_flag
480       ,p_no_mn_cvg_incr_apls_flag       =>  p_no_mn_cvg_incr_apls_flag
481       ,p_no_mx_cvg_amt_apls_flag        =>  p_no_mx_cvg_amt_apls_flag
482       ,p_no_mx_cvg_incr_apls_flag       =>  p_no_mx_cvg_incr_apls_flag
483       ,p_unsspnd_enrt_cd                =>  p_unsspnd_enrt_cd
484       ,p_prort_prtl_yr_cvg_rstrn_cd     =>  p_prort_prtl_yr_cvg_rstrn_cd
485       ,p_prort_prtl_yr_cvg_rstrn_rl     =>  p_prort_prtl_yr_cvg_rstrn_rl
486       ,p_cvg_incr_r_decr_only_cd        =>  p_cvg_incr_r_decr_only_cd
487       ,p_bnft_or_option_rstrctn_cd      =>  p_bnft_or_option_rstrctn_cd
488       ,p_effective_date                 => trunc(p_effective_date)
489       );
490   exception
491     when hr_api.cannot_find_prog_unit then
492       hr_api.cannot_find_prog_unit_error
493         (p_module_name => 'CREATE_Plan_in_Program'
494         ,p_hook_type   => 'AP'
495         );
496     --
497     -- End of API User Hook for the after hook of create_Plan_in_Program
498     --
499   end;
500   --
501  for l_cop in c_cop loop
502     --
503     ben_option_in_plan_in_pgm_api.create_option_in_plan_in_pgm(
504          p_validate                => false,
505          p_oiplip_id               => l_oiplip_id,
506          p_effective_start_date    => l_opp_effective_start_date,
507          p_effective_end_date      => l_opp_effective_end_date,
508          p_oipl_id                 => l_cop.oipl_id,
509          p_plip_id                 => l_plip_id,
510          p_business_group_id       => p_business_group_id,
511          p_object_version_number   => l_opp_object_version_number,
512          p_effective_date          => p_effective_date);
513     --
514   end loop;
515   -- bug 1285336
516   hr_utility.set_location(l_proc, 60);
517   FOR l_otp IN c_otp LOOP
518     --
519     hr_utility.set_location('Before entering into create_opt_pltyp_in_pgm ', 65);
520     hr_utility.set_location('l_otp.pgm_id '||l_otp.pgm_id , 65.1);
521     hr_utility.set_location('l_otp.ptip_id'||l_otp.ptip_id,65.2);
522     hr_utility.set_location('l_otp.pl_typ_id'||l_otp.pl_typ_id,65.3);
523     --
524     ben_opt_pltyp_in_pgm_api.create_opt_pltyp_in_pgm
525         (p_validate                      => false
526         ,p_optip_id                      =>l_optip_id
527         ,p_effective_start_date          =>l_otp_effective_start_date
528         ,p_effective_end_date            =>l_otp_effective_end_date
529         ,p_business_group_id             =>p_business_group_id
530         ,p_pgm_id                        =>l_otp.pgm_id
531         ,p_ptip_id                       =>l_otp.ptip_id
532         ,p_pl_typ_id                     =>l_otp.pl_typ_id
533         ,p_opt_id                        =>l_otp.opt_id
534     --  ,p_cmbn_ptip_opt_id              =>p_cmbn_ptip_opt_id
535         ,p_object_version_number         =>l_otp_object_version_number
536         ,p_effective_date                =>p_effective_date
537     );
538     hr_utility.set_location('Before entering into create_opt_pltyp_in_pgm ', 66);
539   END LOOP ;
540 
541   --
542   -- When in validation only mode raise the Validate_Enabled exception
543   --
544 
545   if p_validate then
546     raise hr_api.validate_enabled;
547   end if;
548   --
549   -- Set all output arguments
550   --
551   p_plip_id := l_plip_id;
552   p_effective_start_date := l_effective_start_date;
553   p_effective_end_date := l_effective_end_date;
554   p_object_version_number := l_object_version_number;
555   --
556   hr_utility.set_location(' Leaving:'||l_proc, 70);
557   --
558 exception
559   --
560   when hr_api.validate_enabled then
561     --
562     -- As the Validate_Enabled exception has been raised
563     -- we must rollback to the savepoint
564     --
565     ROLLBACK TO create_Plan_in_Program;
566     --
567     -- Only set output warning arguments
568     -- (Any key or derived arguments must be set to null
569     -- when validation only mode is being used.)
570     --
571     p_plip_id := null;
572     p_effective_start_date := null;
573     p_effective_end_date := null;
574     p_object_version_number  := null;
575     hr_utility.set_location(' Leaving:'||l_proc, 80);
576     --
577   when others then
578     --
579     -- A validation or unexpected error has occured
580     --
581     ROLLBACK TO create_Plan_in_Program;
582     raise;
583     --
584 end create_Plan_in_Program;
585 -- ----------------------------------------------------------------------------
586 -- |------------------------< update_Plan_in_Program >--- ------------------|
587 -- ----------------------------------------------------------------------------
588 --
589 procedure update_Plan_in_Program
590   (p_validate                       in  boolean   default false
591   ,p_plip_id                        in  number
592   ,p_effective_start_date           out nocopy date
593   ,p_effective_end_date             out nocopy date
594   ,p_dflt_flag                      in  varchar2  default hr_api.g_varchar2
595   ,p_plip_stat_cd                   in  varchar2  default hr_api.g_varchar2
596   ,p_dflt_enrt_cd                   in  varchar2  default hr_api.g_varchar2
597   ,p_dflt_enrt_det_rl               in  number    default hr_api.g_number
598   ,p_ordr_num                       in  number    default hr_api.g_number
599   ,p_ivr_ident                      in  varchar2  default hr_api.g_varchar2
600   ,p_enrt_cd                        in  varchar2  default hr_api.g_varchar2
601   ,p_enrt_mthd_cd                   in  varchar2  default hr_api.g_varchar2
602   ,p_auto_enrt_mthd_rl              in  number    default hr_api.g_number
603   ,p_enrt_rl                        in  number    default hr_api.g_number
604   ,p_alws_unrstrctd_enrt_flag       in  varchar2  default hr_api.g_varchar2
605   ,p_enrt_cvg_strt_dt_cd            in  varchar2  default hr_api.g_varchar2
606   ,p_enrt_cvg_strt_dt_rl            in  number    default hr_api.g_number
607   ,p_enrt_cvg_end_dt_cd             in  varchar2  default hr_api.g_varchar2
608   ,p_enrt_cvg_end_dt_rl             in  number    default hr_api.g_number
609   ,p_rt_strt_dt_cd                  in  varchar2  default hr_api.g_varchar2
610   ,p_rt_strt_dt_rl                  in  number    default hr_api.g_number
611   ,p_rt_end_dt_cd                   in  varchar2  default hr_api.g_varchar2
612   ,p_rt_end_dt_rl                   in  number    default hr_api.g_number
613   ,p_drvbl_fctr_apls_rts_flag       in  varchar2  default hr_api.g_varchar2
614   ,p_drvbl_fctr_prtn_elig_flag      in  varchar2  default hr_api.g_varchar2
615   ,p_elig_apls_flag                 in  varchar2  default hr_api.g_varchar2
616   ,p_prtn_elig_ovrid_alwd_flag      in  varchar2  default hr_api.g_varchar2
617   ,p_trk_inelig_per_flag            in  varchar2  default hr_api.g_varchar2
618   ,p_postelcn_edit_rl               in  number    default hr_api.g_number
619   ,p_pgm_id                         in  number    default hr_api.g_number
620   ,p_pl_id                          in  number    default hr_api.g_number
621   ,p_cmbn_plip_id                   in  number    default hr_api.g_number
622   ,p_business_group_id              in  number    default hr_api.g_number
623   ,p_per_cvrd_cd                    in  varchar2  default hr_api.g_varchar2
624   ,p_short_name                    in  varchar2  default hr_api.g_varchar2
625   ,p_short_code                    in  varchar2  default hr_api.g_varchar2
626     ,p_legislation_code                    in  varchar2  default hr_api.g_varchar2
627     ,p_legislation_subgroup                    in  varchar2  default hr_api.g_varchar2
628   ,P_vrfy_fmly_mmbr_rl              in  number    default hr_api.g_number
629   ,P_vrfy_fmly_mmbr_cd              in  varchar2  default hr_api.g_varchar2
630   ,P_use_csd_rsd_prccng_cd          in  varchar2  default hr_api.g_varchar2
631   ,p_cpp_attribute_category         in  varchar2  default hr_api.g_varchar2
632   ,p_cpp_attribute1                 in  varchar2  default hr_api.g_varchar2
633   ,p_cpp_attribute2                 in  varchar2  default hr_api.g_varchar2
634   ,p_cpp_attribute3                 in  varchar2  default hr_api.g_varchar2
635   ,p_cpp_attribute4                 in  varchar2  default hr_api.g_varchar2
636   ,p_cpp_attribute5                 in  varchar2  default hr_api.g_varchar2
637   ,p_cpp_attribute6                 in  varchar2  default hr_api.g_varchar2
638   ,p_cpp_attribute7                 in  varchar2  default hr_api.g_varchar2
639   ,p_cpp_attribute8                 in  varchar2  default hr_api.g_varchar2
640   ,p_cpp_attribute9                 in  varchar2  default hr_api.g_varchar2
641   ,p_cpp_attribute10                in  varchar2  default hr_api.g_varchar2
642   ,p_cpp_attribute11                in  varchar2  default hr_api.g_varchar2
643   ,p_cpp_attribute12                in  varchar2  default hr_api.g_varchar2
644   ,p_cpp_attribute13                in  varchar2  default hr_api.g_varchar2
645   ,p_cpp_attribute14                in  varchar2  default hr_api.g_varchar2
646   ,p_cpp_attribute15                in  varchar2  default hr_api.g_varchar2
647   ,p_cpp_attribute16                in  varchar2  default hr_api.g_varchar2
648   ,p_cpp_attribute17                in  varchar2  default hr_api.g_varchar2
649   ,p_cpp_attribute18                in  varchar2  default hr_api.g_varchar2
650   ,p_cpp_attribute19                in  varchar2  default hr_api.g_varchar2
651   ,p_cpp_attribute20                in  varchar2  default hr_api.g_varchar2
652   ,p_cpp_attribute21                in  varchar2  default hr_api.g_varchar2
653   ,p_cpp_attribute22                in  varchar2  default hr_api.g_varchar2
654   ,p_cpp_attribute23                in  varchar2  default hr_api.g_varchar2
655   ,p_cpp_attribute24                in  varchar2  default hr_api.g_varchar2
656   ,p_cpp_attribute25                in  varchar2  default hr_api.g_varchar2
657   ,p_cpp_attribute26                in  varchar2  default hr_api.g_varchar2
658   ,p_cpp_attribute27                in  varchar2  default hr_api.g_varchar2
659   ,p_cpp_attribute28                in  varchar2  default hr_api.g_varchar2
660   ,p_cpp_attribute29                in  varchar2  default hr_api.g_varchar2
661   ,p_cpp_attribute30                in  varchar2  default hr_api.g_varchar2
662   ,p_object_version_number          in out nocopy number
663   ,p_url_ref_name                   in  varchar2  default hr_api.g_varchar2
664   ,p_dflt_to_asn_pndg_ctfn_cd       in  varchar2  default hr_api.g_varchar2
665   ,p_dflt_to_asn_pndg_ctfn_rl       in  number    default hr_api.g_number
666   ,p_mn_cvg_amt                     in  number    default hr_api.g_number
667   ,p_mn_cvg_rl                      in  number    default hr_api.g_number
668   ,p_mx_cvg_alwd_amt                in  number    default hr_api.g_number
669   ,p_mx_cvg_incr_alwd_amt           in  number    default hr_api.g_number
670   ,p_mx_cvg_incr_wcf_alwd_amt       in  number    default hr_api.g_number
671   ,p_mx_cvg_mlt_incr_num            in  number    default hr_api.g_number
672   ,p_mx_cvg_mlt_incr_wcf_num        in  number    default hr_api.g_number
673   ,p_mx_cvg_rl                      in  number    default hr_api.g_number
674   ,p_mx_cvg_wcfn_amt                in  number    default hr_api.g_number
675   ,p_mx_cvg_wcfn_mlt_num            in  number    default hr_api.g_number
676   ,p_no_mn_cvg_amt_apls_flag        in  varchar2  default hr_api.g_varchar2
677   ,p_no_mn_cvg_incr_apls_flag       in  varchar2  default hr_api.g_varchar2
678   ,p_no_mx_cvg_amt_apls_flag        in  varchar2  default hr_api.g_varchar2
679   ,p_no_mx_cvg_incr_apls_flag       in  varchar2  default hr_api.g_varchar2
680   ,p_unsspnd_enrt_cd                in  varchar2  default hr_api.g_varchar2
681   ,p_prort_prtl_yr_cvg_rstrn_cd     in  varchar2  default hr_api.g_varchar2
682   ,p_prort_prtl_yr_cvg_rstrn_rl     in  number    default hr_api.g_number
683   ,p_cvg_incr_r_decr_only_cd        in  varchar2  default hr_api.g_varchar2
684   ,p_bnft_or_option_rstrctn_cd      in  varchar2  default hr_api.g_varchar2
685   ,p_effective_date                 in  date
686   ,p_datetrack_mode                 in  varchar2
687   ) is
688   --
689   -- Declare cursors and local variables
690   --
691   l_proc varchar2(72) := g_package||'update_Plan_in_Program';
692   l_object_version_number ben_plip_f.object_version_number%TYPE;
693   l_effective_start_date ben_plip_f.effective_start_date%TYPE;
694   l_effective_end_date ben_plip_f.effective_end_date%TYPE;
695   --
696 begin
697   --
698   hr_utility.set_location('Entering:'|| l_proc, 10);
699   --
700   -- Issue a savepoint if operating in validation only mode
701   --
702   savepoint update_Plan_in_Program;
703   --
704   hr_utility.set_location(l_proc, 20);
705   --
706   -- Process Logic
707   --
708   l_object_version_number := p_object_version_number;
709   --
710   begin
711     --
712     -- Start of API User Hook for the before hook of update_Plan_in_Program
713     --
714     ben_Plan_in_Program_bk2.update_Plan_in_Program_b
715       (
716        p_plip_id                        =>  p_plip_id
717       ,p_dflt_flag                      =>  p_dflt_flag
718       ,p_plip_stat_cd                   =>  p_plip_stat_cd
719       ,p_dflt_enrt_cd                   =>  p_dflt_enrt_cd
720       ,p_dflt_enrt_det_rl               =>  p_dflt_enrt_det_rl
721       ,p_ordr_num                       =>  p_ordr_num
722       ,p_ivr_ident                      =>  p_ivr_ident
723       ,p_enrt_cd                        =>  p_enrt_cd
724       ,p_enrt_mthd_cd                   =>  p_enrt_mthd_cd
725       ,p_auto_enrt_mthd_rl              =>  p_auto_enrt_mthd_rl
726       ,p_enrt_rl                        =>  p_enrt_rl
727       ,p_alws_unrstrctd_enrt_flag       =>  p_alws_unrstrctd_enrt_flag
728       ,p_enrt_cvg_strt_dt_cd            =>  p_enrt_cvg_strt_dt_cd
729       ,p_enrt_cvg_strt_dt_rl            =>  p_enrt_cvg_strt_dt_rl
730       ,p_enrt_cvg_end_dt_cd             =>  p_enrt_cvg_end_dt_cd
731       ,p_enrt_cvg_end_dt_rl             =>  p_enrt_cvg_end_dt_rl
732       ,p_rt_strt_dt_cd                  =>  p_rt_strt_dt_cd
733       ,p_rt_strt_dt_rl                  =>  p_rt_strt_dt_rl
734       ,p_rt_end_dt_cd                   =>  p_rt_end_dt_cd
735       ,p_rt_end_dt_rl                   =>  p_rt_end_dt_rl
736       ,p_drvbl_fctr_apls_rts_flag       =>  p_drvbl_fctr_apls_rts_flag
737       ,p_drvbl_fctr_prtn_elig_flag      =>  p_drvbl_fctr_prtn_elig_flag
738       ,p_elig_apls_flag                 =>  p_elig_apls_flag
739       ,p_prtn_elig_ovrid_alwd_flag      =>  p_prtn_elig_ovrid_alwd_flag
740       ,p_trk_inelig_per_flag            =>  p_trk_inelig_per_flag
741       ,p_postelcn_edit_rl               =>  p_postelcn_edit_rl
742       ,p_pgm_id                         =>  p_pgm_id
743       ,p_pl_id                          =>  p_pl_id
744       ,p_cmbn_plip_id                   =>  p_cmbn_plip_id
745       ,p_business_group_id              =>  p_business_group_id
746       ,p_per_cvrd_cd                    =>  p_per_cvrd_cd
747       ,p_short_name                    =>  p_short_name
748       ,p_short_code                    =>  p_short_code
749             ,p_legislation_code                    =>  p_legislation_code
750             ,p_legislation_subgroup                    =>  p_legislation_subgroup
751       ,P_vrfy_fmly_mmbr_rl              =>  P_vrfy_fmly_mmbr_rl
752       ,P_vrfy_fmly_mmbr_cd              =>  P_vrfy_fmly_mmbr_cd
753       ,P_use_csd_rsd_prccng_cd          =>  P_use_csd_rsd_prccng_cd
754       ,p_cpp_attribute_category         =>  p_cpp_attribute_category
755       ,p_cpp_attribute1                 =>  p_cpp_attribute1
756       ,p_cpp_attribute2                 =>  p_cpp_attribute2
757       ,p_cpp_attribute3                 =>  p_cpp_attribute3
758       ,p_cpp_attribute4                 =>  p_cpp_attribute4
759       ,p_cpp_attribute5                 =>  p_cpp_attribute5
760       ,p_cpp_attribute6                 =>  p_cpp_attribute6
761       ,p_cpp_attribute7                 =>  p_cpp_attribute7
762       ,p_cpp_attribute8                 =>  p_cpp_attribute8
763       ,p_cpp_attribute9                 =>  p_cpp_attribute9
764       ,p_cpp_attribute10                =>  p_cpp_attribute10
765       ,p_cpp_attribute11                =>  p_cpp_attribute11
766       ,p_cpp_attribute12                =>  p_cpp_attribute12
767       ,p_cpp_attribute13                =>  p_cpp_attribute13
768       ,p_cpp_attribute14                =>  p_cpp_attribute14
769       ,p_cpp_attribute15                =>  p_cpp_attribute15
770       ,p_cpp_attribute16                =>  p_cpp_attribute16
771       ,p_cpp_attribute17                =>  p_cpp_attribute17
772       ,p_cpp_attribute18                =>  p_cpp_attribute18
773       ,p_cpp_attribute19                =>  p_cpp_attribute19
774       ,p_cpp_attribute20                =>  p_cpp_attribute20
775       ,p_cpp_attribute21                =>  p_cpp_attribute21
776       ,p_cpp_attribute22                =>  p_cpp_attribute22
777       ,p_cpp_attribute23                =>  p_cpp_attribute23
778       ,p_cpp_attribute24                =>  p_cpp_attribute24
779       ,p_cpp_attribute25                =>  p_cpp_attribute25
780       ,p_cpp_attribute26                =>  p_cpp_attribute26
781       ,p_cpp_attribute27                =>  p_cpp_attribute27
782       ,p_cpp_attribute28                =>  p_cpp_attribute28
783       ,p_cpp_attribute29                =>  p_cpp_attribute29
784       ,p_cpp_attribute30                =>  p_cpp_attribute30
785       ,p_object_version_number          =>  p_object_version_number
786       ,p_url_ref_name                   =>  p_url_ref_name
787       ,p_dflt_to_asn_pndg_ctfn_cd       =>  p_dflt_to_asn_pndg_ctfn_cd
788       ,p_dflt_to_asn_pndg_ctfn_rl       =>  p_dflt_to_asn_pndg_ctfn_rl
789       ,p_mn_cvg_amt                     =>  p_mn_cvg_amt
790       ,p_mn_cvg_rl                      =>  p_mn_cvg_rl
791       ,p_mx_cvg_alwd_amt                =>  p_mx_cvg_alwd_amt
792       ,p_mx_cvg_incr_alwd_amt           =>  p_mx_cvg_incr_alwd_amt
793       ,p_mx_cvg_incr_wcf_alwd_amt       =>  p_mx_cvg_incr_wcf_alwd_amt
794       ,p_mx_cvg_mlt_incr_num            =>  p_mx_cvg_mlt_incr_num
795       ,p_mx_cvg_mlt_incr_wcf_num        =>  p_mx_cvg_mlt_incr_wcf_num
796       ,p_mx_cvg_rl                      =>  p_mx_cvg_rl
797       ,p_mx_cvg_wcfn_amt                =>  p_mx_cvg_wcfn_amt
798       ,p_mx_cvg_wcfn_mlt_num            =>  p_mx_cvg_wcfn_mlt_num
799       ,p_no_mn_cvg_amt_apls_flag        =>  p_no_mn_cvg_amt_apls_flag
800       ,p_no_mn_cvg_incr_apls_flag       =>  p_no_mn_cvg_incr_apls_flag
801       ,p_no_mx_cvg_amt_apls_flag        =>  p_no_mx_cvg_amt_apls_flag
802       ,p_no_mx_cvg_incr_apls_flag       =>  p_no_mx_cvg_incr_apls_flag
803       ,p_unsspnd_enrt_cd                =>  p_unsspnd_enrt_cd
804       ,p_prort_prtl_yr_cvg_rstrn_cd     =>  p_prort_prtl_yr_cvg_rstrn_cd
805       ,p_prort_prtl_yr_cvg_rstrn_rl     =>  p_prort_prtl_yr_cvg_rstrn_rl
806       ,p_cvg_incr_r_decr_only_cd        =>  p_cvg_incr_r_decr_only_cd
807       ,p_bnft_or_option_rstrctn_cd      =>  p_bnft_or_option_rstrctn_cd
808     ,p_effective_date                      => trunc(p_effective_date)
809     ,p_datetrack_mode                      => p_datetrack_mode
810       );
811   exception
812     when hr_api.cannot_find_prog_unit then
813       hr_api.cannot_find_prog_unit_error
814         (p_module_name => 'UPDATE_Plan_in_Program'
815         ,p_hook_type   => 'BP'
816         );
817     --
818     -- End of API User Hook for the before hook of update_Plan_in_Program
819     --
820   end;
821   --
822   BEN_CPP_upd.upd
823     (
824      p_plip_id                       => p_plip_id
825     ,p_effective_start_date          => l_effective_start_date
826     ,p_effective_end_date            => l_effective_end_date
827     ,p_dflt_flag                     => p_dflt_flag
828     ,p_plip_stat_cd                  => p_plip_stat_cd
829     ,p_dflt_enrt_cd                  => p_dflt_enrt_cd
830     ,p_dflt_enrt_det_rl              => p_dflt_enrt_det_rl
831     ,p_ordr_num                      => p_ordr_num
832     ,p_ivr_ident                     => p_ivr_ident
833     ,p_enrt_cd                       => p_enrt_cd
834     ,p_enrt_mthd_cd                  => p_enrt_mthd_cd
835     ,p_auto_enrt_mthd_rl             => p_auto_enrt_mthd_rl
836     ,p_enrt_rl                       => p_enrt_rl
837     ,p_alws_unrstrctd_enrt_flag      => p_alws_unrstrctd_enrt_flag
838     ,p_enrt_cvg_strt_dt_cd           => p_enrt_cvg_strt_dt_cd
839     ,p_enrt_cvg_strt_dt_rl           => p_enrt_cvg_strt_dt_rl
840     ,p_enrt_cvg_end_dt_cd            => p_enrt_cvg_end_dt_cd
841     ,p_enrt_cvg_end_dt_rl            => p_enrt_cvg_end_dt_rl
842     ,p_rt_strt_dt_cd                 => p_rt_strt_dt_cd
843     ,p_rt_strt_dt_rl                 => p_rt_strt_dt_rl
844     ,p_rt_end_dt_cd                  => p_rt_end_dt_cd
845     ,p_rt_end_dt_rl                  => p_rt_end_dt_rl
846     ,p_drvbl_fctr_apls_rts_flag      => p_drvbl_fctr_apls_rts_flag
847     ,p_drvbl_fctr_prtn_elig_flag     => p_drvbl_fctr_prtn_elig_flag
848     ,p_elig_apls_flag                => p_elig_apls_flag
849     ,p_prtn_elig_ovrid_alwd_flag     => p_prtn_elig_ovrid_alwd_flag
850     ,p_trk_inelig_per_flag           => p_trk_inelig_per_flag
851     ,p_postelcn_edit_rl              => p_postelcn_edit_rl
852     ,p_pgm_id                        => p_pgm_id
853     ,p_pl_id                         => p_pl_id
854     ,p_cmbn_plip_id                  => p_cmbn_plip_id
855     ,p_business_group_id             => p_business_group_id
856     ,p_per_cvrd_cd                   => p_per_cvrd_cd
857     ,p_short_name                   => p_short_name
858     ,p_short_code                   => p_short_code
859         ,p_legislation_code                   => p_legislation_code
860         ,p_legislation_subgroup                   => p_legislation_subgroup
861     ,P_vrfy_fmly_mmbr_rl             => P_vrfy_fmly_mmbr_rl
862     ,P_vrfy_fmly_mmbr_cd             => P_vrfy_fmly_mmbr_cd
863     ,P_use_csd_rsd_prccng_cd         => P_use_csd_rsd_prccng_cd
864     ,p_cpp_attribute_category        => p_cpp_attribute_category
865     ,p_cpp_attribute1                => p_cpp_attribute1
866     ,p_cpp_attribute2                => p_cpp_attribute2
867     ,p_cpp_attribute3                => p_cpp_attribute3
868     ,p_cpp_attribute4                => p_cpp_attribute4
869     ,p_cpp_attribute5                => p_cpp_attribute5
870     ,p_cpp_attribute6                => p_cpp_attribute6
871     ,p_cpp_attribute7                => p_cpp_attribute7
872     ,p_cpp_attribute8                => p_cpp_attribute8
873     ,p_cpp_attribute9                => p_cpp_attribute9
874     ,p_cpp_attribute10               => p_cpp_attribute10
875     ,p_cpp_attribute11               => p_cpp_attribute11
876     ,p_cpp_attribute12               => p_cpp_attribute12
877     ,p_cpp_attribute13               => p_cpp_attribute13
878     ,p_cpp_attribute14               => p_cpp_attribute14
879     ,p_cpp_attribute15               => p_cpp_attribute15
880     ,p_cpp_attribute16               => p_cpp_attribute16
881     ,p_cpp_attribute17               => p_cpp_attribute17
882     ,p_cpp_attribute18               => p_cpp_attribute18
883     ,p_cpp_attribute19               => p_cpp_attribute19
884     ,p_cpp_attribute20               => p_cpp_attribute20
885     ,p_cpp_attribute21               => p_cpp_attribute21
886     ,p_cpp_attribute22               => p_cpp_attribute22
887     ,p_cpp_attribute23               => p_cpp_attribute23
888     ,p_cpp_attribute24               => p_cpp_attribute24
889     ,p_cpp_attribute25               => p_cpp_attribute25
890     ,p_cpp_attribute26               => p_cpp_attribute26
891     ,p_cpp_attribute27               => p_cpp_attribute27
892     ,p_cpp_attribute28               => p_cpp_attribute28
893     ,p_cpp_attribute29               => p_cpp_attribute29
894     ,p_cpp_attribute30               => p_cpp_attribute30
895     ,p_object_version_number         => l_object_version_number
896     ,p_url_ref_name                  => p_url_ref_name
897     ,p_dflt_to_asn_pndg_ctfn_cd      => p_dflt_to_asn_pndg_ctfn_cd
898     ,p_dflt_to_asn_pndg_ctfn_rl      => p_dflt_to_asn_pndg_ctfn_rl
899     ,p_mn_cvg_amt                    => p_mn_cvg_amt
900     ,p_mn_cvg_rl                     => p_mn_cvg_rl
901     ,p_mx_cvg_alwd_amt               => p_mx_cvg_alwd_amt
902     ,p_mx_cvg_incr_alwd_amt          => p_mx_cvg_incr_alwd_amt
903     ,p_mx_cvg_incr_wcf_alwd_amt      => p_mx_cvg_incr_wcf_alwd_amt
904     ,p_mx_cvg_mlt_incr_num           => p_mx_cvg_mlt_incr_num
905     ,p_mx_cvg_mlt_incr_wcf_num       => p_mx_cvg_mlt_incr_wcf_num
906     ,p_mx_cvg_rl                     => p_mx_cvg_rl
907     ,p_mx_cvg_wcfn_amt               => p_mx_cvg_wcfn_amt
908     ,p_mx_cvg_wcfn_mlt_num           => p_mx_cvg_wcfn_mlt_num
909     ,p_no_mn_cvg_amt_apls_flag       => p_no_mn_cvg_amt_apls_flag
910     ,p_no_mn_cvg_incr_apls_flag      => p_no_mn_cvg_incr_apls_flag
911     ,p_no_mx_cvg_amt_apls_flag       => p_no_mx_cvg_amt_apls_flag
912     ,p_no_mx_cvg_incr_apls_flag      => p_no_mx_cvg_incr_apls_flag
913     ,p_unsspnd_enrt_cd               => p_unsspnd_enrt_cd
914     ,p_prort_prtl_yr_cvg_rstrn_cd    => p_prort_prtl_yr_cvg_rstrn_cd
915     ,p_prort_prtl_yr_cvg_rstrn_rl    => p_prort_prtl_yr_cvg_rstrn_rl
916     ,p_cvg_incr_r_decr_only_cd       => p_cvg_incr_r_decr_only_cd
917     ,p_bnft_or_option_rstrctn_cd     => p_bnft_or_option_rstrctn_cd
918     ,p_effective_date                => trunc(p_effective_date)
919     ,p_datetrack_mode                => p_datetrack_mode
920     );
921   --
922   begin
923     --
924     -- Start of API User Hook for the after hook of update_Plan_in_Program
925     --
926     ben_Plan_in_Program_bk2.update_Plan_in_Program_a
927       (
928        p_plip_id                        =>  p_plip_id
929       ,p_effective_start_date           =>  l_effective_start_date
930       ,p_effective_end_date             =>  l_effective_end_date
931       ,p_dflt_flag                      =>  p_dflt_flag
932       ,p_plip_stat_cd                   =>  p_plip_stat_cd
933       ,p_dflt_enrt_cd                   =>  p_dflt_enrt_cd
934       ,p_dflt_enrt_det_rl               =>  p_dflt_enrt_det_rl
935       ,p_ordr_num                       =>  p_ordr_num
936       ,p_ivr_ident                      =>  p_ivr_ident
937       ,p_enrt_cd                        =>  p_enrt_cd
938       ,p_enrt_mthd_cd                   =>  p_enrt_mthd_cd
939       ,p_auto_enrt_mthd_rl              =>  p_auto_enrt_mthd_rl
940       ,p_enrt_rl                        =>  p_enrt_rl
941       ,p_alws_unrstrctd_enrt_flag       =>  p_alws_unrstrctd_enrt_flag
942       ,p_enrt_cvg_strt_dt_cd            =>  p_enrt_cvg_strt_dt_cd
943       ,p_enrt_cvg_strt_dt_rl            =>  p_enrt_cvg_strt_dt_rl
944       ,p_enrt_cvg_end_dt_cd             =>  p_enrt_cvg_end_dt_cd
945       ,p_enrt_cvg_end_dt_rl             =>  p_enrt_cvg_end_dt_rl
946       ,p_rt_strt_dt_cd                  =>  p_rt_strt_dt_cd
947       ,p_rt_strt_dt_rl                  =>  p_rt_strt_dt_rl
948       ,p_rt_end_dt_cd                   =>  p_rt_end_dt_cd
949       ,p_rt_end_dt_rl                   =>  p_rt_end_dt_rl
950       ,p_drvbl_fctr_apls_rts_flag       =>  p_drvbl_fctr_apls_rts_flag
951       ,p_drvbl_fctr_prtn_elig_flag      =>  p_drvbl_fctr_prtn_elig_flag
952       ,p_elig_apls_flag                 =>  p_elig_apls_flag
953       ,p_prtn_elig_ovrid_alwd_flag      =>  p_prtn_elig_ovrid_alwd_flag
954       ,p_trk_inelig_per_flag            =>  p_trk_inelig_per_flag
955       ,p_postelcn_edit_rl               =>  p_postelcn_edit_rl
956       ,p_pgm_id                         =>  p_pgm_id
957       ,p_pl_id                          =>  p_pl_id
958       ,p_cmbn_plip_id                   =>  p_cmbn_plip_id
959       ,p_business_group_id              =>  p_business_group_id
960       ,p_per_cvrd_cd                    =>  p_per_cvrd_cd
961       ,p_short_name                    =>  p_short_name
962       ,p_short_code                    =>  p_short_code
963             ,p_legislation_code                    =>  p_legislation_code
964             ,p_legislation_subgroup                    =>  p_legislation_subgroup
965       ,P_vrfy_fmly_mmbr_rl              =>  P_vrfy_fmly_mmbr_rl
966       ,P_vrfy_fmly_mmbr_cd              =>  P_vrfy_fmly_mmbr_cd
967       ,P_use_csd_rsd_prccng_cd          =>  P_use_csd_rsd_prccng_cd
968       ,p_cpp_attribute_category         =>  p_cpp_attribute_category
969       ,p_cpp_attribute1                 =>  p_cpp_attribute1
970       ,p_cpp_attribute2                 =>  p_cpp_attribute2
971       ,p_cpp_attribute3                 =>  p_cpp_attribute3
972       ,p_cpp_attribute4                 =>  p_cpp_attribute4
973       ,p_cpp_attribute5                 =>  p_cpp_attribute5
974       ,p_cpp_attribute6                 =>  p_cpp_attribute6
975       ,p_cpp_attribute7                 =>  p_cpp_attribute7
976       ,p_cpp_attribute8                 =>  p_cpp_attribute8
977       ,p_cpp_attribute9                 =>  p_cpp_attribute9
978       ,p_cpp_attribute10                =>  p_cpp_attribute10
979       ,p_cpp_attribute11                =>  p_cpp_attribute11
980       ,p_cpp_attribute12                =>  p_cpp_attribute12
981       ,p_cpp_attribute13                =>  p_cpp_attribute13
982       ,p_cpp_attribute14                =>  p_cpp_attribute14
983       ,p_cpp_attribute15                =>  p_cpp_attribute15
984       ,p_cpp_attribute16                =>  p_cpp_attribute16
985       ,p_cpp_attribute17                =>  p_cpp_attribute17
986       ,p_cpp_attribute18                =>  p_cpp_attribute18
987       ,p_cpp_attribute19                =>  p_cpp_attribute19
988       ,p_cpp_attribute20                =>  p_cpp_attribute20
989       ,p_cpp_attribute21                =>  p_cpp_attribute21
990       ,p_cpp_attribute22                =>  p_cpp_attribute22
991       ,p_cpp_attribute23                =>  p_cpp_attribute23
992       ,p_cpp_attribute24                =>  p_cpp_attribute24
993       ,p_cpp_attribute25                =>  p_cpp_attribute25
994       ,p_cpp_attribute26                =>  p_cpp_attribute26
995       ,p_cpp_attribute27                =>  p_cpp_attribute27
996       ,p_cpp_attribute28                =>  p_cpp_attribute28
997       ,p_cpp_attribute29                =>  p_cpp_attribute29
998       ,p_cpp_attribute30                =>  p_cpp_attribute30
999       ,p_object_version_number          =>  l_object_version_number
1000       ,p_url_ref_name                   =>  p_url_ref_name
1001       ,p_dflt_to_asn_pndg_ctfn_cd       =>  p_dflt_to_asn_pndg_ctfn_cd
1002       ,p_dflt_to_asn_pndg_ctfn_rl       =>  p_dflt_to_asn_pndg_ctfn_rl
1003       ,p_mn_cvg_amt                     =>  p_mn_cvg_amt
1004       ,p_mn_cvg_rl                      =>  p_mn_cvg_rl
1005       ,p_mx_cvg_alwd_amt                =>  p_mx_cvg_alwd_amt
1006       ,p_mx_cvg_incr_alwd_amt           =>  p_mx_cvg_incr_alwd_amt
1007       ,p_mx_cvg_incr_wcf_alwd_amt       =>  p_mx_cvg_incr_wcf_alwd_amt
1008       ,p_mx_cvg_mlt_incr_num            =>  p_mx_cvg_mlt_incr_num
1009       ,p_mx_cvg_mlt_incr_wcf_num        =>  p_mx_cvg_mlt_incr_wcf_num
1010       ,p_mx_cvg_rl                      =>  p_mx_cvg_rl
1011       ,p_mx_cvg_wcfn_amt                =>  p_mx_cvg_wcfn_amt
1012       ,p_mx_cvg_wcfn_mlt_num            =>  p_mx_cvg_wcfn_mlt_num
1013       ,p_no_mn_cvg_amt_apls_flag        =>  p_no_mn_cvg_amt_apls_flag
1014       ,p_no_mn_cvg_incr_apls_flag       =>  p_no_mn_cvg_incr_apls_flag
1015       ,p_no_mx_cvg_amt_apls_flag        =>  p_no_mx_cvg_amt_apls_flag
1016       ,p_no_mx_cvg_incr_apls_flag       =>  p_no_mx_cvg_incr_apls_flag
1017       ,p_unsspnd_enrt_cd                =>  p_unsspnd_enrt_cd
1018       ,p_prort_prtl_yr_cvg_rstrn_cd     =>  p_prort_prtl_yr_cvg_rstrn_cd
1019       ,p_prort_prtl_yr_cvg_rstrn_rl     =>  p_prort_prtl_yr_cvg_rstrn_rl
1020       ,p_cvg_incr_r_decr_only_cd        =>  p_cvg_incr_r_decr_only_cd
1021       ,p_bnft_or_option_rstrctn_cd      =>  p_bnft_or_option_rstrctn_cd
1022       ,p_effective_date                     => trunc(p_effective_date)
1023       ,p_datetrack_mode                     => p_datetrack_mode
1024       );
1025   exception
1026     when hr_api.cannot_find_prog_unit then
1027       hr_api.cannot_find_prog_unit_error
1028         (p_module_name => 'UPDATE_Plan_in_Program'
1029         ,p_hook_type   => 'AP'
1030         );
1031     --
1032     -- End of API User Hook for the after hook of update_Plan_in_Program
1033     --
1034   end;
1035   --
1036   hr_utility.set_location(l_proc, 60);
1037   --
1038   -- When in validation only mode raise the Validate_Enabled exception
1039   --
1040   if p_validate then
1041     raise hr_api.validate_enabled;
1042   end if;
1043   --
1044   -- Set all output arguments
1045   --
1046   p_object_version_number := l_object_version_number;
1047   p_effective_start_date := l_effective_start_date;
1048   p_effective_end_date := l_effective_end_date;
1049   --
1050   hr_utility.set_location(' Leaving:'||l_proc, 70);
1051   --
1052 exception
1053   --
1054   when hr_api.validate_enabled then
1055     --
1056     -- As the Validate_Enabled exception has been raised
1057     -- we must rollback to the savepoint
1058     --
1059     ROLLBACK TO update_Plan_in_Program;
1060     --
1061     -- Only set output warning arguments
1062     -- (Any key or derived arguments must be set to null
1063     -- when validation only mode is being used.)
1064     --
1065     hr_utility.set_location(' Leaving:'||l_proc, 80);
1066     --
1067   when others then
1068     --
1069     -- A validation or unexpected error has occured
1070     --
1071     ROLLBACK TO update_Plan_in_Program;
1072     raise;
1073     --
1074 end update_Plan_in_Program;
1075 -- ----------------------------------------------------------------------------
1076 -- |------------------------< delete_Plan_in_Program >----------------------|
1077 -- ----------------------------------------------------------------------------
1078 --
1079 procedure delete_Plan_in_Program
1080   (p_validate                       in  boolean  default false
1081   ,p_plip_id                        in  number
1082   ,p_effective_start_date           out nocopy date
1083   ,p_effective_end_date             out nocopy date
1084   ,p_object_version_number          in out nocopy number
1085   ,p_effective_date                 in  date
1086   ,p_datetrack_mode                 in  varchar2
1087   ) is
1088   --
1089   -- Declare cursors and local variables
1090   --
1091 
1092      cursor c_opp is select opp.oiplip_id,
1093             opp.object_version_number
1094      from   ben_oiplip_f opp
1095      where  opp.plip_id = p_plip_id
1096      and    p_effective_date between
1097             opp.effective_start_date and opp.effective_end_date;
1098   --
1099   l_proc varchar2(72) := g_package||'update_Plan_in_Program';
1100   l_object_version_number ben_plip_f.object_version_number%TYPE;
1101   l_effective_start_date ben_plip_f.effective_start_date%TYPE;
1102   l_effective_end_date ben_plip_f.effective_end_date%TYPE;
1103   --
1104   l_opp_effective_start_date  ben_oiplip_f.effective_start_date%type;
1105   l_opp_effective_end_date    ben_oiplip_f.effective_end_date%type;
1106   l_opp_object_version_number ben_oiplip_f.object_version_number%type;
1107 
1108   --
1109 begin
1110   --
1111   hr_utility.set_location('Entering:'|| l_proc, 10);
1112   --
1113   -- Issue a savepoint if operating in validation only mode
1114   --
1115   savepoint delete_Plan_in_Program;
1116   --
1117   hr_utility.set_location(l_proc, 20);
1118   --
1119   -- Process Logic
1120   --
1121   l_object_version_number := p_object_version_number;
1122   --
1123   --
1124   begin
1125     --
1126     -- Start of API User Hook for the before hook of delete_Plan_in_Program
1127     --
1128     ben_Plan_in_Program_bk3.delete_Plan_in_Program_b
1129       (
1130        p_plip_id                        =>  p_plip_id
1131       ,p_object_version_number          =>  p_object_version_number
1132     ,p_effective_date                      => trunc(p_effective_date)
1133     ,p_datetrack_mode                      => p_datetrack_mode
1134       );
1135   exception
1136     when hr_api.cannot_find_prog_unit then
1137       hr_api.cannot_find_prog_unit_error
1138         (p_module_name => 'DELETE_Plan_in_Program'
1139         ,p_hook_type   => 'BP'
1140         );
1141     --
1142     -- End of API User Hook for the before hook of delete_Plan_in_Program
1143     --
1144   end;
1145   --
1146   BEN_CPP_del.del
1147     (
1148      p_plip_id                       => p_plip_id
1149     ,p_effective_start_date          => l_effective_start_date
1150     ,p_effective_end_date            => l_effective_end_date
1151     ,p_object_version_number         => l_object_version_number
1152     ,p_effective_date                => p_effective_date
1153     ,p_datetrack_mode                => p_datetrack_mode
1154     );
1155   --
1156   begin
1157     --
1158     -- Start of API User Hook for the after hook of delete_Plan_in_Program
1159     --
1160     ben_Plan_in_Program_bk3.delete_Plan_in_Program_a
1161       (
1162        p_plip_id                        =>  p_plip_id
1163       ,p_effective_start_date           =>  l_effective_start_date
1164       ,p_effective_end_date             =>  l_effective_end_date
1165       ,p_object_version_number          =>  l_object_version_number
1166     ,p_effective_date                      => trunc(p_effective_date)
1167     ,p_datetrack_mode                      => p_datetrack_mode
1168       );
1169   exception
1170     when hr_api.cannot_find_prog_unit then
1171       hr_api.cannot_find_prog_unit_error
1172         (p_module_name => 'DELETE_Plan_in_Program'
1173         ,p_hook_type   => 'AP'
1174         );
1175     --
1176     -- End of API User Hook for the after hook of delete_Plan_in_Program
1177     --
1178   end;
1179   --
1180   hr_utility.set_location(l_proc, 60);
1181   --
1182   -- When in validation only mode raise the Validate_Enabled exception
1183   --
1184   if p_validate then
1185     raise hr_api.validate_enabled;
1186   end if;
1187   --
1188   hr_utility.set_location(' Leaving:'||l_proc, 70);
1189   --
1190 exception
1191   --
1192   when hr_api.validate_enabled then
1193     --
1194     -- As the Validate_Enabled exception has been raised
1195     -- we must rollback to the savepoint
1196     --
1197     ROLLBACK TO delete_Plan_in_Program;
1198     --
1199     -- Only set output warning arguments
1200     -- (Any key or derived arguments must be set to null
1201     -- when validation only mode is being used.)
1202     --
1203     p_effective_start_date := null;
1204     p_effective_end_date := null;
1205     --
1206   when others then
1207     --
1208     -- A validation or unexpected error has occured
1209     --
1210     ROLLBACK TO delete_Plan_in_Program;
1211     raise;
1212     --
1213 end delete_Plan_in_Program;
1214 --
1215 -- ----------------------------------------------------------------------------
1216 -- |-------------------------------< lck >------------------------------------|
1217 -- ----------------------------------------------------------------------------
1218 --
1219 procedure lck
1220   (
1221    p_plip_id                   in     number
1222   ,p_object_version_number          in     number
1223   ,p_effective_date                 in     date
1224   ,p_datetrack_mode                 in     varchar2
1225   ,p_validation_start_date          out nocopy    date
1226   ,p_validation_end_date            out nocopy    date
1227   ) is
1228   --
1229   --
1230   -- Declare cursors and local variables
1231   --
1232   l_proc varchar2(72) := g_package||'lck';
1233   l_validation_start_date date;
1234   l_validation_end_date date;
1235   --
1236 begin
1237   --
1238   hr_utility.set_location('Entering:'|| l_proc, 10);
1239   --
1240   BEN_CPP_shd.lck
1241     (
1242       p_plip_id                 => p_plip_id
1243      ,p_validation_start_date      => l_validation_start_date
1244      ,p_validation_end_date        => l_validation_end_date
1245      ,p_object_version_number      => p_object_version_number
1246      ,p_effective_date             => p_effective_date
1247      ,p_datetrack_mode             => p_datetrack_mode
1248     );
1249   --
1250   hr_utility.set_location(' Leaving:'||l_proc, 70);
1251   --
1252 end lck;
1253 --
1254 end ben_Plan_in_Program_api;