[Home] [Help]
128: 23 Jul 98 thayden 110.21 Added Inelg rsn cd.
129: 23 Oct 98 gperry 115.11 Added in extra call to
130: ben_newly_ineligible to handle
131: plans as well as programs.
132: 26 Oct 98 gperry 115.12 Corrected ben_elig_per_f so
133: pgm_id is populated if pl_id has
134: a program parent.
135: 23 Nov 98 gperry 115.13 Supports new columns for
136: ben_elig_per_f and
132: 26 Oct 98 gperry 115.12 Corrected ben_elig_per_f so
133: pgm_id is populated if pl_id has
134: a program parent.
135: 23 Nov 98 gperry 115.13 Supports new columns for
136: ben_elig_per_f and
137: ben_elig_per_opt_f
138: 23 Nov 98 gperry 115.14 Added inelg_rsn_cd.
139: 02 Jan 99 gperry 115.15 Made trk inelig per flag work.
140: 18 Jan 99 G Perry 115.16 LED V ED
368: 16-Feb-07 rtagarra 115.126 ICM Changes.
369: 12-jun-07 rtagarra 115.127 ICM: Bug 6038232. Also incorporated changes of Bug 6000303 : Defer Deenrollment ENH
370: on 04-Dec-07 from branchline.
371: 23-Jan-2008 sallumwa 115.128 Bug 6601884 : For still ineligible records, when ineligibility is to be tracked,
372: the records should be updated with correct datetrack mode for both ben_elig_per_f
373: and ben_elig_per_opt_f.
374: --------------------------------------------------------------------------------
375: */
376: --
1119: --
1120: /*PLEASE NOTE THE FOLLOWING:
1121:
1122: 1. Option eligibility is written to ben_elig_per_opt_f
1123: 2. Plan and Program eligibility is written to ben_elig_per_f
1124: 3. When a person is found eligible or ineligible for a pgm, pl or oipl,
1125: a check for previous eligibility/ineligibility will determine
1126: whether a new row will be inserted or an existing row will be
1127: updated.
1143: l_oiplipepo_row ben_derive_part_and_rate_facts.g_cache_structure;
1144: l_oiplippep_row ben_derive_part_and_rate_facts.g_cache_structure;
1145: l_pep_row ben_derive_part_and_rate_facts.g_cache_structure;
1146: --
1147: l_new_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1148: l_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1149: l_prev_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1150: l_elig_per_id ben_elig_per_f.elig_per_id%TYPE;
1151: l_elig_per_elig_flag ben_elig_per_f.elig_flag%TYPE;
1144: l_oiplippep_row ben_derive_part_and_rate_facts.g_cache_structure;
1145: l_pep_row ben_derive_part_and_rate_facts.g_cache_structure;
1146: --
1147: l_new_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1148: l_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1149: l_prev_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1150: l_elig_per_id ben_elig_per_f.elig_per_id%TYPE;
1151: l_elig_per_elig_flag ben_elig_per_f.elig_flag%TYPE;
1152: l_object_version_number ben_elig_per_f.object_version_number%TYPE;
1145: l_pep_row ben_derive_part_and_rate_facts.g_cache_structure;
1146: --
1147: l_new_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1148: l_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1149: l_prev_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1150: l_elig_per_id ben_elig_per_f.elig_per_id%TYPE;
1151: l_elig_per_elig_flag ben_elig_per_f.elig_flag%TYPE;
1152: l_object_version_number ben_elig_per_f.object_version_number%TYPE;
1153: l_object_version_number_opt ben_elig_per_opt_f.object_version_number%type;
1146: --
1147: l_new_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1148: l_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1149: l_prev_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1150: l_elig_per_id ben_elig_per_f.elig_per_id%TYPE;
1151: l_elig_per_elig_flag ben_elig_per_f.elig_flag%TYPE;
1152: l_object_version_number ben_elig_per_f.object_version_number%TYPE;
1153: l_object_version_number_opt ben_elig_per_opt_f.object_version_number%type;
1154: l_t_object_version_number ben_elig_per_opt_f.object_version_number%type;
1147: l_new_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1148: l_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1149: l_prev_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1150: l_elig_per_id ben_elig_per_f.elig_per_id%TYPE;
1151: l_elig_per_elig_flag ben_elig_per_f.elig_flag%TYPE;
1152: l_object_version_number ben_elig_per_f.object_version_number%TYPE;
1153: l_object_version_number_opt ben_elig_per_opt_f.object_version_number%type;
1154: l_t_object_version_number ben_elig_per_opt_f.object_version_number%type;
1155: l_p_object_version_number ben_elig_per_f.object_version_number%type;
1148: l_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1149: l_prev_per_in_ler_id ben_elig_per_f.per_in_ler_id%type;
1150: l_elig_per_id ben_elig_per_f.elig_per_id%TYPE;
1151: l_elig_per_elig_flag ben_elig_per_f.elig_flag%TYPE;
1152: l_object_version_number ben_elig_per_f.object_version_number%TYPE;
1153: l_object_version_number_opt ben_elig_per_opt_f.object_version_number%type;
1154: l_t_object_version_number ben_elig_per_opt_f.object_version_number%type;
1155: l_p_object_version_number ben_elig_per_f.object_version_number%type;
1156: l_t_effective_dt date;
1151: l_elig_per_elig_flag ben_elig_per_f.elig_flag%TYPE;
1152: l_object_version_number ben_elig_per_f.object_version_number%TYPE;
1153: l_object_version_number_opt ben_elig_per_opt_f.object_version_number%type;
1154: l_t_object_version_number ben_elig_per_opt_f.object_version_number%type;
1155: l_p_object_version_number ben_elig_per_f.object_version_number%type;
1156: l_t_effective_dt date;
1157: l_prev_elig boolean := FALSE;
1158: l_prtn_eff_strt_dt date;
1159: l_prtn_eff_end_dt date;
1212: pep.prtn_strt_dt,
1213: pep.prtn_end_dt,
1214: pep.per_in_ler_id,
1215: pep.object_version_number
1216: from ben_elig_per_f pep,
1217: ben_per_in_ler pil
1218: where pep.person_id = c_person_id
1219: and nvl(pep.pgm_id,-1) = c_pgm_id
1220: and nvl(pep.pl_id,-1) = c_pl_id
1255: pep.prtn_strt_dt,
1256: pep.prtn_end_dt
1257: from ben_elig_per_opt_f epo,
1258: ben_per_in_ler pil,
1259: ben_elig_per_f pep
1260: where pep.person_id = c_person_id
1261: and pep.pl_id = c_pl_id
1262: and epo.opt_id = c_opt_id
1263: and pep.elig_per_id = epo.elig_per_id
1291: epo.effective_start_date,
1292: epo.object_version_number
1293: from ben_elig_per_opt_f epo,
1294: ben_per_in_ler pil,
1295: ben_elig_per_f pep
1296: where pep.person_id = c_person_id
1297: and pep.pgm_id = c_pgm_id
1298: and pep.plip_id = c_plip_id
1299: and epo.opt_id = c_opt_id
1319: ,c_add_one in number
1320: )
1321: is
1322: select pep.prtn_strt_dt
1323: from ben_elig_per_f pep,
1324: ben_per_in_ler pil
1325: where pep.person_id = p_person_id
1326: and nvl(pep.pgm_id,-1) =
1327: nvl(p_pgm_id,nvl(l_envpgm_id,-1))
1367: )
1368: is
1369: select epo.prtn_strt_dt
1370: from ben_elig_per_opt_f epo,
1371: ben_elig_per_f pep,
1372: ben_per_in_ler pil
1373: where pep.person_id = p_person_id
1374: and pep.pl_id = l_envpl_id
1375: and nvl(pep.pgm_id,-1) = nvl(l_envpgm_id,-1)
2147: life event.
2148: */
2149: if l_first_elig or l_oipl_rec.opt_id is not null then
2150: --
2151: --Get elig id from ben_elig_per_f for the plan
2152: --
2153: if g_debug then
2154: hr_utility.set_location('open c_get_elig_id ben_determine_eligibility2.check_prev_elig', 10);
2155: end if;
3272:
3273: elsif l_first_inelig then --n
3274: --
3275: hr_utility.set_location ('first inelig',121);
3276: -- Get elig id from ben_elig_per_f for the plan
3277: --
3278: ben_pep_cache1.get_currplnpep_dets
3279: (p_comp_obj_tree_row => p_comp_obj_tree_row
3280: ,p_person_id => p_person_id
4194: end if;
4195:
4196: dt_api.find_dt_upd_modes
4197: (p_effective_date => l_effective_dt,
4198: p_base_table_name => 'BEN_ELIG_PER_F',
4199: p_base_key_column => 'elig_per_id',
4200: p_base_key_value => l_elig_per_id,
4201: p_correction => l_correction,
4202: p_update => l_update,
4210: if l_update_override then
4211: l_datetrack_mode := hr_api.g_update_override;
4212:
4213: if g_debug then
4214: hr_utility.set_location('ben_elig_per_f l_datetrack_mode '|| l_datetrack_mode, 777);
4215: end if;
4216:
4217: elsif l_update then
4218: l_datetrack_mode := hr_api.g_update;
4217: elsif l_update then
4218: l_datetrack_mode := hr_api.g_update;
4219:
4220: if g_debug then
4221: hr_utility.set_location('ben_elig_per_f l_datetrack_mode '|| l_datetrack_mode, 777);
4222: end if;
4223:
4224: else
4225: l_datetrack_mode := hr_api.g_correction;
4224: else
4225: l_datetrack_mode := hr_api.g_correction;
4226:
4227: if g_debug then
4228: hr_utility.set_location('ben_elig_per_f l_datetrack_mode '|| l_datetrack_mode, 777);
4229: end if;
4230:
4231: end if;
4232:
4791: -- Bugs : 1412882, part of bug 1412951
4792: --
4793: p_effective_date => l_effective_dt,
4794: --
4795: p_base_table_name => 'BEN_ELIG_PER_F',
4796: p_base_key_column => 'elig_per_id',
4797: p_base_key_value => l_elig_per_id,
4798: p_correction => l_correction,
4799: p_update => l_update,
5107: -- Bugs : 1412882, part of bug 1412951
5108: --
5109: p_effective_date => l_effective_dt,
5110: --
5111: p_base_table_name => 'BEN_ELIG_PER_F',
5112: p_base_key_column => 'elig_per_id',
5113: p_base_key_value => l_elig_per_id,
5114: p_correction => l_correction,
5115: p_update => l_update,
5411: -- Bugs : 1412882, part of bug 1412951
5412: --
5413: p_effective_date => l_effective_dt,
5414: --
5415: p_base_table_name => 'BEN_ELIG_PER_F',
5416: p_base_key_column => 'elig_per_id',
5417: p_base_key_value => l_elig_per_id,
5418: p_correction => l_correction,
5419: p_update => l_update,