318: is select 1 from BEN_EXT_INCL_DATA_ELMT
319: where business_group_id = p_bg_id;
320:
321: cursor c80(p_bg_id NUMBER)
322: is select 1 from BEN_EXT_RCD_IN_FILE
323: where business_group_id = p_bg_id;
324:
325: cursor c81(p_bg_id NUMBER)
326: is select 1 from BEN_REGN_FOR_REGY_BODY_F
2362: --
2363: close c79;
2364:
2365: --
2366: -- Testing for values in BEN_EXT_RCD_IN_FILE
2367: --
2368: open c80(p_bg_id);
2369: --
2370: fetch c80 into l_temp;
2370: fetch c80 into l_temp;
2371: if c80%found then
2372: close c80;
2373: fnd_message.set_name('BEN','HR_7215_DT_CHILD_EXISTS');
2374: fnd_message.set_token('TABLE_NAME','BEN_EXT_RCD_IN_FILE');
2375: fnd_message.raise_error;
2376: end if;
2377: --
2378: close c80;
5810:
5811: delete from BEN_EXT_INCL_DATA_ELMT
5812: where business_group_id = p_bg_id;
5813:
5814: delete from BEN_EXT_RCD_IN_FILE
5815: where business_group_id = p_bg_id;
5816:
5817: delete from BEN_REGN_FOR_REGY_BODY_F
5818: where business_group_id = p_bg_id;