1: Package Body ben_cwb_pl_dsgn_api as
2: /* $Header: becpdapi.pkb 120.1 2006/01/04 01:43:14 steotia noship $ */
3: --
4: -- Package Variables
5: --
2: /* $Header: becpdapi.pkb 120.1 2006/01/04 01:43:14 steotia noship $ */
3: --
4: -- Package Variables
5: --
6: g_package varchar2(33) := ' BEN_CWB_PL_DSGN_API.';
7: g_debug boolean := hr_utility.debug_enabled;
8: --
9: --
10: -- ----------------------------------------------------------------------------
118: --
119: -- Call Before Process User Hook
120: --
121: begin
122: ben_cwb_pl_dsgn_bk1.create_plan_or_option_b
123: (p_pl_id => p_pl_id
124: ,p_oipl_id => p_oipl_id
125: ,p_lf_evt_ocrd_dt => p_lf_evt_ocrd_dt
126: ,p_effective_date => p_effective_date
318: --
319: -- Call After Process User Hook
320: --
321: begin
322: ben_cwb_pl_dsgn_bk1.create_plan_or_option_a
323: (p_pl_id => p_pl_id
324: ,p_oipl_id => p_oipl_id
325: ,p_lf_evt_ocrd_dt => p_lf_evt_ocrd_dt
326: ,p_effective_date => p_effective_date
498: -- cursor to fetch the local plans of a group plan
499: cursor csr_plans(p_group_pl_id number
500: ,p_lf_evt_ocrd_dt date) is
501: select pl_id
502: from ben_cwb_pl_dsgn
503: where group_pl_id = p_group_pl_id
504: and pl_id <> group_pl_id -- Exclude group plan
505: and oipl_id = -1
506: and lf_evt_ocrd_dt = p_lf_evt_ocrd_dt;
508: -- cursor to fetch the options of a plan
509: cursor csr_options(p_pl_id number
510: ,p_lf_evt_ocrd_dt date) is
511: select oipl_id
512: from ben_cwb_pl_dsgn
513: where pl_id = p_pl_id
514: and oipl_id <> -1 -- Exclude Plans
515: and lf_evt_ocrd_dt = p_lf_evt_ocrd_dt;
516:
518: cursor csr_grp_pl_local_options(p_group_pl_id number
519: ,p_lf_evt_ocrd_dt date) is
520: select pl_id
521: ,oipl_id
522: from ben_cwb_pl_dsgn
523: where group_pl_id = p_group_pl_id
524: and oipl_id <> -1 -- Exclude Plans
525: and pl_id <> p_group_pl_id -- Exclude Group Options
526: and lf_evt_ocrd_dt = p_lf_evt_ocrd_dt;
530: ,p_group_oipl_id number
531: ,p_lf_evt_ocrd_dt date) is
532: select pl_id
533: ,oipl_id
534: from ben_cwb_pl_dsgn
535: where group_pl_id = p_group_pl_id
536: and oipl_id <> -1 -- Exclude Plans
537: and pl_id <> p_group_pl_id -- Exclude Group Options
538: and group_oipl_id = p_group_oipl_id
591: end if;
592: --
593: select object_version_number
594: into l_ovn
595: from ben_cwb_pl_dsgn
596: where pl_id = pl.pl_id
597: and oipl_id = -1
598: and lf_evt_ocrd_dt = p_lf_evt_ocrd_dt;
599: --
637: end if;
638: --
639: select object_version_number
640: into l_ovn
641: from ben_cwb_pl_dsgn
642: where pl_id = p_pl_id
643: and oipl_id = oipl.oipl_id
644: and lf_evt_ocrd_dt = p_lf_evt_ocrd_dt;
645: --
671: for opt in csr_grp_pl_local_options(p_pl_id, p_lf_evt_ocrd_dt)
672: loop
673: select object_version_number
674: into l_ovn
675: from ben_cwb_pl_dsgn
676: where pl_id = opt.pl_id
677: and oipl_id = opt.oipl_id
678: and lf_evt_ocrd_dt = p_lf_evt_ocrd_dt;
679: --
704: for oipl in csr_options(p_pl_id, p_lf_evt_ocrd_dt)
705: loop
706: select object_version_number
707: into l_ovn
708: from ben_cwb_pl_dsgn
709: where pl_id = p_pl_id
710: and oipl_id = oipl.oipl_id
711: and lf_evt_ocrd_dt = p_lf_evt_ocrd_dt;
712: --
747: ,p_lf_evt_ocrd_dt)
748: loop
749: select object_version_number
750: into l_ovn
751: from ben_cwb_pl_dsgn
752: where pl_id = opt.pl_id
753: and oipl_id = opt.oipl_id
754: and lf_evt_ocrd_dt = p_lf_evt_ocrd_dt;
755: --
895: --
896: -- Call Before Process User Hook
897: --
898: begin
899: ben_cwb_pl_dsgn_bk2.update_plan_or_option_b
900: (p_pl_id => p_pl_id
901: ,p_oipl_id => p_oipl_id
902: ,p_lf_evt_ocrd_dt => p_lf_evt_ocrd_dt
903: ,p_effective_date => p_effective_date
1096: --
1097: -- Call After Process User Hook
1098: --
1099: begin
1100: ben_cwb_pl_dsgn_bk2.update_plan_or_option_a
1101: (p_pl_id => p_pl_id
1102: ,p_oipl_id => p_oipl_id
1103: ,p_lf_evt_ocrd_dt => p_lf_evt_ocrd_dt
1104: ,p_effective_date => p_effective_date
1308: --
1309: -- Call Before Process User Hook
1310: --
1311: begin
1312: BEN_CWB_PL_DSGN_BK3.delete_plan_or_option_b
1313: (p_pl_id => p_pl_id
1314: ,p_oipl_id => p_oipl_id
1315: ,p_lf_evt_ocrd_dt => p_lf_evt_ocrd_dt
1316: ,p_object_version_number => l_object_version_number
1338: --
1339: -- Call After Process User Hook
1340: --
1341: begin
1342: ben_cwb_pl_dsgn_bk3.delete_plan_or_option_a
1343: (p_pl_id => p_pl_id
1344: ,p_oipl_id => p_oipl_id
1345: ,p_lf_evt_ocrd_dt => p_lf_evt_ocrd_dt
1346: ,p_object_version_number => l_object_version_number
1387: end if;
1388: raise;
1389: end delete_plan_or_option;
1390: --
1391: end ben_cwb_pl_dsgn_api;