666: is select 1 from BEN_PER_TYP_RT_F
667: where business_group_id = p_bg_id;
668:
669: cursor c168(p_bg_id NUMBER)
670: is select 1 from BEN_PPL_GRP_RT_F
671: where business_group_id = p_bg_id;
672:
673: cursor c169(p_bg_id NUMBER)
674: is select 1 from BEN_PSTL_ZIP_RT_F
3667: --
3668: close c167;
3669:
3670: --
3671: -- Testing for values in BEN_PPL_GRP_RT_F
3672: --
3673: open c168(p_bg_id);
3674: --
3675: fetch c168 into l_temp;
3675: fetch c168 into l_temp;
3676: if c168%found then
3677: close c168;
3678: fnd_message.set_name('BEN','HR_7215_DT_CHILD_EXISTS');
3679: fnd_message.set_token('TABLE_NAME','BEN_PPL_GRP_RT_F');
3680: fnd_message.raise_error;
3681: end if;
3682: --
3683: close c168;
6071:
6072: delete from BEN_PER_TYP_RT_F
6073: where business_group_id = p_bg_id;
6074:
6075: delete from BEN_PPL_GRP_RT_F
6076: where business_group_id = p_bg_id;
6077:
6078: delete from BEN_PSTL_ZIP_RT_F
6079: where business_group_id = p_bg_id;