1170: is select 1 from BEN_PL_PCP_TYP
1171: where business_group_id = p_bg_id;
1172:
1173: cursor c294(p_bg_id NUMBER)
1174: is select 1 from BEN_OPTIP_F
1175: where business_group_id = p_bg_id;
1176:
1177:
1178: l_temp VARCHAR2(2);
5554: end if;
5555: --
5556: close c293;
5557:
5558: -- Testing for values in BEN_OPTIP_F
5559: --
5560: open c294(p_bg_id);
5561: --
5562: fetch c294 into l_temp;
5562: fetch c294 into l_temp;
5563: if c294%found then
5564: close c294;
5565: fnd_message.set_name('BEN','HR_7215_DT_CHILD_EXISTS');
5566: fnd_message.set_token('TABLE_NAME','BEN_OPTIP_F');
5567: fnd_message.raise_error;
5568: end if;
5569: --
5570: close c294;
6449:
6450: delete from BEN_PL_PCP_TYP
6451: where business_group_id = p_bg_id;
6452:
6453: delete from BEN_OPTIP_F
6454: where business_group_id = p_bg_id;
6455:
6456: end delete_below_bg;
6457: procedure delete_below_org(p_org_id NUMBER) is