[Home] [Help]
5216: FETCH c_check_valid_merge INTO l_dup_reln_id, l_request_id, l_to_rel_status;
5217: IF ((c_check_valid_merge%FOUND) AND
5218: (l_request_id <> hz_utility_pub.request_id) AND
5219: (l_to_rel_status = 'A' OR (l_to_rel_status = 'I' AND l_from_rel_status = 'I'))
5220: AND (HZ_PARTY_MERGE.g_automerge_flag = 'N') ) THEN
5221: CLOSE c_check_valid_merge;
5222: FND_MESSAGE.SET_NAME('AR', 'HZ_RELN_TRANSFER_NOT_ALLOWED');
5223: FND_MESSAGE.SET_TOKEN('FROMID',p_from_id);
5224: FND_MSG_PUB.ADD;
5225: x_return_status := FND_API.G_RET_STS_ERROR;
5226: CLOSE c_check_valid_merge;
5227: RETURN;
5228:
5229: ELSIF c_check_valid_merge%FOUND AND HZ_PARTY_MERGE.g_automerge_flag = 'Y' AND l_to_rel_status = 'A' THEN
5230:
5231: --bug 6996390
5232: ----Start of DlProject Phase2--------------------
5233: do_hierarchy_nodes_merge(p_from_id => p_from_id,
5678: FETCH c_check_valid_merge INTO l_dup_reln_id, l_request_id, l_to_rel_status;
5679: IF ((c_check_valid_merge%FOUND) AND
5680: (l_request_id <> hz_utility_pub.request_id) AND
5681: (l_to_rel_status = 'A' OR (l_to_rel_status = 'I' AND l_from_rel_status = 'I'))
5682: AND (HZ_PARTY_MERGE.g_automerge_flag = 'N')) THEN
5683:
5684: FND_MESSAGE.SET_NAME('AR', 'HZ_RELN_TRANSFER_NOT_ALLOWED');
5685: FND_MESSAGE.SET_TOKEN('FROMID',p_from_id);
5686: FND_MSG_PUB.ADD;
5687: x_return_status := FND_API.G_RET_STS_ERROR;
5688: CLOSE c_check_valid_merge;
5689: RETURN;
5690:
5691: ELSIF c_check_valid_merge%FOUND AND HZ_PARTY_MERGE.g_automerge_flag = 'Y' AND l_to_rel_status = 'A' THEN
5692:
5693: --bug 6996390
5694: ----Start of DlProject Phase2--------------------
5695: do_hierarchy_nodes_merge(p_from_id => p_from_id,
7078:
7079:
7080: BEGIN
7081:
7082: IF HZ_PARTY_MERGE.g_merge_reason_code = 'DUPLICATE_RELN_PARTY' THEN
7083: x_return_status := 'S';
7084: return;
7085: END IF;
7086: