443: END IF;
444:
445: -- foreign key validation
446:
447: -- validate HZ_PARTIES and party_id
448: IF p_orig_sys_reference_rec.owner_table_name = 'HZ_PARTIES' THEN
449: -- party_id is foreign key of hz_parties
450: -- Do not need to check during update because party_id is
451: -- non-updateable.
444:
445: -- foreign key validation
446:
447: -- validate HZ_PARTIES and party_id
448: IF p_orig_sys_reference_rec.owner_table_name = 'HZ_PARTIES' THEN
449: -- party_id is foreign key of hz_parties
450: -- Do not need to check during update because party_id is
451: -- non-updateable.
452: IF p_create_update_flag = 'C'
445: -- foreign key validation
446:
447: -- validate HZ_PARTIES and party_id
448: IF p_orig_sys_reference_rec.owner_table_name = 'HZ_PARTIES' THEN
449: -- party_id is foreign key of hz_parties
450: -- Do not need to check during update because party_id is
451: -- non-updateable.
452: IF p_create_update_flag = 'C'
453: AND p_orig_sys_reference_rec.owner_table_id IS NOT NULL
456: THEN
457: BEGIN
458: SELECT 'Y'
459: INTO l_dummy
460: FROM HZ_PARTIES
461: WHERE PARTY_ID = p_orig_sys_reference_rec.owner_table_id;
462: EXCEPTION
463: WHEN NO_DATA_FOUND THEN
464: fnd_message.set_name('AR', 'HZ_API_INVALID_FK');
463: WHEN NO_DATA_FOUND THEN
464: fnd_message.set_name('AR', 'HZ_API_INVALID_FK');
465: fnd_message.set_token('FK', 'owner_table_id');
466: fnd_message.set_token('COLUMN', 'party_id');
467: fnd_message.set_token('TABLE', 'hz_parties');
468: fnd_msg_pub.add;
469: x_return_status := fnd_api.g_ret_sts_error;
470: END;
471: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
469: x_return_status := fnd_api.g_ret_sts_error;
470: END;
471: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
472: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
473: p_message=>'owner_table_id is foreign key of hz_parties. ' ||
474: 'x_return_status = ' || x_return_status,
475: p_msg_level=>fnd_log.level_statement);
476: END IF;
477: