1518: CURSOR c10 (
1519: p_prtt_enrt_rslt_id NUMBER
1520: ) IS
1521: SELECT prtt_rt_val_id
1522: FROM ben_prtt_rt_val
1523: WHERE prtt_enrt_rslt_id = p_prtt_enrt_rslt_id
1524: FOR UPDATE OF prtt_rt_val_id;
1525:
1526: --
1791: CLOSE c9;
1792: OPEN c10 (
1793: r4.prtt_enrt_rslt_id
1794: );
1795: <
1797: FETCH c10 INTO l_id;
1798: EXIT WHEN c10%NOTFOUND;
1799: DELETE FROM ben_prtt_rt_val
1795: <
1796: LOOP
1797: FETCH c10 INTO l_id;
1798: EXIT WHEN c10%NOTFOUND;
1799: DELETE FROM ben_prtt_rt_val
1800: WHERE CURRENT OF c10;
1801: END LOOP ben_prtt_rt_val;
1802: CLOSE c10;
1803: OPEN c11 (
1797: FETCH c10 INTO l_id;
1798: EXIT WHEN c10%NOTFOUND;
1799: DELETE FROM ben_prtt_rt_val
1800: WHERE CURRENT OF c10;
1801: END LOOP ben_prtt_rt_val;
1802: CLOSE c10;
1803: OPEN c11 (
1804: r4.prtt_enrt_rslt_id
1805: );
2086: CURSOR c7 (
2087: p_prtt_enrt_rslt_id NUMBER
2088: ) IS
2089: SELECT prtt_rt_val_id
2090: FROM ben_prtt_rt_val
2091: WHERE prtt_enrt_rslt_id = p_prtt_enrt_rslt_id
2092: FOR UPDATE OF prtt_rt_val_id;
2093: CURSOR c8 (
2094: p_prtt_enrt_rslt_id NUMBER
2160: CLOSE c6;
2161: OPEN c7 (
2162: r1.prtt_enrt_rslt_id
2163: );
2164: <
2166: FETCH c7 INTO l_id;
2167: EXIT WHEN c7%NOTFOUND;
2168: DELETE FROM ben_prtt_rt_val
2164: <
2165: LOOP
2166: FETCH c7 INTO l_id;
2167: EXIT WHEN c7%NOTFOUND;
2168: DELETE FROM ben_prtt_rt_val
2169: WHERE CURRENT OF c7;
2170: END LOOP ben_prtt_rt_val;
2171: CLOSE c7;
2172: OPEN c8 (
2166: FETCH c7 INTO l_id;
2167: EXIT WHEN c7%NOTFOUND;
2168: DELETE FROM ben_prtt_rt_val
2169: WHERE CURRENT OF c7;
2170: END LOOP ben_prtt_rt_val;
2171: CLOSE c7;
2172: OPEN c8 (
2173: r1.prtt_enrt_rslt_id
2174: );
3168: CURSOR c_prv( p_person_id number ,
3169: p_effective_date date
3170: ) is
3171: SELECT 'Y'
3172: FROM ben_prtt_rt_val prv,
3173: ben_prtt_enrt_rslt_f pen,
3174: ben_ler_f ler
3175: WHERE
3176: pen.person_id=p_person_id and
3374: cursor c_chk_ele_entries is
3375: select '1' from
3376: ben_prtt_enrt_rslt_f pen,
3377: ben_per_in_ler pil, ben_ler_f ler,
3378: ben_prtt_rt_val prv
3379: where pen.person_id = p_person_id
3380: and pen.business_group_id = p_business_group_id
3381: and pen.per_in_ler_id = pil.per_in_ler_id
3382: and pen.prtt_enrt_rslt_stat_cd is null
3413: from
3414: ben_prtt_enrt_rslt_f pen,
3415: ben_per_in_ler pil,
3416: ben_ler_f ler,
3417: ben_prtt_rt_val prv,
3418: pay_element_entry_values_f elv,
3419: pay_element_entries_f ele
3420: where pen.person_id = p_person_id
3421: and pen.business_group_id = p_business_group_id