246: is select 1 from BEN_CM_DLVRY_MED_TYP
247: where business_group_id = p_bg_id;
248:
249: cursor c62(p_bg_id NUMBER)
250: is select 1 from BEN_ELIG_SVC_AREA_PRTE_F
251: where business_group_id = p_bg_id;
252:
253: cursor c63(p_bg_id NUMBER)
254: is select 1 from BEN_EXT_CRIT_VAL
2092: --
2093: close c61;
2094:
2095: --
2096: -- Testing for values in BEN_ELIG_SVC_AREA_PRTE_F
2097: --
2098: open c62(p_bg_id);
2099: --
2100: fetch c62 into l_temp;
2100: fetch c62 into l_temp;
2101: if c62%found then
2102: close c62;
2103: fnd_message.set_name('BEN','HR_7215_DT_CHILD_EXISTS');
2104: fnd_message.set_token('TABLE_NAME','BEN_ELIG_SVC_AREA_PRTE_F');
2105: fnd_message.raise_error;
2106: end if;
2107: --
2108: close c62;
5756:
5757: delete from BEN_CM_DLVRY_MED_TYP
5758: where business_group_id = p_bg_id;
5759:
5760: delete from BEN_ELIG_SVC_AREA_PRTE_F
5761: where business_group_id = p_bg_id;
5762:
5763: delete from BEN_EXT_CRIT_VAL
5764: where business_group_id = p_bg_id;