79: CURSOR c3 (
80: p_person_id NUMBER
81: ) IS
82: SELECT 1
83: FROM ben_ext_chg_evt_log
84: WHERE person_id = p_person_id;
85: CURSOR c6 (
86: p_person_id NUMBER
87: ) IS
523: --
524: CLOSE c17;
525:
526: --
527: -- Testing for values in BEN_EXT_CHG_EVT_LOG
528: --
529: OPEN c3 (
530: p_person_id
531: );
539: 'BEN_94121_DT_CHILD_EXISTS'
540: );
541: fnd_message.set_token (
542: 'TABLE_NAME',
543: 'BEN_EXT_CHG_EVT_LOG'
544: );
545: fnd_message.raise_error;
546: END IF;
547:
2417: CURSOR c35 (
2418: p_person_id NUMBER
2419: ) IS
2420: SELECT ext_chg_evt_log_id
2421: FROM ben_ext_chg_evt_log
2422: WHERE person_id = p_person_id
2423: FOR UPDATE OF ext_chg_evt_log_id;
2424:
2425: --
2778: CLOSE c34;
2779: OPEN c35 (
2780: p_person_id
2781: );
2782: <
2784: FETCH c35 INTO l_id;
2785: EXIT WHEN c35%NOTFOUND;
2786: DELETE FROM ben_ext_chg_evt_log
2782: <
2783: LOOP
2784: FETCH c35 INTO l_id;
2785: EXIT WHEN c35%NOTFOUND;
2786: DELETE FROM ben_ext_chg_evt_log
2787: WHERE CURRENT OF c35;
2788: END LOOP ben_ext_chg_evt_log;
2789: CLOSE c35;
2790: OPEN c36 (
2784: FETCH c35 INTO l_id;
2785: EXIT WHEN c35%NOTFOUND;
2786: DELETE FROM ben_ext_chg_evt_log
2787: WHERE CURRENT OF c35;
2788: END LOOP ben_ext_chg_evt_log;
2789: CLOSE c35;
2790: OPEN c36 (
2791: p_person_id
2792: );