DBA Data[Home] [Help]

APPS.BEN_BACK_OUT_LIFE_EVENT dependencies on BEN_ELIG_PER_OPT_F

Line 188: dates for deleting ben_elig_per_opt_f

184: 28-JUL-00 rchase 115.48 - Bug#5364 continuation
185: Update the c_epo_max_esd_of_past_pil
186: cursor in the delete_routine
187: to fetch the appropriate
188: dates for deleting ben_elig_per_opt_f
189: rows
190: 03-AUG-00 pbodla 115.49 - Removed the effective date usage
191: from the cursors -
192: c_ben_ELIG_PER_OPT_f,

Line 192: c_ben_ELIG_PER_OPT_f,

188: dates for deleting ben_elig_per_opt_f
189: rows
190: 03-AUG-00 pbodla 115.49 - Removed the effective date usage
191: from the cursors -
192: c_ben_ELIG_PER_OPT_f,
193: c_epo_max_esd_of_past_pil,
194: c_ben_elig_per_f,
195: c_ben_prtt_prem_f,
196: c_ben_pl_bnf_f,

Line 207: BEN_ELIG_PER_OPT_F

203: not EOT.
204: Affect p_routines:
205: BEN_ELIG_CVRD_DPNT_F
206: BEN_ELIG_PER_F
207: BEN_ELIG_PER_OPT_F
208: BEN_PRTT_PREM_F
209: BEN_PL_BNF_F
210: BEN_PRTT_ENRT_RSLT_F
211: 14-Sep-2000 jcarpent 115.51 Bug 1269016. added bolfe

Line 1248: and elig.BKUP_TBL_TYP_CD = 'BEN_ELIG_PER_OPT_F_CORRECT' ;

1244: cursor c_restore_epo( p_pil_id number ) IS
1245: select *
1246: from ben_le_clsn_n_rstr elig
1247: where elig.per_in_ler_ended_id = p_pil_id
1248: and elig.BKUP_TBL_TYP_CD = 'BEN_ELIG_PER_OPT_F_CORRECT' ;
1249: --
1250: cursor c_epo(p_elig_per_opt_id number,p_effective_date date) IS
1251: select object_version_number
1252: from ben_elig_per_opt_f epo

Line 1252: from ben_elig_per_opt_f epo

1248: and elig.BKUP_TBL_TYP_CD = 'BEN_ELIG_PER_OPT_F_CORRECT' ;
1249: --
1250: cursor c_epo(p_elig_per_opt_id number,p_effective_date date) IS
1251: select object_version_number
1252: from ben_elig_per_opt_f epo
1253: where epo.elig_per_opt_id = p_elig_per_opt_id
1254: and p_effective_date between epo.effective_start_date
1255: and epo.effective_end_date ;
1256: --

Line 1265: l_elig_per_opt_id ben_elig_per_opt_f.elig_per_opt_id%TYPE;

1261: l_update_change_insert boolean;
1262: l_datetrack_mode varchar2(100);
1263: --
1264: --Start AMN bug 12732878
1265: l_elig_per_opt_id ben_elig_per_opt_f.elig_per_opt_id%TYPE;
1266: l_effective_start_date date;
1267: l_effective_end_date date;
1268: l_object_version_number ben_elig_per_opt_f.object_version_number%type;
1269: l_new_elig_per_id ben_elig_per_opt_f.elig_per_opt_id%TYPE;

Line 1268: l_object_version_number ben_elig_per_opt_f.object_version_number%type;

1264: --Start AMN bug 12732878
1265: l_elig_per_opt_id ben_elig_per_opt_f.elig_per_opt_id%TYPE;
1266: l_effective_start_date date;
1267: l_effective_end_date date;
1268: l_object_version_number ben_elig_per_opt_f.object_version_number%type;
1269: l_new_elig_per_id ben_elig_per_opt_f.elig_per_opt_id%TYPE;
1270: --End AMN bug 12732878
1271: begin
1272: --

Line 1269: l_new_elig_per_id ben_elig_per_opt_f.elig_per_opt_id%TYPE;

1265: l_elig_per_opt_id ben_elig_per_opt_f.elig_per_opt_id%TYPE;
1266: l_effective_start_date date;
1267: l_effective_end_date date;
1268: l_object_version_number ben_elig_per_opt_f.object_version_number%type;
1269: l_new_elig_per_id ben_elig_per_opt_f.elig_per_opt_id%TYPE;
1270: --End AMN bug 12732878
1271: begin
1272: --
1273: hr_utility.set_location ('Entering '||l_proc,10);

Line 1286: p_base_table_name => 'BEN_ELIG_PER_OPT_F',

