780: --
781: --
782: cursor c1 is
783: select null
784: from per_all_people_f a
785: where a.person_id = p_bnf_person_id
786: and a.business_group_id + 0 = p_business_group_id
787: and p_validation_start_date <= effective_end_date
788: and p_validation_end_date >= effective_start_date
802: and nvl(p_bnf_person_id,hr_api.g_number)
803: <> nvl(ben_pbn_shd.g_old_rec.bnf_person_id, hr_api.g_number)
804: or not l_api_updating) then
805: --
806: -- check if bnf_person_id value exists in per_all_people_f table
807: --
808: open c1;
809: --
810: fetch c1 into l_dummy;
811: if c1%notfound then
812: --
813: close c1;
814: --
815: -- raise error as FK does not relate to PK in per_all_people
816: -- table.
817: --
818: ben_pbn_shd.constraint_error('BEN_PL_BNF_FK1');
819: --
884: --
885: --
886: cursor c1 is
887: select null
888: from per_all_people a, per_contact_relationships c
889: where a.person_id = p_ttee_person_id
890: and a.person_id = c.contact_person_id
891: and c.person_id = p_bnf_person_id
892: and p_validation_start_date <= nvl(c.date_end, p_validation_start_date)
910: and nvl(p_ttee_person_id,hr_api.g_number)
911: <> nvl(ben_pbn_shd.g_old_rec.ttee_person_id, hr_api.g_number)
912: or not l_api_updating) then
913: --
914: -- check if ttee_person_id value exists in per_all_people_f table
915: --
916: open c1;
917: --
918: fetch c1 into l_dummy;
919: if c1%notfound then
920: --
921: close c1;
922: --
923: -- raise error as FK does not relate to PK in per_all_people
924: -- table.
925: --
926: ben_pbn_shd.constraint_error('BEN_PL_BNF_FK2');
927: --
1693: if c1%notfound then
1694: --
1695: close c1;
1696: --
1697: -- raise error as FK does not relate to PK in per_all_people
1698: -- table.
1699: --
1700: ben_pbn_shd.constraint_error('BEN_PL_BNF_FK3');
1701: --