1557: CURSOR c21 (
1558: p_elig_per_elctbl_chc_id NUMBER
1559: ) IS
1560: SELECT elctbl_chc_ctfn_id
1561: FROM ben_elctbl_chc_ctfn
1562: WHERE elig_per_elctbl_chc_id = p_elig_per_elctbl_chc_id
1563: FOR UPDATE OF elctbl_chc_ctfn_id;
1564:
1565: --
1842: hr_utility.set_location(l_proc,70);
1843: OPEN c21 (
1844: r17.elig_per_elctbl_chc_id
1845: );
1846: <
1848: FETCH c21 INTO l_id;
1849: EXIT WHEN c21%NOTFOUND;
1850: DELETE FROM ben_elctbl_chc_ctfn
1846: <
1847: LOOP
1848: FETCH c21 INTO l_id;
1849: EXIT WHEN c21%NOTFOUND;
1850: DELETE FROM ben_elctbl_chc_ctfn
1851: WHERE CURRENT OF c21;
1852: END LOOP ben_elctbl_chc_ctfn;
1853: CLOSE c21;
1854: END LOOP;
1848: FETCH c21 INTO l_id;
1849: EXIT WHEN c21%NOTFOUND;
1850: DELETE FROM ben_elctbl_chc_ctfn
1851: WHERE CURRENT OF c21;
1852: END LOOP ben_elctbl_chc_ctfn;
1853: CLOSE c21;
1854: END LOOP;
1855: hr_utility.set_location(l_proc,70);
1856: FOR r22 IN c22 (