70: --
71: --
72: -- Declare cursors and local variables
73: --
74: l_pl_bnf_id ben_pl_bnf_f.pl_bnf_id%TYPE;
75: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
76: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
77: l_proc varchar2(72) := g_package||'create_PLAN_BENEFICIARY';
78: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
71: --
72: -- Declare cursors and local variables
73: --
74: l_pl_bnf_id ben_pl_bnf_f.pl_bnf_id%TYPE;
75: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
76: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
77: l_proc varchar2(72) := g_package||'create_PLAN_BENEFICIARY';
78: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
79: l_per_in_ler_id ben_pl_bnf_f.per_in_ler_id%TYPE;
72: -- Declare cursors and local variables
73: --
74: l_pl_bnf_id ben_pl_bnf_f.pl_bnf_id%TYPE;
75: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
76: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
77: l_proc varchar2(72) := g_package||'create_PLAN_BENEFICIARY';
78: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
79: l_per_in_ler_id ben_pl_bnf_f.per_in_ler_id%TYPE;
80: --
74: l_pl_bnf_id ben_pl_bnf_f.pl_bnf_id%TYPE;
75: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
76: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
77: l_proc varchar2(72) := g_package||'create_PLAN_BENEFICIARY';
78: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
79: l_per_in_ler_id ben_pl_bnf_f.per_in_ler_id%TYPE;
80: --
81: cursor c_pil is
82: select pil.per_in_ler_id
75: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
76: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
77: l_proc varchar2(72) := g_package||'create_PLAN_BENEFICIARY';
78: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
79: l_per_in_ler_id ben_pl_bnf_f.per_in_ler_id%TYPE;
80: --
81: cursor c_pil is
82: select pil.per_in_ler_id
83: from ben_prtt_enrt_rslt_f pen ,
432: is
433:
434: l_proc varchar2(72) := g_package||'create_plan_beneficiary wrapper';
435:
436: l_pl_bnf_id ben_pl_bnf_f.pl_bnf_id%TYPE;
437: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
438: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
439: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
440:
433:
434: l_proc varchar2(72) := g_package||'create_plan_beneficiary wrapper';
435:
436: l_pl_bnf_id ben_pl_bnf_f.pl_bnf_id%TYPE;
437: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
438: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
439: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
440:
441: l_validate BOOLEAN;
434: l_proc varchar2(72) := g_package||'create_plan_beneficiary wrapper';
435:
436: l_pl_bnf_id ben_pl_bnf_f.pl_bnf_id%TYPE;
437: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
438: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
439: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
440:
441: l_validate BOOLEAN;
442: l_multi_row_actn BOOLEAN;
435:
436: l_pl_bnf_id ben_pl_bnf_f.pl_bnf_id%TYPE;
437: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
438: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
439: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
440:
441: l_validate BOOLEAN;
442: l_multi_row_actn BOOLEAN;
443: --
586: -- Declare cursors and local variables
587: --
588: --
589: l_proc varchar2(72) := g_package||'update_PLAN_BENEFICIARY';
590: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
591: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
592: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
593: l2_datetrack_mode varchar2(30);
594: l_rslt_object_version_number number;
587: --
588: --
589: l_proc varchar2(72) := g_package||'update_PLAN_BENEFICIARY';
590: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
591: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
592: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
593: l2_datetrack_mode varchar2(30);
594: l_rslt_object_version_number number;
595: l_actn_typ_id number;
588: --
589: l_proc varchar2(72) := g_package||'update_PLAN_BENEFICIARY';
590: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
591: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
592: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
593: l2_datetrack_mode varchar2(30);
594: l_rslt_object_version_number number;
595: l_actn_typ_id number;
596: l_prtt_enrt_actn_id number;
977: is
978:
979: l_proc varchar2(72) := g_package||'update_plan_beneficiary - wrapper';
980:
981: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
982: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
983: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
984:
985: l_validate BOOLEAN;
978:
979: l_proc varchar2(72) := g_package||'update_plan_beneficiary - wrapper';
980:
981: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
982: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
983: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
984:
985: l_validate BOOLEAN;
986: l_multi_row_actn BOOLEAN;
979: l_proc varchar2(72) := g_package||'update_plan_beneficiary - wrapper';
980:
981: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
982: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
983: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
984:
985: l_validate BOOLEAN;
986: l_multi_row_actn BOOLEAN;
987: --
1084: --
1085: -- Declare cursors and local variables
1086: --
1087: l_proc varchar2(72) := g_package||'DELETE_PLAN_BENEFICIARY';
1088: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
1089: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
1090: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
1091: --
1092: l_pl_bnf_ctfn_prvdd_id number;
1085: -- Declare cursors and local variables
1086: --
1087: l_proc varchar2(72) := g_package||'DELETE_PLAN_BENEFICIARY';
1088: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
1089: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
1090: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
1091: --
1092: l_pl_bnf_ctfn_prvdd_id number;
1093: l2_object_version_number ben_pl_bnf_ctfn_prvdd_f.object_version_number%TYPE;
1086: --
1087: l_proc varchar2(72) := g_package||'DELETE_PLAN_BENEFICIARY';
1088: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
1089: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
1090: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
1091: --
1092: l_pl_bnf_ctfn_prvdd_id number;
1093: l2_object_version_number ben_pl_bnf_ctfn_prvdd_f.object_version_number%TYPE;
1094: l2_effective_start_date ben_pl_bnf_ctfn_prvdd_f.effective_start_date%TYPE;
1098: l_datetrack_mode varchar2(30);
1099: --
1100: cursor c_pl_bnf(p_pl_bnf_id number, p_effective_date date) is
1101: select effective_start_date
1102: from ben_pl_bnf_f pnb
1103: where pnb.pl_bnf_id = p_pl_bnf_id
1104: and p_effective_date between pnb.effective_start_date
1105: and pnb.effective_end_date ;
1106: l_pl_bnf c_pl_bnf%rowtype;
1409: is
1410:
1411: l_proc varchar2(72) := g_package||'delete_plan_beneficiary - wrapper';
1412:
1413: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
1414: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
1415: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
1416:
1417: l_validate BOOLEAN;
1410:
1411: l_proc varchar2(72) := g_package||'delete_plan_beneficiary - wrapper';
1412:
1413: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
1414: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
1415: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
1416:
1417: l_validate BOOLEAN;
1418: l_multi_row_actn BOOLEAN;
1411: l_proc varchar2(72) := g_package||'delete_plan_beneficiary - wrapper';
1412:
1413: l_effective_start_date ben_pl_bnf_f.effective_start_date%TYPE;
1414: l_effective_end_date ben_pl_bnf_f.effective_end_date%TYPE;
1415: l_object_version_number ben_pl_bnf_f.object_version_number%TYPE;
1416:
1417: l_validate BOOLEAN;
1418: l_multi_row_actn BOOLEAN;
1419: --
1583: decode(prmry_cntngnt_cd, 'PRIMY',pct_dsgd_num,0) prmry_dsgd_pct,
1584: decode(prmry_cntngnt_cd, 'CNTNGNT',pct_dsgd_num,0) cntngnt_dsgd_pct,
1585: decode(prmry_cntngnt_cd, 'PRIMY',amt_dsgd_val,0) prmry_dsgd_amt,
1586: decode(prmry_cntngnt_cd, 'CNTNGNT',amt_dsgd_val,0) cntngnt_dsgd_amt
1587: from ben_pl_bnf_f
1588: where pl_bnf_id = p_pl_bnf_id
1589: and p_effective_date between effective_start_date
1590: and effective_end_date;
1591: --
1603: cursor c_sum_bnf is
1604: select pbn.prmry_cntngnt_cd prmry_cntngnt_cd,
1605: sum(pbn.pct_dsgd_num) prcnt,
1606: sum(pbn.amt_dsgd_val) amount
1607: from ben_pl_bnf_f pbn,
1608: ben_per_in_ler pil
1609: where pbn.prtt_enrt_rslt_id = l_prtt_enrt_rslt_id
1610: and pbn.business_group_id = l_business_group_id
1611: -- and p_effective_date between pbn.effective_start_date and pbn.effective_end_date
1912: --
1913: cursor bnf_person_c is
1914: select b.bnf_person_id,
1915: b.business_group_id
1916: from ben_pl_bnf_f b
1917: where b.pl_bnf_id = p_pl_bnf_id
1918: and business_group_id = p_business_group_id
1919: and p_effective_date between b.effective_start_date
1920: and b.effective_end_date;
1920: and b.effective_end_date;
1921: --
1922: cursor other_bnf_c is
1923: select null
1924: from ben_pl_bnf_f a
1925: where a.bnf_person_id = l_bnf_person_id
1926: and a.business_group_id = p_business_group_id
1927: and a.pl_bnf_id <> p_pl_bnf_id
1928: -- and p_effective_date between a.effective_start_date
1948: -- bug 5668052
1949: CURSOR bnf_rec_exists (v_bnf_person_id IN NUMBER)
1950: IS
1951: SELECT pl_bnf_id
1952: FROM ben_pl_bnf_f pbn
1953: WHERE pbn.bnf_person_id = v_bnf_person_id
1954: AND pbn.pl_bnf_id <> p_pl_bnf_id
1955: AND pbn.business_group_id = p_business_group_id;
1956: