[Home] [Help]
34: to check for all plans in
35: the profile.
36: 12 Jul 99 tguy 115.13 fixed from and to check for
37: postal zip range.
38: 20-JUL-99 Gperry 115.14 genutils -> benutils package
39: rename.
40: 30-Aug-99 maagrawa 115.15 Added p_dpnt_inelig_rsn_cd
41: to procedure main.
42: Added p_inelig_rsn_cd to
112: validated when postal teria is validated
113: 15-jan-01 tilak 115.40 bug : 1540610 >= min and < max age validation is
114: change to >= min and < max+1
115: 29-aug-01 pbodla 115.41 bug:1949361 jurisdiction code is
116: derived inside benutils.formula
117: 18-Sep-01 ikasire 115.42 bug 1977901 fixed the logic in max/min
118: age validation
119: 28-sep-01 tjesumic 115.43 bug : 1638727 fixed , error message for
120: depnt address is reomoved,dpnt wont be eligible
1071: -- available all the time. This is a work around to access the
1072: -- contact person data. Customer have to write the formula function.
1073: --
1074: if l_ade.dpnt_cvg_elig_det_rl is not null then
1075: l_outputs := benutils.formula
1076: (p_formula_id => l_ade.dpnt_cvg_elig_det_rl,
1077: p_effective_date => nvl(p_lf_evt_ocrd_dt,p_effective_date),
1078: p_business_group_id => p_business_group_id,
1079: p_assignment_id => l_assignment_id,
1106: -- Bug 4271143 Added apld_dpnt_cvg_elig_rl condition also as if
1107: -- Coverage Eligibility Rule is specified, then it should also evaluate to true
1108: --
1109: if l_ade.apld_dpnt_cvg_elig_rl is not null then
1110: l_outputs := benutils.formula
1111: (p_formula_id => l_ade.apld_dpnt_cvg_elig_rl,
1112: p_effective_date => nvl(p_lf_evt_ocrd_dt,p_effective_date),
1113: p_business_group_id => p_business_group_id,
1114: p_assignment_id => l_assignment_id,
1531: fetch c_asg into l_assignment_id,l_organization_id,l_region_2;
1532: --
1533: close c_asg;
1534: --
1535: l_outputs := benutils.formula
1536: (p_formula_id => l_ade1.apld_dpnt_cvg_elig_rl,
1537: p_effective_date => nvl(p_lf_evt_ocrd_dt,p_effective_date),
1538: p_business_group_id => p_business_group_id,
1539: p_assignment_id => l_assignment_id,
1804: --
1805: if l_defct_brch_dtctd = 'USE_LE_OCRD_BRCH_DT' then
1806: l_elig_change_dt := l_effective_date - 1;
1807: else
1808: l_elig_change_dt:= benutils.derive_date(
1809: p_date => l_dob,
1810: p_uom => age.age_uom,
1811: p_min => age.mn_age_num,
1812: p_max => age.mx_age_num,
1842: l_elig := 'N';
1843: if l_defct_brch_dtctd = 'USE_LE_OCRD_BRCH_DT' then
1844: l_elig_change_dt := l_effective_date - 1;
1845: else
1846: l_elig_change_dt := benutils.derive_date(
1847: p_date => l_dob,
1848: p_uom => age.age_uom,
1849: p_min => age.mn_age_num,
1850: p_max => age.mx_age_num,