[Home] [Help]
1052: BEGIN
1053: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_INSTERRACC || AS_GAR.G_START);
1054: x_return_status := FND_API.G_RET_STS_SUCCESS;
1055: /*------------------------------------------------------------------------------+
1056: | we are deleting all rows for the entity from as_territory_accesses prior to
1057: | inserting into it because the logic for removing only certain terr_id/access_id
1058: | combinations is very complex and could be slow..
1059: +-------------------------------------------------------------------------------*/
1060: DELETE FROM AS_TERRITORY_ACCESSES TACC
1056: | we are deleting all rows for the entity from as_territory_accesses prior to
1057: | inserting into it because the logic for removing only certain terr_id/access_id
1058: | combinations is very complex and could be slow..
1059: +-------------------------------------------------------------------------------*/
1060: DELETE FROM AS_TERRITORY_ACCESSES TACC
1061: WHERE TACC.access_id IN
1062: (SELECT ACC.access_id
1063: FROM AS_ACCESSES_ALL ACC
1064: WHERE customer_id = G_PARTY_ID
1066: AND sales_lead_id IS NULL);
1067: IF p_WinningTerrMember_tbl.resource_id.COUNT > 0 THEN
1068: FOR l_index IN p_WinningTerrMember_tbl.resource_id.FIRST..p_WinningTerrMember_tbl.resource_id.LAST LOOP
1069: IF p_WinningTerrMember_tbl.resource_type(l_index) = 'RS_EMPLOYEE' THEN
1070: INSERT INTO AS_TERRITORY_ACCESSES
1071: ( access_id,
1072: territory_id,
1073: user_territory_id,
1074: last_update_date,
1089: WHERE ACC.customer_id = G_PARTY_ID
1090: AND ACC.salesforce_id = p_WinningTerrMember_tbl.resource_id(l_index)
1091: AND ACC.sales_group_id = p_WinningTerrMember_tbl.group_id(l_index)
1092: AND NOT EXISTS ( SELECT 'Y'
1093: FROM AS_TERRITORY_ACCESSES TACC
1094: WHERE TACC.access_id = ACC.access_id
1095: AND TACC.territory_id = p_WinningTerrMember_tbl.terr_id(l_index)) ;
1096: ELSIF p_WinningTerrMember_tbl.resource_type(l_index) IN ('RS_PARTY','RS_PARTNER') THEN
1097: INSERT INTO AS_TERRITORY_ACCESSES
1093: FROM AS_TERRITORY_ACCESSES TACC
1094: WHERE TACC.access_id = ACC.access_id
1095: AND TACC.territory_id = p_WinningTerrMember_tbl.terr_id(l_index)) ;
1096: ELSIF p_WinningTerrMember_tbl.resource_type(l_index) IN ('RS_PARTY','RS_PARTNER') THEN
1097: INSERT INTO AS_TERRITORY_ACCESSES
1098: ( access_id,
1099: territory_id,
1100: user_territory_id,
1101: last_update_date,
1116: AND ACC.salesforce_id = p_WinningTerrMember_tbl.resource_id(l_index)
1117: AND NVL(ACC.sales_group_id,-777) = NVL(p_WinningTerrMember_tbl.group_id(l_index),-777)
1118: AND (ACC.partner_customer_id IS NOT NULL OR ACC.partner_cont_party_id IS NOT NULL )
1119: AND NOT EXISTS ( SELECT 'Y'
1120: FROM AS_TERRITORY_ACCESSES TACC
1121: WHERE TACC.access_id = ACC.access_id
1122: AND TACC.territory_id = p_WinningTerrMember_tbl.terr_id(l_index)) ;
1123: END IF;
1124: END LOOP;