283: hr_utility.set_location('hr_org_pre_delete.hr_org_predel_check',11);
284: select '1'
285: into l_test_func
286: from sys.dual where exists ( select 1
287: from per_assignments_f x
288: where x.source_organization_id = p_organization_id);
289: if SQL%ROWCOUNT >0 THEN
290: hr_utility.set_message(801,'HR_7333_ORG_ASSIGNMENTS_EXIST');
291:
300: hr_utility.set_location('hr_org_pre_delete.hr_org_predel_check',12);
301: select '1'
302: into l_test_func
303: from sys.dual where exists ( select 1
304: from per_assignments_f x
305: where x.organization_id = p_organization_id);
306: if SQL%ROWCOUNT >0 THEN
307: hr_utility.set_message(801,'HR_7333_ORG_ASSIGNMENTS_EXIST');
308: hr_utility.raise_error;
498: null;
499: end;
500: --
501: begin
502: -- Doing check on PER_ASSIGNMENTS_F.
503: hr_utility.set_location('hr_org_pre_delete.hr_strong_bg_chk',3);
504: select '1'
505: into l_test_func
506: from sys.dual
504: select '1'
505: into l_test_func
506: from sys.dual
507: where exists ( select 1
508: from PER_ASSIGNMENTS_F x
509: where x.SOURCE_ORGANIZATION_ID = p_organization_id);
510: --
511: if SQL%ROWCOUNT >0 THEN
512: hr_utility.set_message(801,'HR_6718_BG_ASS_EXIST');
517: null;
518: end;
519: --
520: begin
521: -- Doing check on PER_ASSIGNMENTS_F.
522: hr_utility.set_location('hr_org_pre_delete.hr_strong_bg_chk',4);
523: select '1'
524: into l_test_func
525: from sys.dual
523: select '1'
524: into l_test_func
525: from sys.dual
526: where exists ( select 1
527: from PER_ASSIGNMENTS_F x
528: where x.ORGANIZATION_ID = p_organization_id);
529: --
530: if SQL%ROWCOUNT >0 THEN
531: hr_utility.set_message(801,'HR_6718_BG_ASS_EXIST');