1282: --
1283: --Get the Datetrack Mode
1284: dt_api.find_dt_upd_modes
1285: (p_effective_date => l_effective_date,
1286: p_base_table_name => 'BEN_ELIG_PER_OPT_F',
1287: p_base_key_column => 'elig_per_opt_id',
1288: p_base_key_value => l_rec.BKUP_TBL_ID,
1289: p_correction => l_correction,
1290: p_update => l_update,

Line 1443: and elig.BKUP_TBL_TYP_CD = 'BEN_ELIG_PER_OPT_F_CORRECT';

1439: --Now Delete the records from ben_le_clsn_n_rstr
1440: --
1441: delete from ben_le_clsn_n_rstr elig
1442: where elig.per_in_ler_ended_id = p_per_in_ler_id
1443: and elig.BKUP_TBL_TYP_CD = 'BEN_ELIG_PER_OPT_F_CORRECT';
1444: --
1445: hr_utility.set_location ('Leaving '||l_proc,10);
1446: --
1447: END restore_prev_epo ;

Line 1646: -- BEN_ELIG_PER_OPT_F (EPO)

1642: -- BEN_ENRT_RT (ECR) (cascade delete in epe api, but epe not deleted)
1643: -- BEN_ENRT_CVG_N_RT_CTFN (ECC) (cascade delete in epe api, but epe not deleted)
1644: -- BEN_ELIG_CVRD_DPNT_F (PDP)
1645: -- BEN_ELIG_PER_F (PEP)
1646: -- BEN_ELIG_PER_OPT_F (EPO)
1647: -- BEN_CVRD_DPNT_CTFN_PRVDD_F (CCP)
1648: -- BEN_PER_CM_F (PCM) (join to pil to check status)
1649: -- BEN_PER_CM_USG_F (PCU) (join to pil to check status)
1650: -- BEN_PER_CM_TRGR_F (PCR) (join to pil to check status)

Line 1823: delete_routine(p_routine => 'BEN_ELIG_PER_OPT_F',

1819:
1820: --CWBGLOBAL : No need to backout in case of CWB backout
1821: if l_ler_typ not in ('COMP') then
1822: -- mark elig_per opts's 'backed out'
1823: delete_routine(p_routine => 'BEN_ELIG_PER_OPT_F',
1824: p_per_in_ler_id => p_per_in_ler_id,
1825: p_business_group_id => p_business_group_id,
1826: p_copy_only => p_copy_only,
1827: p_effective_date => p_effective_date);

Line 1923: -- Get all the BEN_ELIG_PER_F_CORRECTION and BEN_ELIG_PER_OPT_F_CORRECTION

1919: hr_utility.set_location ('prv_per_in_ler_id' || l_prv_per_in_ler_id, 199 );
1920: hr_utility.set_location ('l_lf_evt_ocrd_dt' || l_prv_lf_evt_ocrd_dt, 199 );
1921: --
1922: --IK START
1923: -- Get all the BEN_ELIG_PER_F_CORRECTION and BEN_ELIG_PER_OPT_F_CORRECTION
1924: -- records from BEN_LE_CLSN_N_RSTR table for the per_in_ler being backed out
1925: -- and update the records with PEP and EPO records with the restored date
1926: -- in correction mode.
1927: -- After API call to Corrrect the PEP and EPO records delete the data from

Line 2808: -- START ----> DELETE ROUTINE FOR BEN_ELIG_PER_OPT_F

2804: --
2805: l_package varchar2(80) := g_package||'.delete_routine';
2806: --
2807: --
2808: -- START ----> DELETE ROUTINE FOR BEN_ELIG_PER_OPT_F
2809: --
2810: -- Source Table
2811: -- BEN_PER_IN_LER
2812: --

Line 2813: cursor c_ben_ELIG_PER_OPT_f is

2809: --
2810: -- Source Table
2811: -- BEN_PER_IN_LER
2812: --
2813: cursor c_ben_ELIG_PER_OPT_f is
2814: select epo.ELIG_PER_OPT_id,
2815: epo.object_version_number,
2816: epo.effective_start_date --AMN bug 12732878
2817: from ben_ELIG_PER_OPT_f epo,

Line 2817: from ben_ELIG_PER_OPT_f epo,

2813: cursor c_ben_ELIG_PER_OPT_f is
2814: select epo.ELIG_PER_OPT_id,
2815: epo.object_version_number,
2816: epo.effective_start_date --AMN bug 12732878
2817: from ben_ELIG_PER_OPT_f epo,
2818: ben_per_in_ler pil
2819: where pil.per_in_ler_id = p_per_in_ler_id
2820: and pil.business_group_id = p_business_group_id
2821: and epo.per_in_ler_id = pil.per_in_ler_id

Line 2843: -- from ben_ELIG_PER_OPT_f

2839: -- RCHASE 5364 - Update cursor to fetch appropriate rows
2840: -- Previous cursor definition
2841: --cursor c_epo_max_esd_of_past_pil(v_ELIG_PER_OPT_id in number) is
2842: -- select max(effective_end_date), max(object_version_number)
2843: -- from ben_ELIG_PER_OPT_f
2844: -- where ELIG_PER_OPT_id = v_ELIG_PER_OPT_id
2845: -- and nvl(per_in_ler_id , -1) <> p_per_in_ler_id
2846: -- and business_group_id = p_business_group_id;
2847: -- and effective_end_date < p_effective_date;

Line 2852: from ben_ELIG_PER_OPT_f epo

2848: -- New cursor definition
2849: /*
2850: cursor c_epo_max_esd_of_past_pil(v_ELIG_PER_OPT_id in number) is
2851: select max(epo.effective_end_date), max(epo.object_version_number)
2852: from ben_ELIG_PER_OPT_f epo
2853: where epo.ELIG_PER_OPT_id = v_ELIG_PER_OPT_id
2854: --RCHASE 5364
2855: and nvl(per_in_ler_id , -1) <> p_per_in_ler_id
2856: and epo.business_group_id = p_business_group_id;

Line 2871: from ben_ELIG_PER_OPT_f epo,

2867: where per_in_ler_id = p_per_in_ler_id); */
2868: --
2869: cursor c_epo_max_esd_of_past_pil(v_ELIG_PER_OPT_id in number) is
2870: select epo.effective_end_date, epo.object_version_number
2871: from ben_ELIG_PER_OPT_f epo,
2872: ben_per_in_ler pil
2873: where epo.ELIG_PER_OPT_id = v_ELIG_PER_OPT_id
2874: and nvl(epo.per_in_ler_id , -1) <> p_per_in_ler_id
2875: and epo.business_group_id = p_business_group_id

Line 2886: from ben_elig_per_opt_f

2882: --
2883: cursor c_deleted_epo(v_elig_per_opt_id in number,
2884: v_effective_date in date) is
2885: select *
2886: from ben_elig_per_opt_f
2887: where elig_per_opt_id = v_elig_per_opt_id
2888: and nvl(per_in_ler_id , -1) = p_per_in_ler_id
2889: and business_group_id = p_business_group_id
2890: and effective_end_date > v_effective_date;

Line 2894: -- END ----> DELETE ROUTINE FOR BEN_ELIG_PER_OPT_F

2890: and effective_end_date > v_effective_date;
2891:
2892:
2893: --
2894: -- END ----> DELETE ROUTINE FOR BEN_ELIG_PER_OPT_F
2895: --
2896: -- START ----> DELETE ROUTINE FOR BEN_ELIG_PER_F
2897: --
2898: -- Source Table

Line 4663: elsif p_routine = 'BEN_ELIG_PER_OPT_F'

4659: --
4660:
4661: close c_ben_elig_per_f;
4662: --
4663: elsif p_routine = 'BEN_ELIG_PER_OPT_F'
4664: then
4665: -- we want to 'un-end' any records that were ENDED
4666: -- due to the per-in-ler. The 'future-change' date track mode will do that
4667: -- for us.

Line 4674: open c_ben_elig_per_opt_f;

4670:
4671: l_prev_pk_id := -1; -- like null
4672:
4673: --
4674: open c_ben_elig_per_opt_f;
4675: --
4676: loop
4677: --
4678: fetch c_ben_elig_per_opt_f into l_pk_id,

Line 4678: fetch c_ben_elig_per_opt_f into l_pk_id,

4674: open c_ben_elig_per_opt_f;
4675: --
4676: loop
4677: --
4678: fetch c_ben_elig_per_opt_f into l_pk_id,
4679: l_object_version_number,
4680: l_effective_date_new;
4681: exit when c_ben_elig_per_opt_f%notfound;
4682: --

Line 4681: exit when c_ben_elig_per_opt_f%notfound;

4677: --
4678: fetch c_ben_elig_per_opt_f into l_pk_id,
4679: l_object_version_number,
4680: l_effective_date_new;
4681: exit when c_ben_elig_per_opt_f%notfound;
4682: --
4683: -- Get the maximum of effective end date for the dependents
4684: -- with past per_in_ler 's.
4685: --

Line 4809: 'BEN_ELIG_PER_OPT_F',

4805: ONCE_R_CNTUG_CD,
4806: OIPL_ORDR_NUM,
4807: PRTN_END_DT )
4808: values (
4809: 'BEN_ELIG_PER_OPT_F',
4810: l_deleted_epo_rec.INELG_RSN_CD,
4811: l_deleted_epo_rec.PER_IN_LER_ID,
4812: l_deleted_epo_rec.AGE_UOM,
4813: l_deleted_epo_rec.LOS_UOM,

Line 4937: close c_ben_elig_per_opt_f;

4933: --
4934: l_prev_pk_id := -1;
4935: --
4936:
4937: close c_ben_elig_per_opt_f;
4938: --
4939: elsif p_routine = 'BEN_PRTT_PREM_F' then
4940: -------------Bug 7133998
4941: for l_prtt_prem_corr in c_ben_prtt_prem_f_corr loop

Line 7267: if c_ben_elig_per_opt_f%isopen then

7263: close c_ben_elig_per_f;
7264: --
7265: end if;
7266: --
7267: if c_ben_elig_per_opt_f%isopen then
7268: --
7269: close c_ben_elig_per_opt_f;
7270: --
7271: end if;

Line 7269: close c_ben_elig_per_opt_f;

7265: end if;
7266: --
7267: if c_ben_elig_per_opt_f%isopen then
7268: --
7269: close c_ben_elig_per_opt_f;
7270: --
7271: end if;
7272: --
7273: if c_ben_prtt_prem_f%isopen then