2341: select 'Error : Primary address exists'
2342: into v_dummy
2343: from sys.dual
2344: where exists (select 'address exists' 2345: from per_addresses pa 2346: where pa.person_id = p_person_id
2347: and pa.business_group_id +0 = p_business_group_id
2348: and (pa.address_id <> p_address_id
2349: or p_address_id is null)