194: l_access_profile_rec AS_ACCESS_PUB.Access_Profile_Rec_Type;
195:
196: cursor resource_access_csr is
197: select 'X'
198: from as_accesses_all a
199: where a.sales_lead_id = p_sales_lead_id
200: and a.owner_flag = 'Y'
201: and a.salesforce_id = p_identity_salesforce_id;
202:
202:
203: cursor manager_access_csr(p_resource_id number) is
204:
205: select 'X'
206: from as_accesses_all a
207: where a.sales_lead_id = p_sales_lead_id
208: and EXISTS (select 'x'
209: from as_rpt_managers_v rm
210: where a.salesforce_id = rm.resource_id
214: or (rm.parent_resource_id <> rm.resource_id)));
215:
216: cursor mgr_i_access_csr(p_resource_id number) is
217: select 'X'
218: from as_accesses_all a
219: where a.sales_lead_id = p_sales_lead_id
220: and a.owner_flag = 'Y'
221: and (EXISTS (select 'x'
222: from as_rpt_managers_v rm
224: and rm.parent_resource_id = p_resource_id));
225:
226: cursor admin_access_csr is
227: select 'x'
228: from as_accesses_all a
229: where a.sales_lead_id = p_sales_lead_id
230: and EXISTS (select 'x'
231: from as_rpt_admins_v rm
232: where a.salesforce_id = rm.salesforce_id
236: or (rm.salesforce_id <> p_identity_salesforce_id)));
237:
238: cursor admin_i_access_csr is
239: select 'x'
240: from as_accesses_all a
241: where a.sales_lead_id = p_sales_lead_id
242: and a.owner_flag = 'Y'
243: and EXISTS (select 'x'
244: from as_rpt_admins_v rm
246: and rm.parent_sales_group_id = p_admin_group_id);
247:
248: cursor am_mgr_access_csr(p_resource_id number) is
249: select 'x'
250: from as_sales_leads lead, as_accesses_all a, as_rpt_managers_v rm
251: where lead.customer_id = a.customer_id
252: and a.salesforce_id = rm.resource_id
253: and a.salesforce_role_code = 'AM'
254: and rm.parent_resource_id = p_resource_id
255: and lead.sales_lead_id = p_sales_lead_id;
256:
257: cursor am_admin_access_csr is
258: select 'x'
259: from as_sales_leads lead, as_accesses_all a, as_rpt_admins_v rm
260: where lead.customer_id = a.customer_id
261: and a.salesforce_id = rm.salesforce_id
262: and a.salesforce_role_code = 'AM'
263: and rm.parent_sales_group_id = p_admin_group_id
499: l_access_profile_rec AS_ACCESS_PUB.Access_Profile_Rec_Type;
500:
501: cursor resource_access_csr is
502: select 'X'
503: from as_accesses_all a
504: where a.lead_id = p_lead_id
505: and a.owner_flag = 'Y'
506: and a.salesforce_id = p_identity_salesforce_id;
507:
506: and a.salesforce_id = p_identity_salesforce_id;
507:
508: cursor manager_access_csr(p_resource_id number) is
509: select 'X'
510: from as_accesses_all a
511: where a.lead_id = p_lead_id
512: and EXISTS (select 'x'
513: from as_rpt_managers_v rm
514: where a.salesforce_id = rm.resource_id
518: or (rm.parent_resource_id <> rm.resource_id)));
519:
520: cursor am_mgr_access_csr(p_resource_id number) is
521: select 'x'
522: from as_leads_all lead, as_accesses_all a, as_rpt_managers_v rm
523: where lead.customer_id = a.customer_id
524: and a.salesforce_id = rm.resource_id
525: and a.salesforce_role_code = 'AM'
526: and rm.parent_resource_id = p_resource_id
527: and lead.lead_id = p_lead_id;
528:
529: cursor mgr_i_access_csr(p_resource_id number) is
530: select 'X'
531: from as_accesses_all a
532: where a.lead_id = p_lead_id
533: and a.owner_flag = 'Y'
534: and (EXISTS (select 'x'
535: from as_rpt_managers_v rm
537: and rm.parent_resource_id = p_resource_id));
538:
539: cursor admin_access_csr is
540: select 'x'
541: from as_accesses_all a
542: where a.lead_id = p_lead_id
543: and EXISTS (select 'x'
544: from as_rpt_admins_v rm
545: where a.salesforce_id = rm.salesforce_id
549: or (rm.salesforce_id <> p_identity_salesforce_id)));
550:
551: cursor admin_i_access_csr is
552: select 'x'
553: from as_accesses_all a
554: where a.lead_id = p_lead_id
555: and a.owner_flag = 'Y'
556: and EXISTS (select 'x'
557: from as_rpt_admins_v rm
559: and rm.parent_sales_group_id = p_admin_group_id);
560:
561: cursor am_admin_access_csr is
562: select 'x'
563: from as_leads_all lead, as_accesses_all a, as_rpt_admins_v rm
564: where lead.customer_id = a.customer_id
565: and a.salesforce_id = rm.salesforce_id
566: and a.salesforce_role_code = 'AM'
567: and rm.parent_sales_group_id = p_admin_group_id
756: function is_account_manager (p_salesforce_id in number, p_customer_id in number)
757: RETURN BOOLEAN IS
758: cursor account_mgr_csr is
759: select 'x'
760: from as_accesses_all
761: where salesforce_id = p_salesforce_id
762: and salesforce_role_code = 'AM'
763: and customer_id = p_customer_id
764: and lead_id is null
780: function is_sales_lead_owner_row (p_access_id in number)
781: RETURN BOOLEAN IS
782: cursor owner_csr is
783: select 'x'
784: from as_accesses_all
785: where access_id = p_access_id
786: and owner_flag = 'Y';
787:
788: l_tmp varchar2(1);
802: procedure unmark_opp_owner_flag(p_lead_id in number, p_access_id in number) is
803:
804: cursor owner_exist_csr is
805: select 'x'
806: from as_accesses_all
807: where lead_id = p_lead_id
808: and access_id <> p_access_id
809: and owner_flag = 'Y';
810:
815: close owner_exist_csr;
816:
817: if l_var is not null
818: then
819: update as_accesses_all
820: set object_version_number = nvl(object_version_number,0) + 1, owner_flag = 'N'
821: where lead_id = p_lead_id
822: and access_id <> p_access_id;
823: end if;
827: procedure unmark_owner_flag(p_sales_lead_id in number, p_access_id in number) is
828:
829: cursor owner_exist_csr is
830: select 'x'
831: from as_accesses_all
832: where sales_lead_id = p_sales_lead_id
833: and access_id <> p_access_id
834: and owner_flag = 'Y';
835:
840: close owner_exist_csr;
841:
842: if l_var is not null
843: then
844: update as_accesses_all
845: set object_version_number = nvl(object_version_number,0) + 1, owner_flag = 'N'
846: where sales_lead_id = p_sales_lead_id
847: and access_id <> p_access_id;
848: end if;
1576: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1577: THEN
1578: x_return_status := fnd_api.g_ret_sts_error;
1579: FND_MESSAGE.Set_Name('AS', 'API_INVALID_INFO');
1580: FND_MESSAGE.Set_Token('ROW', 'AS_ACCESSES', TRUE);
1581: FND_MSG_PUB.ADD;
1582: END IF;
1583: end if;
1584:
1591: function duplicate_salesTeam(p_sales_team_rec in SALES_TEAM_REC_TYPE) return boolean
1592: is
1593: cursor get_dup_salesTeam_csr is
1594: select access_id
1595: from as_accesses
1596: where customer_id = p_sales_team_rec.customer_id
1597: and nvl(lead_id, -99) = nvl(p_sales_team_rec.lead_id, -99)
1598: and nvl(sales_lead_id, -99) = nvl(p_sales_team_rec.sales_lead_id, -99)
1599: and salesforce_id = p_sales_team_rec.salesforce_id
1678: where sl.sales_lead_id = pc_sales_lead_id;
1679:
1680: cursor get_dup_access_id_csr(p_sales_team_rec in SALES_TEAM_REC_TYPE) is
1681: select access_id
1682: from as_accesses
1683: where customer_id = p_sales_team_rec.customer_id
1684: and nvl(address_id, -99) = nvl(p_sales_team_rec.address_id, -99)
1685: and nvl(lead_id, -99) = nvl(p_sales_team_rec.lead_id, -99)
1686: and nvl(sales_lead_id, -99) = nvl(p_sales_team_rec.sales_lead_id, -99)
2099: close get_lead_creation_date_csr;
2100:
2101: end if;
2102:
2103: as_accesses_pkg.insert_row(
2104: X_Rowid => l_rowid,
2105: X_Access_Id => l_access_id,
2106: X_Last_Update_Date => SYSDATE,
2107: X_Last_Updated_By => FND_GLOBAL.User_Id,
2266: ) is
2267:
2268: cursor get_access_info_csr(p_access_id NUMBER) is
2269: select 1
2270: from as_accesses
2271: where access_id = p_access_id;
2272:
2273: l_api_name CONSTANT VARCHAR2(30) := 'Delete_SalesTeam';
2274: l_api_version_number CONSTANT NUMBER := 2.0;
2555: END IF;
2556:
2557: l_is_owner := 'N';
2558:
2559: delete from as_accesses
2560: where access_id = p_sales_team_rec.access_id;
2561: -- the call of AS_OPP_OWNER_PVT.ASSIGN_OPPOWNER removed since OTS UI is validating before deleting
2562: -- somebody has to be an owner of the opportunity
2563:
2654: l_salesforce_role_code varchar2(30);
2655:
2656: cursor get_salesTeam_info_csr is
2657: select rowid, last_update_date
2658: from as_accesses
2659: where access_id = p_sales_team_rec.access_id
2660: for update of access_id nowait;
2661:
2662: cursor get_owner_flag (p_access_id number) is
2660: for update of access_id nowait;
2661:
2662: cursor get_owner_flag (p_access_id number) is
2663: select owner_flag
2664: from as_accesses_all
2665: where access_id = p_access_id;
2666:
2667: cursor get_salesforce_role_code (p_access_id number) is
2668: select salesforce_role_code
2665: where access_id = p_access_id;
2666:
2667: cursor get_salesforce_role_code (p_access_id number) is
2668: select salesforce_role_code
2669: from as_accesses_all
2670: where access_id = p_access_id;
2671:
2672: l_debug BOOLEAN := FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
2673: l_module CONSTANT VARCHAR2(255) := 'as.plsql.acspv.Update_SalesTeam';
2940: then
2941: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
2942: THEN
2943: FND_MESSAGE.Set_Name('AS', 'API_RECORD_CHANGED');
2944: FND_MESSAGE.Set_Token('INFO', 'AS_ACCESSES', FALSE);
2945: FND_MSG_PUB.ADD;
2946: END IF;
2947: RAISE FND_API.G_EXC_ERROR;
2948: end if;
3083: l_sales_team_rec.owner_flag := FND_API.G_MISS_CHAR;
3084: end if;
3085:
3086:
3087: as_accesses_pkg.update_row(
3088: X_Rowid => l_rowid,
3089: X_Access_Id => l_sales_team_rec.access_id,
3090: X_Last_Update_Date => SYSDATE,
3091: X_Last_Updated_By => FND_GLOBAL.User_Id,
3140: if is_sales_lead_owner_row(l_sales_team_rec.access_id)
3141: then
3142: update as_leads_all set object_version_number = nvl(object_version_number,0) + 1, owner_salesforce_id = l_sales_team_rec.salesforce_id,
3143: --owner_sales_group_id = l_sales_team_rec.sales_group_id
3144: owner_sales_group_id = (select sales_group_id from as_accesses_all where access_id = l_sales_team_rec.access_id)
3145: where lead_id = l_sales_team_rec.lead_id;
3146: end if;
3147:
3148: if is_sales_lead_owner_row(x_access_id)
3273:
3274: cursor resource_access_csr is
3275:
3276: select 'X'
3277: from as_accesses_all a, hz_parties p,hz_relationships rel
3278: where a.customer_id = rel.object_id
3279: and rel.object_id = p.party_id
3280: and p.party_type in ('ORGANIZATION','PERSON')
3281: and rel.subject_id = p_customer_id
3287:
3288: cursor manager_access_csr(p_resource_id number) is
3289:
3290: select 'X'
3291: from as_accesses_all a, as_rpt_managers_v rm,
3292: hz_parties p,hz_relationships rel
3293: where a.customer_id = rel.object_id
3294: and rel.object_id = p.party_id
3295: and p.party_type in ('ORGANIZATION','PERSON')
3308: and p.party_type in ('ORGANIZATION','PERSON')
3309: and rel.subject_id = p_customer_id
3310: and rel.SUBJECT_TABLE_NAME = 'HZ_PARTIES'
3311: and rel.OBJECT_TABLE_NAME = 'HZ_PARTIES'
3312: and exists (select 1 from as_accesses_all a ,as_rpt_admins_v rm
3313: where a.salesforce_id = rm.salesforce_id
3314: and a.customer_id = rel.object_id
3315: and rm.parent_sales_group_id = p_admin_group_id)
3316: and rownum = 1;
3393:
3394: cursor resource_access_csr is
3395:
3396: select 'X'
3397: from as_accesses_all a, hz_parties p,hz_relationships rel
3398: where a.customer_id = rel.object_id
3399: and rel.object_id = p.party_id
3400: and p.party_type in ('ORGANIZATION','PERSON')
3401: and rel.subject_id = p_customer_id
3408: and rownum = 1;
3409:
3410: cursor manager_access_csr(p_resource_id number) is
3411: select 'X'
3412: from as_accesses_all a,
3413: hz_parties p, hz_relationships rel
3414: where a.customer_id = rel.object_id
3415: and rel.object_id = p.party_id
3416: and p.party_type in ('ORGANIZATION','PERSON')
3428: or (rm.parent_resource_id <> rm.resource_id))));
3429:
3430: cursor mgr_i_access_csr(p_resource_id number) is
3431: select 'X'
3432: from as_accesses_all a, hz_parties p, hz_relationships rel
3433: where a.customer_id = rel.object_id
3434: and rel.object_id = p.party_id
3435: and p.party_type in ('ORGANIZATION','PERSON')
3436: and rel.subject_id = p_customer_id
3443: and rm.parent_resource_id = p_resource_id));
3444:
3445: cursor admin_access_csr is
3446: select 'X'
3447: from as_accesses_all a, hz_parties p, hz_relationships rel
3448: where a.customer_id = rel.object_id
3449: and rel.object_id = p.party_id
3450: and p.party_type in ('ORGANIZATION','PERSON')
3451: and rel.subject_id = p_customer_id
3462: or (rm.salesforce_id <> p_identity_salesforce_id)));
3463:
3464: cursor admin_i_access_csr is
3465: select 'x'
3466: from as_accesses_all a, hz_parties p, hz_relationships rel
3467: where a.customer_id = rel.object_id
3468: and rel.object_id = p.party_id
3469: and p.party_type in ('ORGANIZATION', 'PERSON')
3470: and rel.subject_id = p_customer_id
3582:
3583: cursor resource_access_csr is
3584:
3585: select 'X'
3586: from as_accesses_all
3587: where customer_id = p_customer_id
3588: and salesforce_id = p_identity_salesforce_id;
3589:
3590:
3589:
3590:
3591: cursor manager_access_csr(p_resource_id number) is
3592: select 'X'
3593: from as_accesses_all a
3594: where customer_id = p_customer_id
3595: and (EXISTS (select 'X'
3596: from as_rpt_managers_v rm
3597: where a.salesforce_id = rm.resource_id
3598: and rm.parent_resource_id = p_resource_id));
3599:
3600: cursor admin_access_csr is
3601: select 'X'
3602: from as_accesses_all a
3603: where customer_id = p_customer_id
3604: and EXISTS (select 'x'
3605: from as_rpt_admins_v rm
3606: where a.salesforce_id = rm.salesforce_id
3804:
3805: cursor resource_access_csr is
3806:
3807: select 'X'
3808: from as_accesses_all
3809: where customer_id = p_customer_id
3810: and lead_id is null
3811: and sales_lead_id is null
3812: and team_leader_flag = 'Y'
3814:
3815:
3816: cursor manager_access_csr(p_resource_id number) is
3817: select 'X'
3818: from as_accesses_all a
3819: where customer_id = p_customer_id
3820: and lead_id is null
3821: and sales_lead_id is null
3822: and (EXISTS (select 'X'
3828: or (rm.parent_resource_id <> rm.resource_id))));
3829:
3830: cursor mgr_i_access_csr(p_resource_id number) is
3831: select 'X'
3832: from as_accesses_all a
3833: where a.customer_id = p_customer_id
3834: and lead_id is null
3835: and sales_lead_id is null
3836: and a.team_leader_flag = 'Y'
3840: and rm.parent_resource_id = p_resource_id));
3841:
3842: cursor admin_access_csr is
3843: select 'X'
3844: from as_accesses_all a
3845: where customer_id = p_customer_id
3846: and lead_id is null
3847: and sales_lead_id is null
3848: and EXISTS (select 'x'
3854: or (rm.salesforce_id <> p_identity_salesforce_id)));
3855:
3856: cursor admin_i_access_csr is
3857: select 'x'
3858: from as_accesses_all a
3859: where a.customer_id = p_customer_id
3860: and lead_id is null
3861: and sales_lead_id is null
3862: and a.team_leader_flag = 'Y'
4093: l_access_profile_rec AS_ACCESS_PUB.Access_Profile_Rec_Type;
4094:
4095: cursor resource_access_csr is
4096: select 'X'
4097: from as_accesses_all a
4098: where a.sales_lead_id = p_sales_lead_id
4099: and (a.team_leader_flag = 'Y' or a.owner_flag = 'Y')
4100: and a.salesforce_id = p_identity_salesforce_id;
4101:
4101:
4102: cursor manager_access_csr(p_resource_id number) is
4103:
4104: select 'X'
4105: from as_accesses_all a
4106: where a.sales_lead_id = p_sales_lead_id
4107: and EXISTS (select 'x'
4108: from as_rpt_managers_v rm
4109: where a.salesforce_id = rm.resource_id
4113: or (rm.parent_resource_id <> rm.resource_id)));
4114:
4115: cursor mgr_i_access_csr(p_resource_id number) is
4116: select 'X'
4117: from as_accesses_all a
4118: where a.sales_lead_id = p_sales_lead_id
4119: and (a.team_leader_flag = 'Y' or a.owner_flag = 'Y')
4120: and (EXISTS (select 'x'
4121: from as_rpt_managers_v rm
4123: and rm.parent_resource_id = p_resource_id));
4124:
4125: cursor admin_access_csr is
4126: select 'x'
4127: from as_accesses_all a
4128: where a.sales_lead_id = p_sales_lead_id
4129: and EXISTS (select 'x'
4130: from as_rpt_admins_v rm
4131: where a.salesforce_id = rm.salesforce_id
4135: or (rm.salesforce_id <> p_identity_salesforce_id)));
4136:
4137: cursor admin_i_access_csr is
4138: select 'x'
4139: from as_accesses_all a
4140: where a.sales_lead_id = p_sales_lead_id
4141: and (a.team_leader_flag = 'Y' or a.owner_flag = 'Y')
4142: and EXISTS (select 'x'
4143: from as_rpt_admins_v rm
4145: and rm.parent_sales_group_id = p_admin_group_id);
4146:
4147: cursor am_mgr_access_csr(p_resource_id number) is
4148: select 'x'
4149: from as_sales_leads lead, as_accesses_all a, as_rpt_managers_v rm
4150: where lead.customer_id = a.customer_id
4151: and a.salesforce_id = rm.resource_id
4152: and a.salesforce_role_code = 'AM'
4153: and rm.parent_resource_id = p_resource_id
4154: and lead.sales_lead_id = p_sales_lead_id;
4155:
4156: cursor am_admin_access_csr is
4157: select 'x'
4158: from as_sales_leads lead, as_accesses_all a, as_rpt_admins_v rm
4159: where lead.customer_id = a.customer_id
4160: and a.salesforce_id = rm.salesforce_id
4161: and a.salesforce_role_code = 'AM'
4162: and rm.parent_sales_group_id = p_admin_group_id
4393: l_access_profile_rec AS_ACCESS_PUB.Access_Profile_Rec_Type;
4394:
4395: cursor resource_access_csr is
4396: select 'X'
4397: from as_accesses_all a
4398: where a.sales_lead_id = p_sales_lead_id
4399: and a.salesforce_id = p_identity_salesforce_id;
4400:
4401: cursor manager_access_csr(p_resource_id number) is
4400:
4401: cursor manager_access_csr(p_resource_id number) is
4402:
4403: select 'X'
4404: from as_accesses_all a
4405: where a.sales_lead_id = p_sales_lead_id
4406: and EXISTS (select 'x'
4407: from as_rpt_managers_v rm
4408: where a.salesforce_id = rm.resource_id
4410:
4411:
4412: cursor admin_access_csr is
4413: select 'x'
4414: from as_accesses_all a
4415: where a.sales_lead_id = p_sales_lead_id
4416: and EXISTS (select 'x'
4417: from as_rpt_admins_v rm
4418: where a.salesforce_id = rm.salesforce_id
4419: and rm.parent_sales_group_id = p_admin_group_id);
4420:
4421: cursor am_mgr_access_csr(p_resource_id number) is
4422: select 'x'
4423: from as_sales_leads lead, as_accesses_all a, as_rpt_managers_v rm
4424: where lead.customer_id = a.customer_id
4425: and a.salesforce_id = rm.resource_id
4426: and a.salesforce_role_code = 'AM'
4427: and rm.parent_resource_id = p_resource_id
4428: and lead.sales_lead_id = p_sales_lead_id;
4429:
4430: cursor am_admin_access_csr is
4431: select 'x'
4432: from as_sales_leads lead, as_accesses_all a, as_rpt_admins_v rm
4433: where lead.customer_id = a.customer_id
4434: and a.salesforce_id = rm.salesforce_id
4435: and a.salesforce_role_code = 'AM'
4436: and rm.parent_sales_group_id = p_admin_group_id
4631: l_access_profile_rec AS_ACCESS_PUB.Access_Profile_Rec_Type;
4632:
4633: cursor resource_access_csr is
4634: select 'X'
4635: from as_accesses_all a
4636: where a.lead_id = p_opportunity_id
4637: and a.team_leader_flag = 'Y'
4638: and a.salesforce_id = p_identity_salesforce_id;
4639:
4639:
4640: cursor manager_access_csr(p_resource_id number) is
4641:
4642: select 'X'
4643: from as_accesses_all a
4644: where a.lead_id = p_opportunity_id
4645: and (EXISTS (select 'x'
4646: from as_rpt_managers_v rm
4647: where a.salesforce_id = rm.resource_id
4652: or (rm.parent_resource_id <> rm.resource_id))));
4653:
4654: cursor mgr_i_access_csr(p_resource_id number) is
4655: select 'X'
4656: from as_accesses_all a
4657: where a.lead_id = p_opportunity_id
4658: and a.team_leader_flag = 'Y'
4659: and (EXISTS (select 'x'
4660: from as_rpt_managers_v rm
4664: ));
4665:
4666: cursor admin_access_csr is
4667: select 'x'
4668: from as_accesses_all a
4669: where a.lead_id = p_opportunity_id
4670: and EXISTS (select 'x'
4671: from as_rpt_admins_v rm
4672: where a.salesforce_id = rm.salesforce_id
4676: or (rm.salesforce_id <> p_identity_salesforce_id)));
4677:
4678: cursor admin_i_access_csr is
4679: select 'x'
4680: from as_accesses_all a
4681: where a.lead_id = p_opportunity_id
4682: and a.team_leader_flag = 'Y'
4683: and EXISTS (select 'x'
4684: from as_rpt_admins_v rm
4686: and rm.parent_sales_group_id = p_admin_group_id);
4687:
4688: cursor am_mgr_access_csr(p_resource_id number) is
4689: select 'x'
4690: from as_leads opp, as_accesses_all a, as_rpt_managers_v rm
4691: where opp.customer_id = a.customer_id
4692: and a.salesforce_id = rm.resource_id
4693: and a.salesforce_role_code = 'AM'
4694: and rm.parent_resource_id = p_resource_id
4696: and sysdate between rm.start_date_active and nvl(rm.end_date_active, sysdate);
4697:
4698: cursor am_admin_access_csr is
4699: select 'x'
4700: from as_leads opp, as_accesses_all a, as_rpt_admins_v rm
4701: where opp.customer_id = a.customer_id
4702: and a.salesforce_id = rm.salesforce_id
4703: and a.salesforce_role_code = 'AM'
4704: and rm.parent_sales_group_id = p_admin_group_id
4981: l_access_profile_rec AS_ACCESS_PUB.Access_Profile_Rec_Type;
4982:
4983: cursor resource_access_csr is
4984: select 'X'
4985: from as_accesses_all a
4986: where a.lead_id = p_opportunity_id
4987: and a.salesforce_id = p_identity_salesforce_id;
4988:
4989: cursor manager_access_csr(p_resource_id number) is
4988:
4989: cursor manager_access_csr(p_resource_id number) is
4990:
4991: select 'X'
4992: from as_accesses_all a
4993: where a.lead_id = p_opportunity_id
4994: and EXISTS (select 'x'
4995: from as_rpt_managers_v rm
4996: where a.salesforce_id = rm.resource_id
4999: );
5000:
5001: cursor admin_access_csr is
5002: select 'x'
5003: from as_accesses_all a
5004: where a.lead_id = p_opportunity_id
5005: and EXISTS (select 'x'
5006: from as_rpt_admins_v rm
5007: where a.salesforce_id = rm.salesforce_id
5009:
5010:
5011: cursor am_mgr_access_csr(p_resource_id number) is
5012: select 'x'
5013: from as_leads opp, as_accesses_all a, as_rpt_managers_v rm
5014: where opp.customer_id = a.customer_id
5015: and a.salesforce_id = rm.resource_id
5016: and a.salesforce_role_code = 'AM'
5017: and rm.parent_resource_id = p_resource_id
5019: and sysdate between rm.start_date_active and nvl(rm.end_date_active, sysdate);
5020:
5021: cursor am_admin_access_csr is
5022: select 'x'
5023: from as_leads opp, as_accesses_all a, as_rpt_admins_v rm
5024: where opp.customer_id = a.customer_id
5025: and a.salesforce_id = rm.salesforce_id
5026: and a.salesforce_role_code = 'AM'
5027: and rm.parent_sales_group_id = p_admin_group_id