[Home] [Help]
867: SELECT NVL(source_id,0) INTO src_id FROM JTF_RS_RESOURCE_EXTNS RES WHERE resource_id = p_WinningTerrMember_tbl.resource_id(l_index);
868: AS_GAR.LOG(G_ENTITY || G_PARTY_ID ||' : BEFORE UPDATE :'|| '::' || 'RESOURCE/GROUP/RESOURCE_TYPE/SOURCE_ID::' || p_WinningTerrMember_tbl.resource_id(l_index)
869: || '/' || p_WinningTerrMember_tbl.group_id(l_index) || '/' || p_WinningTerrMember_tbl.resource_type(l_index) || '/' || src_id);
870: ---IF p_WinningTerrMember_tbl.resource_type(l_index) = 'RS_EMPLOYEE' THEN
871: UPDATE AS_ACCESSES_ALL ACC
872: SET object_version_number = nvl(object_version_number,0) + 1,
873: ACC.last_update_date = SYSDATE,
874: ACC.last_updated_by = FND_GLOBAL.USER_ID,
875: ACC.last_update_login = FND_GLOBAL.USER_ID,
910:
911: --added inline view in the select clause of Insert statement to fetch the salesforce role code for Employee resource --fix for bug 5869095
912:
913: IF p_WinningTerrMember_tbl.resource_type(l_index) = 'RS_EMPLOYEE' AND p_WinningTerrMember_tbl.group_id(l_index) IS NOT NULL THEN
914: INSERT INTO AS_ACCESSES_ALL
915: (access_id ,
916: last_update_date ,
917: last_updated_by,
918: creation_date ,
964: p_WinningTerrMember_tbl.group_id(l_index) sales_group_id,
965: 'Y' created_by_tap_flag
966: FROM DUAL
967: WHERE NOT EXISTS
968: ( SELECT NULL FROM AS_ACCESSES_ALL ACC
969: WHERE ACC.customer_id = G_PARTY_ID
970: AND ACC.lead_id IS NULL
971: AND ACC.sales_lead_id IS NULL
972: AND ACC.salesforce_id = p_WinningTerrMember_tbl.resource_id(l_index)
985: AND OPTIONS.APPLICATION_ID = VAL.APPLICATION_ID
986: AND OPTIONS.PROFILE_OPTION_NAME = 'AS_DEF_CUST_ST_ROLE') prf
987: WHERE asa.PERSON_ID = prf.EMPLOYEE_ID (+);
988: ELSIF p_WinningTerrMember_tbl.resource_type(l_index) IN ('RS_PARTY','RS_PARTNER') THEN
989: INSERT INTO AS_ACCESSES_ALL
990: (access_id ,
991: last_update_date ,
992: last_updated_by,
993: creation_date ,
1025: DECODE(p_WinningTerrMember_tbl.resource_type(l_index),'RS_PARTY',(SELECT source_id FROM JTF_RS_RESOURCE_EXTNS RES WHERE resource_id = p_WinningTerrMember_tbl.resource_id(l_index)),NULL),
1026: p_WinningTerrMember_tbl.org_id(l_index)
1027: FROM DUAL
1028: WHERE NOT EXISTS
1029: ( SELECT NULL FROM AS_ACCESSES_ALL ACC
1030: WHERE ACC.customer_id = G_PARTY_ID
1031: AND ACC.lead_id IS NULL
1032: AND ACC.sales_lead_id IS NULL
1033: AND ACC.salesforce_id = p_WinningTerrMember_tbl.resource_id(l_index)
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
1065: AND lead_id IS NULL
1066: AND sales_lead_id IS NULL);
1067: IF p_WinningTerrMember_tbl.resource_id.COUNT > 0 THEN
1084: FND_GLOBAL.USER_ID,
1085: SYSDATE,
1086: FND_GLOBAL.USER_ID,
1087: FND_GLOBAL.USER_ID
1088: FROM AS_ACCESSES_ALL ACC
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'
1110: FND_GLOBAL.USER_ID,
1111: SYSDATE,
1112: FND_GLOBAL.USER_ID,
1113: FND_GLOBAL.USER_ID
1114: FROM AS_ACCESSES_ALL ACC
1115: WHERE ACC.customer_id = G_PARTY_ID
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 )
1144:
1145: BEGIN
1146: AS_GAR.LOG(G_ENTITY || AS_GAR.G_PROCESS || AS_GAR.G_CC || AS_GAR.G_START);
1147: x_return_status := FND_API.G_RET_STS_SUCCESS;
1148: DELETE FROM AS_ACCESSES_ALL ACC
1149: WHERE customer_id = G_PARTY_ID
1150: AND lead_id IS NULL
1151: AND sales_lead_id IS NULL
1152: AND NVL(freeze_flag, 'N') <> 'Y'