1425: CURSOR c6 (
1426: p_prtt_enrt_rslt_id NUMBER
1427: ) IS
1428: SELECT bnft_prvdd_ldgr_id
1429: FROM ben_bnft_prvdd_ldgr_f
1430: WHERE prtt_enrt_rslt_id = p_prtt_enrt_rslt_id
1431: FOR UPDATE OF bnft_prvdd_ldgr_id;
1432:
1433: --
1690: CLOSE c5;
1691: OPEN c6 (
1692: r4.prtt_enrt_rslt_id
1693: );
1694: <
1696: FETCH c6 INTO l_id;
1697: EXIT WHEN c6%NOTFOUND;
1698: DELETE FROM ben_bnft_prvdd_ldgr_f
1694: <
1695: LOOP
1696: FETCH c6 INTO l_id;
1697: EXIT WHEN c6%NOTFOUND;
1698: DELETE FROM ben_bnft_prvdd_ldgr_f
1699: WHERE CURRENT OF c6;
1700: END LOOP ben_bnft_prvdd_ldgr_f;
1701: CLOSE c6;
1702: OPEN c7 (
1696: FETCH c6 INTO l_id;
1697: EXIT WHEN c6%NOTFOUND;
1698: DELETE FROM ben_bnft_prvdd_ldgr_f
1699: WHERE CURRENT OF c6;
1700: END LOOP ben_bnft_prvdd_ldgr_f;
1701: CLOSE c6;
1702: OPEN c7 (
1703: r4.prtt_enrt_rslt_id
1704: );
1990: CURSOR c3 (
1991: p_prtt_enrt_rslt_id NUMBER
1992: ) IS
1993: SELECT bnft_prvdd_ldgr_id
1994: FROM ben_bnft_prvdd_ldgr_f
1995: WHERE prtt_enrt_rslt_id = p_prtt_enrt_rslt_id
1996: FOR UPDATE OF bnft_prvdd_ldgr_id;
1997:
1998: --
2057: CLOSE c2;
2058: OPEN c3 (
2059: r1.prtt_enrt_rslt_id
2060: );
2061: <
2063: FETCH c3 INTO l_id;
2064: EXIT WHEN c3%NOTFOUND;
2065: DELETE FROM ben_bnft_prvdd_ldgr_f
2061: <
2062: LOOP
2063: FETCH c3 INTO l_id;
2064: EXIT WHEN c3%NOTFOUND;
2065: DELETE FROM ben_bnft_prvdd_ldgr_f
2066: WHERE CURRENT OF c3;
2067: END LOOP ben_bnft_prvdd_ldgr_f;
2068: CLOSE c3;
2069: OPEN c4 (
2063: FETCH c3 INTO l_id;
2064: EXIT WHEN c3%NOTFOUND;
2065: DELETE FROM ben_bnft_prvdd_ldgr_f
2066: WHERE CURRENT OF c3;
2067: END LOOP ben_bnft_prvdd_ldgr_f;
2068: CLOSE c3;
2069: OPEN c4 (
2070: r1.prtt_enrt_rslt_id
2071: );