[Home] [Help]
98: CURSOR c25 (
99: p_person_id NUMBER
100: ) IS
101: SELECT 1
102: FROM ben_batch_rate_info
103: WHERE person_id = p_person_id;
104: CURSOR c26 (
105: p_person_id NUMBER
106: ) IS
447: --
448: CLOSE c24;
449:
450: --
451: -- Testing for values in BEN_BATCH_RATE_INFO
452: --
453: OPEN c25 (
454: p_person_id
455: );
463: 'BEN_94121_DT_CHILD_EXISTS'
464: );
465: fnd_message.set_token (
466: 'TABLE_NAME',
467: 'BEN_BATCH_RATE_INFO'
468: );
469: fnd_message.raise_error;
470: END IF;
471:
2433: CURSOR c27 (
2434: p_person_id NUMBER
2435: ) IS
2436: SELECT batch_rt_id
2437: FROM ben_batch_rate_info a,ben_benefit_actions b
2438: WHERE a.person_id = p_person_id
2439: and a.BENEFIT_ACTION_ID = b.BENEFIT_ACTION_ID
2440: and b.person_id = p_person_id--Bug 14505730
2441: and ( (p_per_in_ler_id is not NULL and b.MODE_CD = 'U') or (p_per_in_ler_id is NULL) )
2813: CLOSE c26;
2814: OPEN c27 (
2815: p_person_id
2816: );
2817: <
2819: FETCH c27 INTO l_id;
2820: EXIT WHEN c27%NOTFOUND;
2821: DELETE FROM ben_batch_rate_info
2817: <
2818: LOOP
2819: FETCH c27 INTO l_id;
2820: EXIT WHEN c27%NOTFOUND;
2821: DELETE FROM ben_batch_rate_info
2822: WHERE CURRENT OF c27;
2823: END LOOP ben_batch_rate_info;
2824: CLOSE c27;
2825: OPEN c28 (
2819: FETCH c27 INTO l_id;
2820: EXIT WHEN c27%NOTFOUND;
2821: DELETE FROM ben_batch_rate_info
2822: WHERE CURRENT OF c27;
2823: END LOOP ben_batch_rate_info;
2824: CLOSE c27;
2825: OPEN c28 (
2826: p_person_id
2827: );