[Home] [Help]
252: FND_MSG_PUB.g_msg_level_threshold := FND_API.G_MISS_NUM;
253: end if; */
254:
255: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
256: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
257: fnd_message.Set_Token('TEXT', 'In ' || l_api_name);
258: fnd_msg_pub.Add;
259: END IF;
260:
253: end if; */
254:
255: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
256: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
257: fnd_message.Set_Token('TEXT', 'In ' || l_api_name);
258: fnd_msg_pub.Add;
259: END IF;
260:
261: -- Initialize API return status to success
266: pv_workflow_pub.g_wf_lkup_serial,
267: pv_workflow_pub.g_wf_lkup_joint,
268: pv_workflow_pub.g_wf_lkup_broadcast)) then
269:
270: fnd_message.SET_NAME('PV', 'PV_INVALID_ASSIGN_TYPE');
271: fnd_message.SET_TOKEN('TYPE' , p_assignment_type);
272: fnd_msg_pub.ADD;
273: raise FND_API.G_EXC_ERROR;
274:
267: pv_workflow_pub.g_wf_lkup_joint,
268: pv_workflow_pub.g_wf_lkup_broadcast)) then
269:
270: fnd_message.SET_NAME('PV', 'PV_INVALID_ASSIGN_TYPE');
271: fnd_message.SET_TOKEN('TYPE' , p_assignment_type);
272: fnd_msg_pub.ADD;
273: raise FND_API.G_EXC_ERROR;
274:
275: end if;
275: end if;
276:
277: if p_bypass_cm_ok_flag is NULL then
278:
279: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
280: fnd_message.SET_TOKEN('TEXT' , 'Bypass CM OK Flag Cannot be Null');
281: fnd_msg_pub.ADD;
282: raise FND_API.G_EXC_ERROR;
283:
276:
277: if p_bypass_cm_ok_flag is NULL then
278:
279: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
280: fnd_message.SET_TOKEN('TEXT' , 'Bypass CM OK Flag Cannot be Null');
281: fnd_msg_pub.ADD;
282: raise FND_API.G_EXC_ERROR;
283:
284: end if;
284: end if;
285:
286: if (p_entity is NULL) or p_entity not in ('OPPORTUNITY') then
287:
288: fnd_message.SET_NAME('PV', 'PV_INVALID_ENTITY_TYPE');
289: fnd_message.SET_TOKEN('TYPE' , p_entity);
290: fnd_msg_pub.ADD;
291: raise FND_API.G_EXC_ERROR;
292:
285:
286: if (p_entity is NULL) or p_entity not in ('OPPORTUNITY') then
287:
288: fnd_message.SET_NAME('PV', 'PV_INVALID_ENTITY_TYPE');
289: fnd_message.SET_TOKEN('TYPE' , p_entity);
290: fnd_msg_pub.ADD;
291: raise FND_API.G_EXC_ERROR;
292:
293: end if;
303: FOR x IN lc_opportunity(p_lead_id) LOOP
304: l_entity_name := x.description;
305: END LOOP;
306:
307: fnd_message.SET_NAME('PV', 'PV_OPP_ROUTING_CLOSED_OPP');
308: fnd_message.SET_TOKEN('OPPORTUNITY_NAME' , l_entity_name);
309: fnd_message.SET_TOKEN('LEAD_ID' , p_lead_id);
310: fnd_msg_pub.ADD;
311: RAISE FND_API.G_EXC_ERROR;
304: l_entity_name := x.description;
305: END LOOP;
306:
307: fnd_message.SET_NAME('PV', 'PV_OPP_ROUTING_CLOSED_OPP');
308: fnd_message.SET_TOKEN('OPPORTUNITY_NAME' , l_entity_name);
309: fnd_message.SET_TOKEN('LEAD_ID' , p_lead_id);
310: fnd_msg_pub.ADD;
311: RAISE FND_API.G_EXC_ERROR;
312: END IF;
305: END LOOP;
306:
307: fnd_message.SET_NAME('PV', 'PV_OPP_ROUTING_CLOSED_OPP');
308: fnd_message.SET_TOKEN('OPPORTUNITY_NAME' , l_entity_name);
309: fnd_message.SET_TOKEN('LEAD_ID' , p_lead_id);
310: fnd_msg_pub.ADD;
311: RAISE FND_API.G_EXC_ERROR;
312: END IF;
313: END LOOP;
315:
316:
317: if (p_partner_id_tbl.count = 0 or p_partner_id_tbl is null) then
318:
319: fnd_message.SET_NAME('PV', 'PV_NO_PRTNR_TO_ROUTE');
320: fnd_msg_pub.ADD;
321: raise FND_API.G_EXC_ERROR;
322:
323: end if;
331: if l_chk_pt_status_id is not null then exit; end if;
332: end loop;
333:
334: if l_chk_pt_status_id is not null then
335: fnd_message.SET_NAME('PV', 'PV_ROUTING_INVALID_PARTNER');
336: --fnd_message.SET_TOKEN('TEXT', 'Status of one or more partner is inactive. Unable to initiate assignment process' );
337: fnd_msg_pub.ADD;
338: raise FND_API.G_EXC_ERROR;
339: end if;
332: end loop;
333:
334: if l_chk_pt_status_id is not null then
335: fnd_message.SET_NAME('PV', 'PV_ROUTING_INVALID_PARTNER');
336: --fnd_message.SET_TOKEN('TEXT', 'Status of one or more partner is inactive. Unable to initiate assignment process' );
337: fnd_msg_pub.ADD;
338: raise FND_API.G_EXC_ERROR;
339: end if;
340:
344: fetch lc_get_user_type into l_user_category, l_source_id, l_user_id;
345: close lc_get_user_type;
346:
347: if l_user_category is null then
348: fnd_message.SET_NAME('PV', 'PV_INVALID_USER');
349: fnd_message.SET_TOKEN('P_USERNAME', p_creating_username);
350: fnd_msg_pub.ADD;
351: raise FND_API.G_EXC_ERROR;
352: end if;
345: close lc_get_user_type;
346:
347: if l_user_category is null then
348: fnd_message.SET_NAME('PV', 'PV_INVALID_USER');
349: fnd_message.SET_TOKEN('P_USERNAME', p_creating_username);
350: fnd_msg_pub.ADD;
351: raise FND_API.G_EXC_ERROR;
352: end if;
353:
357: close lc_opportunity;
358:
359: if l_lead_contact_id is null and fnd_profile.value('PV_OPPTY_CONTACT_REQUIRED') = 'Y' then
360:
361: fnd_message.SET_NAME('PV', 'PV_OPPTY_CONTACT_REQD');
362: fnd_msg_pub.ADD;
363: raise FND_API.G_EXC_ERROR;
364:
365: end if;
364:
365: end if;
366:
367: if l_lead_number is null then
368: fnd_message.SET_NAME('PV', 'PV_LEAD_NOT_FOUND');
369: fnd_message.SET_TOKEN('LEAD_ID', p_lead_id);
370: fnd_msg_pub.ADD;
371: raise FND_API.G_EXC_ERROR;
372: end if;
365: end if;
366:
367: if l_lead_number is null then
368: fnd_message.SET_NAME('PV', 'PV_LEAD_NOT_FOUND');
369: fnd_message.SET_TOKEN('LEAD_ID', p_lead_id);
370: fnd_msg_pub.ADD;
371: raise FND_API.G_EXC_ERROR;
372: end if;
373:
398: l_oppty_routing_log_rec.pt_contact_user_id := l_user_id;
399:
400:
401: if l_pt_org_party_id is null then
402: fnd_message.SET_NAME('PV', 'PV_USER_ORG_NOT_FOUND');
403: fnd_message.SET_TOKEN('P_USER_NAME' ,p_creating_username );
404: fnd_msg_pub.ADD;
405: raise FND_API.G_EXC_ERROR;
406: end if;
399:
400:
401: if l_pt_org_party_id is null then
402: fnd_message.SET_NAME('PV', 'PV_USER_ORG_NOT_FOUND');
403: fnd_message.SET_TOKEN('P_USER_NAME' ,p_creating_username );
404: fnd_msg_pub.ADD;
405: raise FND_API.G_EXC_ERROR;
406: end if;
407:
405: raise FND_API.G_EXC_ERROR;
406: end if;
407:
408: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
409: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
410: fnd_message.Set_token('TEXT', 'p_partner_id_tbl.count:' || p_partner_id_tbl.count);
411: fnd_msg_pub.Add;
412: end if;
413:
406: end if;
407:
408: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
409: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
410: fnd_message.Set_token('TEXT', 'p_partner_id_tbl.count:' || p_partner_id_tbl.count);
411: fnd_msg_pub.Add;
412: end if;
413:
414:
423:
424: -- VAD wants to work on it themselves
425:
426: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
427: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
428: fnd_message.SET_TOKEN('TEXT' , 'VAD submitting routing to themselves');
429: fnd_msg_pub.ADD;
430: end if;
431:
424: -- VAD wants to work on it themselves
425:
426: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
427: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
428: fnd_message.SET_TOKEN('TEXT' , 'VAD submitting routing to themselves');
429: fnd_msg_pub.ADD;
430: end if;
431:
432: pv_assign_util_pvt.GetWorkflowID (p_api_version_number => 1.0,
447: raise FND_API.G_EXC_ERROR;
448: end if;
449:
450: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
451: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
452: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.update_routing_stage' );
453: fnd_msg_pub.Add;
454: end if;
455:
448: end if;
449:
450: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
451: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
452: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.update_routing_stage' );
453: fnd_msg_pub.Add;
454: end if;
455:
456: pv_assignment_pvt.update_routing_stage (
479:
480: for i in 1 .. p_partner_id_tbl.count loop
481:
482: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
483: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
484: fnd_message.Set_token('TEXT', 'Running the cursor lc_validate_vad_pt for partner id:' || p_partner_id_tbl(i));
485: fnd_msg_pub.Add;
486: end if;
487:
480: for i in 1 .. p_partner_id_tbl.count loop
481:
482: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
483: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
484: fnd_message.Set_token('TEXT', 'Running the cursor lc_validate_vad_pt for partner id:' || p_partner_id_tbl(i));
485: fnd_msg_pub.Add;
486: end if;
487:
488: open lc_validate_vad_pt (pc_partner_id => p_partner_id_tbl(i), pc_vad_id => l_vad_id);
492: if l_pt_org_name is null then
493:
494: if l_vad_id = p_partner_id_tbl(i) and p_assignment_type <> pv_workflow_pub.g_wf_lkup_joint then
495:
496: fnd_message.SET_NAME('PV', 'PV_SELF_ADD_JOINT_ONLY');
497: fnd_msg_pub.ADD;
498: raise FND_API.G_EXC_ERROR;
499:
500: elsif l_vad_id = p_partner_id_tbl(i) and p_assignment_type = pv_workflow_pub.g_wf_lkup_joint then
504: open lc_get_pt_org_name (pc_partner_id => l_partner_id_tbl(i));
505: fetch lc_get_pt_org_name into l_pt_org_name;
506: close lc_get_pt_org_name;
507:
508: fnd_message.SET_NAME('PV', 'PV_NOT_INDIRECTLY_MANAGED');
509: fnd_message.SET_TOKEN('P_PARTNER_NAME' , l_pt_org_name);
510: fnd_msg_pub.ADD;
511: raise FND_API.G_EXC_ERROR;
512:
505: fetch lc_get_pt_org_name into l_pt_org_name;
506: close lc_get_pt_org_name;
507:
508: fnd_message.SET_NAME('PV', 'PV_NOT_INDIRECTLY_MANAGED');
509: fnd_message.SET_TOKEN('P_PARTNER_NAME' , l_pt_org_name);
510: fnd_msg_pub.ADD;
511: raise FND_API.G_EXC_ERROR;
512:
513: end if;
515:
516: end loop;
517:
518: else
519: fnd_message.SET_NAME('PV', 'PV_USER_NOT_VALID_CATEGORY');
520: fnd_message.SET_TOKEN('P_USER_NAME' ,p_creating_username);
521: fnd_msg_pub.ADD;
522: raise FND_API.G_EXC_ERROR;
523: end if; -- l_user_category = g_resource_party
516: end loop;
517:
518: else
519: fnd_message.SET_NAME('PV', 'PV_USER_NOT_VALID_CATEGORY');
520: fnd_message.SET_TOKEN('P_USER_NAME' ,p_creating_username);
521: fnd_msg_pub.ADD;
522: raise FND_API.G_EXC_ERROR;
523: end if; -- l_user_category = g_resource_party
524:
525: if p_assignment_type = pv_workflow_pub.g_wf_lkup_serial then
526: for v_count IN 1..l_partner_id_tbl.count loop
527:
528: if p_rank_tbl(v_count) IS NULL THEN
529: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
530: fnd_message.SET_TOKEN('TEXT' , 'Rank cannot be null for Serial Assignment');
531: fnd_msg_pub.ADD;
532:
533: raise FND_API.G_EXC_ERROR;
526: for v_count IN 1..l_partner_id_tbl.count loop
527:
528: if p_rank_tbl(v_count) IS NULL THEN
529: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
530: fnd_message.SET_TOKEN('TEXT' , 'Rank cannot be null for Serial Assignment');
531: fnd_msg_pub.ADD;
532:
533: raise FND_API.G_EXC_ERROR;
534: end if;
539:
540: for v_count IN 1..l_partner_id_tbl.count loop
541:
542: if p_rank_tbl(v_count) IS NULL THEN
543: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
544: fnd_message.SET_TOKEN('TEXT' , 'Rank cannot be null ');
545: fnd_msg_pub.ADD;
546:
547: raise FND_API.G_EXC_ERROR;
540: for v_count IN 1..l_partner_id_tbl.count loop
541:
542: if p_rank_tbl(v_count) IS NULL THEN
543: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
544: fnd_message.SET_TOKEN('TEXT' , 'Rank cannot be null ');
545: fnd_msg_pub.ADD;
546:
547: raise FND_API.G_EXC_ERROR;
548: end if;
561:
562: end loop;
563:
564: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
565: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
566: fnd_message.SET_TOKEN('TEXT' , 'Only 1 partner allowed in SINGLE assignment. ' ||
567: 'Highest ranked partner selected: ' || l_partner_id_tbl(l_highest_rank_pt_row));
568: fnd_msg_pub.ADD;
569: end if;
562: end loop;
563:
564: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
565: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
566: fnd_message.SET_TOKEN('TEXT' , 'Only 1 partner allowed in SINGLE assignment. ' ||
567: 'Highest ranked partner selected: ' || l_partner_id_tbl(l_highest_rank_pt_row));
568: fnd_msg_pub.ADD;
569: end if;
570:
574:
575: if p_partner_source_tbl(i) is NULL OR
576: p_partner_source_tbl(i) not in ('CAMPAIGN', 'MATCHING', 'TAP', 'SALESTEAM') then
577:
578: fnd_message.SET_NAME('PV', 'PV_NOT_VALID_SOURCE_TYPE');
579: fnd_message.SET_TOKEN('P_SOURCE_TYPE' ,p_partner_source_tbl(i));
580: fnd_message.SET_TOKEN('P_PARTNER_ID', p_partner_id_tbl(i) );
581: fnd_msg_pub.ADD;
582:
575: if p_partner_source_tbl(i) is NULL OR
576: p_partner_source_tbl(i) not in ('CAMPAIGN', 'MATCHING', 'TAP', 'SALESTEAM') then
577:
578: fnd_message.SET_NAME('PV', 'PV_NOT_VALID_SOURCE_TYPE');
579: fnd_message.SET_TOKEN('P_SOURCE_TYPE' ,p_partner_source_tbl(i));
580: fnd_message.SET_TOKEN('P_PARTNER_ID', p_partner_id_tbl(i) );
581: fnd_msg_pub.ADD;
582:
583: raise FND_API.G_EXC_ERROR;
576: p_partner_source_tbl(i) not in ('CAMPAIGN', 'MATCHING', 'TAP', 'SALESTEAM') then
577:
578: fnd_message.SET_NAME('PV', 'PV_NOT_VALID_SOURCE_TYPE');
579: fnd_message.SET_TOKEN('P_SOURCE_TYPE' ,p_partner_source_tbl(i));
580: fnd_message.SET_TOKEN('P_PARTNER_ID', p_partner_id_tbl(i) );
581: fnd_msg_pub.ADD;
582:
583: raise FND_API.G_EXC_ERROR;
584:
590: -- setting PRM_KEEP_FLAG to 'Y' for sales team partners
591: -- ----------------------------------------------------------------------
592:
593: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
594: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
595: fnd_message.Set_token('TEXT', 'Running lc_get_access_details cursor' );
596: fnd_msg_pub.Add;
597: end if;
598:
591: -- ----------------------------------------------------------------------
592:
593: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
594: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
595: fnd_message.Set_token('TEXT', 'Running lc_get_access_details cursor' );
596: fnd_msg_pub.Add;
597: end if;
598:
599: open lc_get_access_details(p_lead_id);
611: where partner_customer_id = l_access_pt_id
612: and lead_id = p_lead_id;
613:
614: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
615: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
616: fnd_message.Set_Token('TEXT', 'Setting prm_keep_flag to Yes for the partner org ');
617: fnd_msg_pub.Add;
618: END IF;
619: end if;
612: and lead_id = p_lead_id;
613:
614: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
615: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
616: fnd_message.Set_Token('TEXT', 'Setting prm_keep_flag to Yes for the partner org ');
617: fnd_msg_pub.Add;
618: END IF;
619: end if;
620: end loop;
623: -- Start: Rivendell Changes
624: -- vansub
625:
626: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
627: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
628: fnd_message.Set_token('TEXT', 'Navigating through partner id table and call pv_assign_util_pvt.updateaccess' );
629: fnd_msg_pub.Add;
630: end if;
631:
624: -- vansub
625:
626: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
627: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
628: fnd_message.Set_token('TEXT', 'Navigating through partner id table and call pv_assign_util_pvt.updateaccess' );
629: fnd_msg_pub.Add;
630: end if;
631:
632: FOR i IN 1 .. l_partner_id_tbl.count
634:
635: IF l_access_pt_id IS NULL THEN
636:
637: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
638: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
639: fnd_message.Set_token('TEXT', 'Getting resource_id for partner id:' || p_partner_id_tbl(i));
640: fnd_msg_pub.Add;
641: end if;
642:
635: IF l_access_pt_id IS NULL THEN
636:
637: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
638: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
639: fnd_message.Set_token('TEXT', 'Getting resource_id for partner id:' || p_partner_id_tbl(i));
640: fnd_msg_pub.Add;
641: end if;
642:
643: OPEN get_resource_id ( l_partner_id_tbl(i));
644: FETCH get_resource_id INTO l_resource_id;
645: CLOSE get_resource_id;
646:
647: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
648: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
649: fnd_message.Set_token('TEXT', 'CAlling pv_assign_util_pvt.updateaccess for resource_id:' || l_resource_id);
650: fnd_msg_pub.Add;
651: end if;
652:
645: CLOSE get_resource_id;
646:
647: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
648: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
649: fnd_message.Set_token('TEXT', 'CAlling pv_assign_util_pvt.updateaccess for resource_id:' || l_resource_id);
650: fnd_msg_pub.Add;
651: end if;
652:
653: pv_assign_util_pvt.UpdateAccess(
669: x_msg_count => x_msg_count,
670: x_msg_data => x_msg_data);
671:
672: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
673: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
674: fnd_message.SET_TOKEN('TEXT' , 'Added partner to the sales team ..Access Id :'||l_access_id);
675: fnd_msg_pub.ADD;
676: end if;
677: ELSE
670: x_msg_data => x_msg_data);
671:
672: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
673: fnd_message.SET_NAME('PV', 'PV_DEBUG_MESSAGE');
674: fnd_message.SET_TOKEN('TEXT' , 'Added partner to the sales team ..Access Id :'||l_access_id);
675: fnd_msg_pub.ADD;
676: end if;
677: ELSE
678: IF l_partner_id_tbl(i) = l_access_pt_id THEN
683: WHERE partner_customer_id = l_access_pt_id
684: AND lead_id = p_lead_id;
685:
686: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
687: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
688: fnd_message.Set_Token('TEXT', 'Setting prm_keep_flag to Yes for the partner org ');
689: fnd_msg_pub.Add;
690: END IF;
691: END IF;
684: AND lead_id = p_lead_id;
685:
686: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
687: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
688: fnd_message.Set_Token('TEXT', 'Setting prm_keep_flag to Yes for the partner org ');
689: fnd_msg_pub.Add;
690: END IF;
691: END IF;
692: END IF;
695: -- End: Rivendell Changes
696: END LOOP;
697:
698: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
699: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
700: fnd_message.Set_token('TEXT', 'Calling pv_assign_util_pvt.getWorkFlowId API' );
701: fnd_msg_pub.Add;
702: end if;
703:
696: END LOOP;
697:
698: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
699: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
700: fnd_message.Set_token('TEXT', 'Calling pv_assign_util_pvt.getWorkFlowId API' );
701: fnd_msg_pub.Add;
702: end if;
703:
704: pv_assign_util_pvt.GetWorkflowID (p_api_version_number => 1.0,
721:
722: if l_wf_status = g_wf_status_open or l_routing_status = g_r_status_active then
723:
724: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
725: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
726: fnd_message.Set_token('TEXT', 'IN if l_wf_status = g_wf_status_open or l_routing_status = g_r_status_active' );
727: fnd_msg_pub.Add;
728: end if;
729:
722: if l_wf_status = g_wf_status_open or l_routing_status = g_r_status_active then
723:
724: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
725: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
726: fnd_message.Set_token('TEXT', 'IN if l_wf_status = g_wf_status_open or l_routing_status = g_r_status_active' );
727: fnd_msg_pub.Add;
728: end if;
729:
730: fnd_message.SET_NAME('PV', 'PV_EXISTING_WORKFLOW');
726: fnd_message.Set_token('TEXT', 'IN if l_wf_status = g_wf_status_open or l_routing_status = g_r_status_active' );
727: fnd_msg_pub.Add;
728: end if;
729:
730: fnd_message.SET_NAME('PV', 'PV_EXISTING_WORKFLOW');
731: fnd_message.SET_TOKEN('P_LEAD_ID' ,p_lead_id);
732: fnd_msg_pub.ADD;
733: raise FND_API.G_EXC_ERROR;
734:
727: fnd_msg_pub.Add;
728: end if;
729:
730: fnd_message.SET_NAME('PV', 'PV_EXISTING_WORKFLOW');
731: fnd_message.SET_TOKEN('P_LEAD_ID' ,p_lead_id);
732: fnd_msg_pub.ADD;
733: raise FND_API.G_EXC_ERROR;
734:
735: elsif l_wf_status in ('NEW', g_wf_status_closed) then
734:
735: elsif l_wf_status in ('NEW', g_wf_status_closed) then
736:
737: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
738: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
739: fnd_message.Set_token('TEXT', 'IN elsif l_wf_status is NEW or g_wf_status_closed then' );
740: fnd_msg_pub.Add;
741: end if;
742:
735: elsif l_wf_status in ('NEW', g_wf_status_closed) then
736:
737: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
738: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
739: fnd_message.Set_token('TEXT', 'IN elsif l_wf_status is NEW or g_wf_status_closed then' );
740: fnd_msg_pub.Add;
741: end if;
742:
743: -- the following is executed for new, recycled and abandoned workflows only
755: l_lead_workflow_rec.bypass_cm_ok_flag := p_bypass_cm_ok_flag;
756: l_lead_workflow_rec.latest_routing_flag := 'Y';
757:
758: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
759: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
760: fnd_message.Set_token('TEXT', 'Calling pv_assign_util_pvt.Create_LEad_Workflow_Row' );
761: fnd_msg_pub.Add;
762: end if;
763:
756: l_lead_workflow_rec.latest_routing_flag := 'Y';
757:
758: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
759: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
760: fnd_message.Set_token('TEXT', 'Calling pv_assign_util_pvt.Create_LEad_Workflow_Row' );
761: fnd_msg_pub.Add;
762: end if;
763:
764: pv_assign_util_pvt.Create_lead_workflow_row (
776: raise FND_API.G_EXC_ERROR;
777: end if;
778:
779: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
780: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
781: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.set_current_routing_flag' );
782: fnd_msg_pub.Add;
783: end if;
784: pv_assignment_pvt.set_current_routing_flag (
777: end if;
778:
779: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
780: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
781: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.set_current_routing_flag' );
782: fnd_msg_pub.Add;
783: end if;
784: pv_assignment_pvt.set_current_routing_flag (
785: p_api_version_number => 1.0,
797: raise FND_API.G_EXC_ERROR;
798: end if;
799:
800: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
801: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
802: fnd_message.Set_token('TEXT', 'Update as_leads_all table with auto_assignment_type = PRM, prm_assignment_type = p_assignment_type' );
803: fnd_msg_pub.Add;
804: end if;
805:
798: end if;
799:
800: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
801: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
802: fnd_message.Set_token('TEXT', 'Update as_leads_all table with auto_assignment_type = PRM, prm_assignment_type = p_assignment_type' );
803: fnd_msg_pub.Add;
804: end if;
805:
806: update as_leads_all
823: l_oppty_routing_log_rec.reason_code := NULL;
824: l_oppty_routing_log_rec.user_type := 'LAM';
825:
826: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
827: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
828: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.Create_Oppty_Routing_Log_Row' );
829: fnd_msg_pub.Add;
830: end if;
831:
824: l_oppty_routing_log_rec.user_type := 'LAM';
825:
826: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
827: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
828: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.Create_Oppty_Routing_Log_Row' );
829: fnd_msg_pub.Add;
830: end if;
831:
832: pv_assignment_pvt.Create_Oppty_Routing_Log_Row (
854:
855: if nvl(l_vad_id,-9999) <> l_partner_id_tbl(v_count) then
856:
857: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
858: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
859: fnd_message.Set_token('TEXT', 'Getting partner info using pv_assign_util_pvt.get_partner_info for partner id:' || l_partner_id_tbl(v_count) );
860: fnd_msg_pub.Add;
861: end if;
862:
855: if nvl(l_vad_id,-9999) <> l_partner_id_tbl(v_count) then
856:
857: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
858: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
859: fnd_message.Set_token('TEXT', 'Getting partner info using pv_assign_util_pvt.get_partner_info for partner id:' || l_partner_id_tbl(v_count) );
860: fnd_msg_pub.Add;
861: end if;
862:
863: pv_assign_util_pvt.get_partner_info(
879: raise FND_API.G_EXC_ERROR;
880: end if;
881:
882: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
883: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
884: fnd_message.Set_Token('TEXT', 'Size of l_rs_details_tbl: ' || l_rs_details_tbl.count);
885: fnd_msg_pub.Add;
886: END IF;
887:
880: end if;
881:
882: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
883: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
884: fnd_message.Set_Token('TEXT', 'Size of l_rs_details_tbl: ' || l_rs_details_tbl.count);
885: fnd_msg_pub.Add;
886: END IF;
887:
888: if l_rs_details_tbl.count > 0 then
906:
907: end loop;
908:
909: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
910: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
911: fnd_message.Set_Token('TEXT', 'Has CM decision maker: ' || l_has_cm_decision_maker ||
912: ' Has PT decision maker: ' || l_has_pt_decision_maker);
913: fnd_msg_pub.Add;
914: END IF;
907: end loop;
908:
909: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
910: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
911: fnd_message.Set_Token('TEXT', 'Has CM decision maker: ' || l_has_cm_decision_maker ||
912: ' Has PT decision maker: ' || l_has_pt_decision_maker);
913: fnd_msg_pub.Add;
914: END IF;
915:
919: close lc_get_pt_org_name;
920: end if;
921:
922: if l_has_cm_decision_maker <> 'Y' and p_bypass_cm_ok_flag = 'N' then
923: fnd_message.SET_NAME('PV', 'PV_NO_CM_DECISION_MAKER');
924: fnd_message.SET_TOKEN('P_PARTNER_NAME' , l_pt_org_name);
925: fnd_msg_pub.ADD;
926: raise FND_API.G_EXC_ERROR;
927: end if;
920: end if;
921:
922: if l_has_cm_decision_maker <> 'Y' and p_bypass_cm_ok_flag = 'N' then
923: fnd_message.SET_NAME('PV', 'PV_NO_CM_DECISION_MAKER');
924: fnd_message.SET_TOKEN('P_PARTNER_NAME' , l_pt_org_name);
925: fnd_msg_pub.ADD;
926: raise FND_API.G_EXC_ERROR;
927: end if;
928:
926: raise FND_API.G_EXC_ERROR;
927: end if;
928:
929: if l_has_pt_decision_maker <> 'Y' then
930: fnd_message.SET_NAME('PV', 'PV_NO_PT_DECISION_MAKER');
931: fnd_message.SET_TOKEN('P_PARTNER_NAME' , l_pt_org_name);
932: fnd_msg_pub.ADD;
933: raise FND_API.G_EXC_ERROR;
934: end if;
927: end if;
928:
929: if l_has_pt_decision_maker <> 'Y' then
930: fnd_message.SET_NAME('PV', 'PV_NO_PT_DECISION_MAKER');
931: fnd_message.SET_TOKEN('P_PARTNER_NAME' , l_pt_org_name);
932: fnd_msg_pub.ADD;
933: raise FND_API.G_EXC_ERROR;
934: end if;
935:
965: l_assignment_rec.wf_item_type := l_itemType;
966: l_assignment_rec.wf_item_key := l_itemKey;
967:
968: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
969: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
970: fnd_message.Set_token('TEXT', 'Calling pv_assign_util_pvt.Create_LEad_assignment_Row' );
971: fnd_msg_pub.Add;
972: end if;
973:
966: l_assignment_rec.wf_item_key := l_itemKey;
967:
968: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
969: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
970: fnd_message.Set_token('TEXT', 'Calling pv_assign_util_pvt.Create_LEad_assignment_Row' );
971: fnd_msg_pub.Add;
972: end if;
973:
974: pv_assign_util_pvt.Create_lead_assignment_row (
1001: l_party_notify_rec_tbl.RESPONSE_DATE.extend (l_new_resource_count);
1002: l_party_notify_rec_tbl.DECISION_MAKER_FLAG.extend(l_new_resource_count);
1003:
1004: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1005: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1006: fnd_message.Set_Token('TEXT', 'Adding to pv_party_notifications the following:');
1007: fnd_msg_pub.Add;
1008: END IF;
1009:
1002: l_party_notify_rec_tbl.DECISION_MAKER_FLAG.extend(l_new_resource_count);
1003:
1004: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1005: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1006: fnd_message.Set_Token('TEXT', 'Adding to pv_party_notifications the following:');
1007: fnd_msg_pub.Add;
1008: END IF;
1009:
1010: for i in l_bulk_running_count + 1 .. l_party_notify_rec_tbl.wf_item_type.count loop
1018: l_party_notify_rec_tbl.USER_NAME(i) := l_rs_details_tbl(i - l_bulk_running_count).user_name;
1019: l_party_notify_rec_tbl.DECISION_MAKER_FLAG(i):= l_rs_details_tbl(i - l_bulk_running_count).decision_maker_flag;
1020:
1021: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1022: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1023: fnd_message.Set_Token('TEXT', 'Assignment ID: ' || l_assignment_id ||
1024: '. Notification type: ' || l_party_notify_rec_tbl.NOTIFICATION_TYPE(i) ||
1025: '. Decision maker flag: ' || l_party_notify_rec_tbl.decision_maker_flag(i) ||
1026: '. Username: ' || l_party_notify_rec_tbl.USER_NAME(i));
1019: l_party_notify_rec_tbl.DECISION_MAKER_FLAG(i):= l_rs_details_tbl(i - l_bulk_running_count).decision_maker_flag;
1020:
1021: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1022: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1023: fnd_message.Set_Token('TEXT', 'Assignment ID: ' || l_assignment_id ||
1024: '. Notification type: ' || l_party_notify_rec_tbl.NOTIFICATION_TYPE(i) ||
1025: '. Decision maker flag: ' || l_party_notify_rec_tbl.decision_maker_flag(i) ||
1026: '. Username: ' || l_party_notify_rec_tbl.USER_NAME(i));
1027: fnd_msg_pub.Add;
1037:
1038: end loop; -- l_partner_id_tbl(count)
1039:
1040: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1041: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1042: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.bulk_cr_party_notification' );
1043: fnd_msg_pub.Add;
1044: end if;
1045:
1038: end loop; -- l_partner_id_tbl(count)
1039:
1040: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1041: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1042: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.bulk_cr_party_notification' );
1043: fnd_msg_pub.Add;
1044: end if;
1045:
1046: pv_assignment_pvt.bulk_cr_party_notification(
1067:
1068: if l_party_notify_rec_tbl.notification_type(i) = pv_assignment_pub.g_notify_type_matched_to then
1069:
1070: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1071: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1072: fnd_message.Set_token('TEXT', 'Calling pv_assig_util_pvt.update access for CMs resource id:' || l_party_notify_rec_tbl.resource_id(i) );
1073: fnd_msg_pub.Add;
1074: end if;
1075:
1068: if l_party_notify_rec_tbl.notification_type(i) = pv_assignment_pub.g_notify_type_matched_to then
1069:
1070: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1071: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1072: fnd_message.Set_token('TEXT', 'Calling pv_assig_util_pvt.update access for CMs resource id:' || l_party_notify_rec_tbl.resource_id(i) );
1073: fnd_msg_pub.Add;
1074: end if;
1075:
1076: pv_assign_util_pvt.updateAccess (
1102:
1103: end loop;
1104:
1105: if l_no_channel_mgrs then
1106: fnd_message.Set_Name('PV', 'PV_EMPTY_ROLE');
1107: fnd_msg_pub.Add;
1108: RAISE FND_API.G_EXC_ERROR;
1109: end if;
1110:
1127: l_attrib_values_rec.process_rule_id := p_process_rule_id;
1128: l_attrib_values_rec.process_name := pv_workflow_pub.g_wf_pcs_initiate_assignment;
1129:
1130: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1131: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1132: fnd_message.Set_Token('TEXT', 'before calling startworkflow Entity Amount'||l_entity_amount);
1133: fnd_msg_pub.Add;
1134: END IF;
1135:
1128: l_attrib_values_rec.process_name := pv_workflow_pub.g_wf_pcs_initiate_assignment;
1129:
1130: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1131: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1132: fnd_message.Set_Token('TEXT', 'before calling startworkflow Entity Amount'||l_entity_amount);
1133: fnd_msg_pub.Add;
1134: END IF;
1135:
1136:
1134: END IF;
1135:
1136:
1137: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1138: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1139: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.StartWorkflow' );
1140: fnd_msg_pub.Add;
1141: end if;
1142:
1135:
1136:
1137: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1138: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1139: fnd_message.Set_token('TEXT', 'Calling pv_assignment_pvt.StartWorkflow' );
1140: fnd_msg_pub.Add;
1141: end if;
1142:
1143: pv_assignment_pvt.StartWorkflow( p_api_version_number => 1.0,
1157: end if;
1158:
1159:
1160: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1161: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1162: fnd_message.Set_Token('TEXT', 'process rule id from create assignment'|| p_process_rule_id);
1163: fnd_msg_pub.Add;
1164: END IF;
1165:
1158:
1159:
1160: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1161: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1162: fnd_message.Set_Token('TEXT', 'process rule id from create assignment'|| p_process_rule_id);
1163: fnd_msg_pub.Add;
1164: END IF;
1165:
1166: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1163: fnd_msg_pub.Add;
1164: END IF;
1165:
1166: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1167: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1168: fnd_message.Set_token('TEXT', 'Calling PV_ASSIGN_UTIL_PVT.checkforErrors ' );
1169: fnd_msg_pub.Add;
1170: end if;
1171:
1164: END IF;
1165:
1166: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1167: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1168: fnd_message.Set_token('TEXT', 'Calling PV_ASSIGN_UTIL_PVT.checkforErrors ' );
1169: fnd_msg_pub.Add;
1170: end if;
1171:
1172:
1345: end if;
1346:
1347: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1348: THEN
1349: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1350: fnd_message.Set_Token('TEXT', 'In ' || l_api_name );
1351: fnd_msg_pub.Add;
1352: END IF;
1353:
1346:
1347: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1348: THEN
1349: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1350: fnd_message.Set_Token('TEXT', 'In ' || l_api_name );
1351: fnd_msg_pub.Add;
1352: END IF;
1353:
1354: -- Initialize API return status to success
1364:
1365: for j in 1+i .. p_rank_tbl.count loop
1366:
1367: if p_rank_tbl(i) = p_rank_tbl(j) then
1368: fnd_message.Set_Name('PV', 'PV_DUPLICATE_RANK');
1369: fnd_msg_pub.ADD;
1370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1371: end if;
1372:
1389: end loop;
1390:
1391: if p_partyTbl.count - l_rejected_cnt > 1 then
1392:
1393: fnd_message.Set_Name('PV', 'PV_MULTIPLE_PRTNR_SINGLE');
1394: fnd_msg_pub.ADD;
1395: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1396:
1397: end if;
1399: end if;
1400:
1401: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1402: THEN
1403: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1404: fnd_message.Set_Token('TEXT', 'Getting Assignment Details' );
1405: fnd_msg_pub.Add;
1406: END IF;
1407:
1400:
1401: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1402: THEN
1403: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1404: fnd_message.Set_Token('TEXT', 'Getting Assignment Details' );
1405: fnd_msg_pub.Add;
1406: END IF;
1407:
1408: open lc_get_assignment (pc_lead_id => p_lead_id,
1435: (l_assignment_status <> p_statusTbl(i)) then
1436:
1437: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1438: THEN
1439: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1440: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.validateResponse' );
1441: fnd_msg_pub.Add;
1442: END IF;
1443:
1436:
1437: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1438: THEN
1439: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1440: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.validateResponse' );
1441: fnd_msg_pub.Add;
1442: END IF;
1443:
1444: pv_assignment_pvt.validateResponse (
1461: if l_assignment_status <> p_statusTbl(i) then
1462:
1463: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1464: THEN
1465: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1466: fnd_message.Set_Token('TEXT', 'pv_Assignment_pvt.update_party_response' );
1467: fnd_msg_pub.Add;
1468: END IF;
1469:
1462:
1463: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1464: THEN
1465: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1466: fnd_message.Set_Token('TEXT', 'pv_Assignment_pvt.update_party_response' );
1467: fnd_msg_pub.Add;
1468: END IF;
1469:
1470: pv_assignment_pvt.update_party_response (
1487: end if;
1488:
1489: IF p_statustbl(i) = g_la_status_cm_rejected THEN
1490: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1491: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1492: fnd_message.Set_Token('TEXT', 'before removing preferred partner by calling pv_assign_util_pvt.removePreferredPartner');
1493: fnd_msg_pub.Add;
1494: END IF;
1495:
1488:
1489: IF p_statustbl(i) = g_la_status_cm_rejected THEN
1490: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1491: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1492: fnd_message.Set_Token('TEXT', 'before removing preferred partner by calling pv_assign_util_pvt.removePreferredPartner');
1493: fnd_msg_pub.Add;
1494: END IF;
1495:
1496: PV_ASSIGN_UTIL_PVT.removePreferedPartner
1511: RAISE FND_API.G_EXC_ERROR;
1512: END IF;
1513:
1514: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1515: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1516: fnd_message.Set_Token('TEXT', 'after removing preferred partner');
1517: fnd_msg_pub.Add;
1518: END IF;
1519: END IF;
1512: END IF;
1513:
1514: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1515: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1516: fnd_message.Set_Token('TEXT', 'after removing preferred partner');
1517: fnd_msg_pub.Add;
1518: END IF;
1519: END IF;
1520: end if;
1528: end if;
1529:
1530: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1531: THEN
1532: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1533: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.UpdateAssignment' );
1534: fnd_msg_pub.Add;
1535: END IF;
1536:
1529:
1530: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1531: THEN
1532: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1533: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.UpdateAssignment' );
1534: fnd_msg_pub.Add;
1535: END IF;
1536:
1537:
1571: -- because of the way the UI is implemented (partner link), this API get's called whenever anyone
1572: -- changes anything on that page even though the assignment list is not updated
1573: -- so instead of throwing an exception, just return
1574:
1575: -- fnd_message.set_name('PV', 'PV_NOT_DECISION_MAKER');
1576: -- fnd_msg_pub.ADD;
1577: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1578: return;
1579: end if;
1588:
1589: if p_statusTbl(i) in (g_la_status_cm_added,g_la_status_cm_add_app_for_pt) then
1590:
1591: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1592: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1593: fnd_message.Set_Token('TEXT', 'Adding new partner: ' || p_partyTbl(i));
1594: fnd_msg_pub.Add;
1595: END IF;
1596:
1589: if p_statusTbl(i) in (g_la_status_cm_added,g_la_status_cm_add_app_for_pt) then
1590:
1591: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
1592: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1593: fnd_message.Set_Token('TEXT', 'Adding new partner: ' || p_partyTbl(i));
1594: fnd_msg_pub.Add;
1595: END IF;
1596:
1597: l_rs_details_tbl.delete;
1598: l_vad_id := null;
1599:
1600: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1601: THEN
1602: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1603: fnd_message.Set_Token('TEXT', 'getting partner info of partner id:' || p_partyTbl(i));
1604: fnd_msg_pub.Add;
1605: END IF;
1606:
1599:
1600: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1601: THEN
1602: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1603: fnd_message.Set_Token('TEXT', 'getting partner info of partner id:' || p_partyTbl(i));
1604: fnd_msg_pub.Add;
1605: END IF;
1606:
1607:
1648: l_assignment_rec.wf_item_key := l_itemKey;
1649:
1650: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1651: THEN
1652: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1653: fnd_message.Set_Token('TEXT', 'Calling pv_assign_util_pvt.Create_lead_assignment_row');
1654: fnd_msg_pub.Add;
1655: END IF;
1656:
1649:
1650: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
1651: THEN
1652: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
1653: fnd_message.Set_Token('TEXT', 'Calling pv_assign_util_pvt.Create_lead_assignment_row');
1654: fnd_msg_pub.Add;
1655: END IF;
1656:
1657: pv_assign_util_pvt.Create_lead_assignment_row (
1763: l_reject_flag := true;
1764:
1765: else
1766:
1767: fnd_message.set_name('PV', 'PV_NOT_VALID_ASGNMENT_STATUS');
1768: fnd_message.set_token('P_PT_RESPONSE', l_pt_response_tbl(i));
1769: fnd_msg_pub.ADD;
1770:
1771: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1764:
1765: else
1766:
1767: fnd_message.set_name('PV', 'PV_NOT_VALID_ASGNMENT_STATUS');
1768: fnd_message.set_token('P_PT_RESPONSE', l_pt_response_tbl(i));
1769: fnd_msg_pub.ADD;
1770:
1771: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1772:
1844: p_data => x_msg_data);
1845:
1846: WHEN OTHERS THEN
1847: IF sqlcode = -20002 THEN
1848: fnd_message.Set_Name('PV', 'PV_WF_COMP_ACTY_ERR');
1849: fnd_msg_pub.Add;
1850: ELSE
1851: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1852: END IF;
2053: FND_MSG_PUB.g_msg_level_threshold := FND_API.G_MISS_NUM;
2054: end if;
2055:
2056: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2057: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2058: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || '. p_pt_response=' || p_pt_response);
2059: fnd_msg_pub.Add;
2060: END IF;
2061:
2054: end if;
2055:
2056: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2057: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2058: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || '. p_pt_response=' || p_pt_response);
2059: fnd_msg_pub.Add;
2060: END IF;
2061:
2062: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2090: IF(p_pt_response = g_la_status_cm_app_for_pt and
2091: l_assignment_status in ('CM_APP_FOR_PT','PT_APPROVED')
2092: ) then
2093:
2094: fnd_message.Set_Name('PV', 'PV_PARTNER_ALREADY_ACCEPTED');
2095: fnd_msg_pub.ADD;
2096: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2097:
2098: end if;
2120: fetch lc_get_pt_org_name into l_pt_org_name;
2121: close lc_get_pt_org_name;
2122:
2123: if l_user_is_cm then
2124: fnd_message.Set_Name('PV', 'PV_NOT_CM_FOR_PT');
2125: else
2126: fnd_message.Set_Name('PV', 'PV_NOT_CONTACT_FOR_PT');
2127: end if;
2128:
2122:
2123: if l_user_is_cm then
2124: fnd_message.Set_Name('PV', 'PV_NOT_CM_FOR_PT');
2125: else
2126: fnd_message.Set_Name('PV', 'PV_NOT_CONTACT_FOR_PT');
2127: end if;
2128:
2129: fnd_message.set_Token('P_PARTNER_NAME', l_pt_org_name);
2130: fnd_msg_pub.ADD;
2125: else
2126: fnd_message.Set_Name('PV', 'PV_NOT_CONTACT_FOR_PT');
2127: end if;
2128:
2129: fnd_message.set_Token('P_PARTNER_NAME', l_pt_org_name);
2130: fnd_msg_pub.ADD;
2131:
2132: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2133:
2133:
2134: end if;
2135:
2136: if l_wf_status = g_wf_status_closed then
2137: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2138: fnd_message.set_Token('TEXT', 'Routing has already completed.');
2139: fnd_msg_pub.ADD;
2140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2141: end if;
2134: end if;
2135:
2136: if l_wf_status = g_wf_status_closed then
2137: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2138: fnd_message.set_Token('TEXT', 'Routing has already completed.');
2139: fnd_msg_pub.ADD;
2140: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2141: end if;
2142:
2148: pv_workflow_pub.g_wf_lkup_serial,
2149: pv_workflow_pub.g_wf_lkup_joint,
2150: pv_workflow_pub.g_wf_lkup_broadcast) then
2151:
2152: fnd_message.Set_Name('PV', 'PV_NOT_VALID_ASGNMENT_TYPE');
2153: fnd_message.set_Token('P_ASGNMENT_TYPE', l_assignment_type);
2154: fnd_msg_pub.ADD;
2155:
2156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2149: pv_workflow_pub.g_wf_lkup_joint,
2150: pv_workflow_pub.g_wf_lkup_broadcast) then
2151:
2152: fnd_message.Set_Name('PV', 'PV_NOT_VALID_ASGNMENT_TYPE');
2153: fnd_message.set_Token('P_ASGNMENT_TYPE', l_assignment_type);
2154: fnd_msg_pub.ADD;
2155:
2156: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2157:
2162: -- After a partner rejected an assignment, the same partner cannot approve
2163: -- the assignment again.
2164: -- ---------------------------------------------------------------------------
2165: IF (p_pt_response = 'PT_APPROVED' AND l_assignment_status = 'PT_REJECTED') THEN
2166: fnd_message.Set_Name('PV', 'PV_CANNOT_APPROVE_AFTER_REJECT');
2167: fnd_msg_pub.ADD;
2168: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2169: END IF;
2170:
2175: l_current_rank := wf_engine.GetItemAttrNumber( itemtype => l_itemtype,
2176: itemkey => l_itemkey,
2177: aname => pv_workflow_pub.g_wf_attr_current_serial_rank);
2178: if l_rank <> l_current_rank then
2179: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2180: fnd_message.set_Token('TEXT', 'Not partner''s turn yet. Partner rank is ' || l_rank ||
2181: '. Current rank is ' || l_current_rank);
2182: fnd_msg_pub.ADD;
2183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2176: itemkey => l_itemkey,
2177: aname => pv_workflow_pub.g_wf_attr_current_serial_rank);
2178: if l_rank <> l_current_rank then
2179: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2180: fnd_message.set_Token('TEXT', 'Not partner''s turn yet. Partner rank is ' || l_rank ||
2181: '. Current rank is ' || l_current_rank);
2182: fnd_msg_pub.ADD;
2183: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2184: end if;
2190: -- this should only happen in joint and if the user has used the browser back button as
2191: -- detailed in bug 3258485
2192:
2193: if p_pt_response = 'PT_REJECTED' and l_routing_status = 'ACTIVE' and l_assignment_status = 'PT_APPROVED' then
2194: fnd_message.Set_Name('PV', 'PV_CANNOT_REJECT_AFTER_APPROVE');
2195: fnd_msg_pub.ADD;
2196: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2197: end if;
2198:
2199: end if;
2200:
2201: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2202: THEN
2203: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2204: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.validateResponse');
2205: fnd_msg_pub.Add;
2206: END IF;
2207:
2200:
2201: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2202: THEN
2203: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2204: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.validateResponse');
2205: fnd_msg_pub.Add;
2206: END IF;
2207:
2208:
2225:
2226: if p_pt_response = g_la_status_pt_rejected then
2227:
2228: if p_reason_code is NULL then
2229: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2230: fnd_message.set_Token('TEXT', 'Must specify decline reason');
2231: fnd_msg_pub.ADD;
2232: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2233: else
2226: if p_pt_response = g_la_status_pt_rejected then
2227:
2228: if p_reason_code is NULL then
2229: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2230: fnd_message.set_Token('TEXT', 'Must specify decline reason');
2231: fnd_msg_pub.ADD;
2232: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2233: else
2234: open lc_validate_reason (pc_lookup_type => 'PV_REASON_CODES', pc_reason_code => p_reason_code);
2235: fetch lc_validate_reason into l_reason_code;
2236: close lc_validate_reason;
2237:
2238: if l_reason_code is NULL then
2239: fnd_message.Set_Name('PV', 'PV_NOT_VALID_REASON_CODE');
2240: fnd_message.set_Token('P_REASON_CODE', p_reason_code);
2241: fnd_msg_pub.ADD;
2242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2243: end if;
2236: close lc_validate_reason;
2237:
2238: if l_reason_code is NULL then
2239: fnd_message.Set_Name('PV', 'PV_NOT_VALID_REASON_CODE');
2240: fnd_message.set_Token('P_REASON_CODE', p_reason_code);
2241: fnd_msg_pub.ADD;
2242: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2243: end if;
2244:
2245: end if;
2246:
2247: elsif p_pt_response = g_la_status_pt_approved and p_reason_code is not NULL then
2248:
2249: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2250: fnd_message.set_Token('TEXT', 'Cannot have decline reason when accepting offer');
2251: fnd_msg_pub.ADD;
2252:
2253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2246:
2247: elsif p_pt_response = g_la_status_pt_approved and p_reason_code is not NULL then
2248:
2249: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2250: fnd_message.set_Token('TEXT', 'Cannot have decline reason when accepting offer');
2251: fnd_msg_pub.ADD;
2252:
2253: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2254:
2268: l_party_notify_rec.DECISION_MAKER_FLAG := 'Y';
2269:
2270: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2271: THEN
2272: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2273: fnd_message.Set_Token('TEXT', 'Calling pv_assign_util_pvt.create_party_notification');
2274: fnd_msg_pub.Add;
2275: END IF;
2276:
2269:
2270: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2271: THEN
2272: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2273: fnd_message.Set_Token('TEXT', 'Calling pv_assign_util_pvt.create_party_notification');
2274: fnd_msg_pub.Add;
2275: END IF;
2276:
2277:
2291: end if;
2292:
2293: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2294: THEN
2295: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2296: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.UpdateAssignment');
2297: fnd_msg_pub.Add;
2298: END IF;
2299:
2292:
2293: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2294: THEN
2295: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2296: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.UpdateAssignment');
2297: fnd_msg_pub.Add;
2298: END IF;
2299:
2300: pv_assignment_pvt.UpdateAssignment (
2319: else
2320:
2321: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2322: THEN
2323: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2324: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.update_party_response');
2325: fnd_msg_pub.Add;
2326: END IF;
2327:
2320:
2321: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2322: THEN
2323: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2324: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.update_party_response');
2325: fnd_msg_pub.Add;
2326: END IF;
2327:
2328: pv_assignment_pvt.update_party_response (
2359:
2360:
2361: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2362: THEN
2363: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2364: fnd_message.Set_Token('TEXT', 'IN if l_routing_status <> pv_assignment_pub.g_r_status_active then');
2365: fnd_msg_pub.Add;
2366: END IF;
2367:
2360:
2361: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2362: THEN
2363: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2364: fnd_message.Set_Token('TEXT', 'IN if l_routing_status <> pv_assignment_pub.g_r_status_active then');
2365: fnd_msg_pub.Add;
2366: END IF;
2367:
2368: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2366: END IF;
2367:
2368: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2369: THEN
2370: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2371: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.update_routing_stage');
2372: fnd_msg_pub.Add;
2373: END IF;
2374:
2367:
2368: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW)
2369: THEN
2370: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2371: fnd_message.Set_Token('TEXT', 'Calling pv_assignment_pvt.update_routing_stage');
2372: fnd_msg_pub.Add;
2373: END IF;
2374:
2375: pv_assignment_pvt.update_routing_stage (
2440: l_username_tab.trim;
2441: l_resource_id_tab.trim;
2442:
2443: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2444: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2445: fnd_message.Set_Token('TEXT', 'before removing preferred partner');
2446: fnd_msg_pub.Add;
2447: END IF;
2448:
2441: l_resource_id_tab.trim;
2442:
2443: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2444: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2445: fnd_message.Set_Token('TEXT', 'before removing preferred partner');
2446: fnd_msg_pub.Add;
2447: END IF;
2448:
2449: PV_ASSIGN_UTIL_PVT.removePreferedPartner
2464: RAISE FND_API.G_EXC_ERROR;
2465: END IF;
2466:
2467: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2468: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2469: fnd_message.Set_Token('TEXT', 'after removing preferred partner');
2470: fnd_msg_pub.Add;
2471: END IF;
2472:
2465: END IF;
2466:
2467: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2468: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2469: fnd_message.Set_Token('TEXT', 'after removing preferred partner');
2470: fnd_msg_pub.Add;
2471: END IF;
2472:
2473:
2473:
2474: for i in 1 .. l_username_tab.count loop
2475:
2476: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2477: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2478: fnd_message.Set_Token('TEXT', ' calling pv_assign_util_pvt.updateAccess for user name:' || l_username_tab(i));
2479: fnd_msg_pub.Add;
2480: END IF;
2481:
2474: for i in 1 .. l_username_tab.count loop
2475:
2476: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2477: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2478: fnd_message.Set_Token('TEXT', ' calling pv_assign_util_pvt.updateAccess for user name:' || l_username_tab(i));
2479: fnd_msg_pub.Add;
2480: END IF;
2481:
2482: pv_assign_util_pvt.updateAccess(
2513: fetch lc_get_pt_org into l_partner_org_rs_id;
2514: exit when lc_get_pt_org%notfound;
2515:
2516: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2517: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2518: fnd_message.Set_Token('TEXT', 'partner org rs id for timeout '||l_partner_org_rs_id);
2519: fnd_msg_pub.Add;
2520: END IF;
2521:
2514: exit when lc_get_pt_org%notfound;
2515:
2516: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2517: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2518: fnd_message.Set_Token('TEXT', 'partner org rs id for timeout '||l_partner_org_rs_id);
2519: fnd_msg_pub.Add;
2520: END IF;
2521:
2522: pv_assign_util_pvt.updateaccess(
2715: -- Capture ORA-00054: resource busy and acquire with NOWAIT specified.
2716: -- This means the row in pv_lead_assignments is already being locked
2717: -- by another user/session.
2718: -- --------------------------------------------------------------------
2719: fnd_message.Set_Name('PV', 'PV_REQUERY_THE_RECORD');
2720: fnd_msg_pub.ADD;
2721:
2722: x_return_status := FND_API.G_RET_STS_ERROR;
2723: fnd_msg_pub.Count_And_Get( p_encoded => FND_API.G_TRUE,
2739: p_data => x_msg_data);
2740:
2741: WHEN OTHERS THEN
2742: IF sqlcode = -20002 THEN
2743: fnd_message.Set_Name('PV', 'PV_WF_COMP_ACTY_ERR');
2744: fnd_msg_pub.Add;
2745: ELSE
2746: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2747: END IF;
2919: FND_MSG_PUB.g_msg_level_threshold := FND_API.G_MISS_NUM;
2920: end if; */
2921:
2922: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2923: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2924: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || '. Lead id =' || p_lead_id);
2925: fnd_msg_pub.Add;
2926: END IF;
2927:
2920: end if; */
2921:
2922: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2923: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2924: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || '. Lead id =' || p_lead_id);
2925: fnd_msg_pub.Add;
2926: END IF;
2927:
2928: x_return_status := FND_API.G_RET_STS_SUCCESS ;
2940: , l_customer_name;
2941: close lc_get_routing_stage;
2942:
2943: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2944: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2945: fnd_message.Set_Token('TEXT', 'Got the routing stage information: routing stage:'|| l_routing_stage || ': l_itemtype:' || l_itemtype || ':l_itemkey:' || l_itemkey );
2946: fnd_msg_pub.Add;
2947: END IF;
2948:
2941: close lc_get_routing_stage;
2942:
2943: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2944: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2945: fnd_message.Set_Token('TEXT', 'Got the routing stage information: routing stage:'|| l_routing_stage || ': l_itemtype:' || l_itemtype || ':l_itemkey:' || l_itemkey );
2946: fnd_msg_pub.Add;
2947: END IF;
2948:
2949: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2946: fnd_msg_pub.Add;
2947: END IF;
2948:
2949: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2950: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2951: fnd_message.Set_Token('TEXT', '::l_assignment_type:' || l_assignment_type || '::l_lead_number:' || l_lead_number );
2952: fnd_msg_pub.Add;
2953: END IF;
2954:
2947: END IF;
2948:
2949: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2950: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2951: fnd_message.Set_Token('TEXT', '::l_assignment_type:' || l_assignment_type || '::l_lead_number:' || l_lead_number );
2952: fnd_msg_pub.Add;
2953: END IF;
2954:
2955: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2952: fnd_msg_pub.Add;
2953: END IF;
2954:
2955: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2956: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2957: fnd_message.Set_Token('TEXT', '::l_opp_name:' || l_opp_name || '::l_opp_amt:' ||l_opp_amt );
2958: fnd_msg_pub.Add;
2959: END IF;
2960:
2953: END IF;
2954:
2955: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2956: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2957: fnd_message.Set_Token('TEXT', '::l_opp_name:' || l_opp_name || '::l_opp_amt:' ||l_opp_amt );
2958: fnd_msg_pub.Add;
2959: END IF;
2960:
2961: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2958: fnd_msg_pub.Add;
2959: END IF;
2960:
2961: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2962: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2963: fnd_message.Set_Token('TEXT', '::l_customer_name::' || l_customer_name);
2964: fnd_msg_pub.Add;
2965: END IF;
2966: if l_routing_stage is null then
2959: END IF;
2960:
2961: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2962: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2963: fnd_message.Set_Token('TEXT', '::l_customer_name::' || l_customer_name);
2964: fnd_msg_pub.Add;
2965: END IF;
2966: if l_routing_stage is null then
2967:
2964: fnd_msg_pub.Add;
2965: END IF;
2966: if l_routing_stage is null then
2967:
2968: fnd_message.Set_Name('PV', 'PV_NO_ASGNMENT');
2969: fnd_message.set_token('P_LEAD_ID', p_lead_id);
2970: fnd_msg_pub.ADD;
2971:
2972: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2965: END IF;
2966: if l_routing_stage is null then
2967:
2968: fnd_message.Set_Name('PV', 'PV_NO_ASGNMENT');
2969: fnd_message.set_token('P_LEAD_ID', p_lead_id);
2970: fnd_msg_pub.ADD;
2971:
2972: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2973:
2985: IF l_assignment_type = pv_workflow_pub.g_wf_lkup_serial
2986: AND ( l_assign_sequence < l_rank OR l_status = g_la_status_cm_rejected ) THEN
2987:
2988: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2989: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2990: fnd_message.Set_Token('TEXT','Partner is not a current partner or the oppty to this partner might have been rejetced by CM');
2991: fnd_msg_pub.Add;
2992: END IF;
2993:
2986: AND ( l_assign_sequence < l_rank OR l_status = g_la_status_cm_rejected ) THEN
2987:
2988: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
2989: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
2990: fnd_message.Set_Token('TEXT','Partner is not a current partner or the oppty to this partner might have been rejetced by CM');
2991: fnd_msg_pub.Add;
2992: END IF;
2993:
2994: ELSIF l_assignment_type in (pv_workflow_pub.g_wf_lkup_broadcast, pv_workflow_pub.g_wf_lkup_joint)
2999: pv_assignment_pub.g_la_status_cm_timeout)
3000: THEN
3001:
3002: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3003: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3004: fnd_message.Set_Token('TEXT', 'For Joint Selling and Broadcast the status will not be updated to withdrawn ' ||
3005: 'for the partners who are not interested in the opp');
3006: fnd_msg_pub.Add;
3007: END IF;
3000: THEN
3001:
3002: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3003: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3004: fnd_message.Set_Token('TEXT', 'For Joint Selling and Broadcast the status will not be updated to withdrawn ' ||
3005: 'for the partners who are not interested in the opp');
3006: fnd_msg_pub.Add;
3007: END IF;
3008:
3074:
3075: for i in 1 .. l_assignment_id_tbl.count loop
3076:
3077: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3078: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3079: fnd_message.Set_Token('TEXT','Calling pv_assignment_pvt.UpdateAssignment for assignment id:' || l_assignment_id_tbl(i));
3080: fnd_msg_pub.Add;
3081: END IF;
3082:
3075: for i in 1 .. l_assignment_id_tbl.count loop
3076:
3077: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3078: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3079: fnd_message.Set_Token('TEXT','Calling pv_assignment_pvt.UpdateAssignment for assignment id:' || l_assignment_id_tbl(i));
3080: fnd_msg_pub.Add;
3081: END IF;
3082:
3083: pv_assignment_pvt.UpdateAssignment (
3126:
3127:
3128: /* if l_resource_id is null then
3129:
3130: fnd_message.Set_Name('PV', 'PV_NO_WITHDRAW_RIGHTS');
3131: fnd_message.Set_Token('P_USERNAME', p_user_name);
3132: fnd_msg_pub.ADD;
3133: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3134:
3127:
3128: /* if l_resource_id is null then
3129:
3130: fnd_message.Set_Name('PV', 'PV_NO_WITHDRAW_RIGHTS');
3131: fnd_message.Set_Token('P_USERNAME', p_user_name);
3132: fnd_msg_pub.ADD;
3133: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3134:
3135: end if;
3162:
3163: for i in 1 .. l_assignment_id_tbl.count loop
3164:
3165: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3166: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3167: fnd_message.Set_Token('TEXT','Calling pv_assignment_pvt.UpdateAssignment for assignment id:' || l_assignment_id_tbl(i));
3168: fnd_msg_pub.Add;
3169: END IF;
3170:
3163: for i in 1 .. l_assignment_id_tbl.count loop
3164:
3165: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3166: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3167: fnd_message.Set_Token('TEXT','Calling pv_assignment_pvt.UpdateAssignment for assignment id:' || l_assignment_id_tbl(i));
3168: fnd_msg_pub.Add;
3169: END IF;
3170:
3171: pv_assignment_pvt.UpdateAssignment (
3189: end if;
3190: end loop;
3191:
3192: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3193: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3194: fnd_message.Set_Token('TEXT','Removing rejected sales team by Calling pv_assignment_pvt.removeRejectedFromAccess' );
3195: fnd_msg_pub.Add;
3196: END IF;
3197:
3190: end loop;
3191:
3192: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3193: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3194: fnd_message.Set_Token('TEXT','Removing rejected sales team by Calling pv_assignment_pvt.removeRejectedFromAccess' );
3195: fnd_msg_pub.Add;
3196: END IF;
3197:
3198: pv_assignment_pvt.removeRejectedFromAccess (
3211: raise FND_API.G_EXC_ERROR;
3212: end if;
3213:
3214: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3215: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3216: fnd_message.Set_Token('TEXT','Removing preferred partner by Calling PV_ASSIGN_UTIL_PVT.removePreferedPartner' );
3217: fnd_msg_pub.Add;
3218: END IF;
3219:
3212: end if;
3213:
3214: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3215: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3216: fnd_message.Set_Token('TEXT','Removing preferred partner by Calling PV_ASSIGN_UTIL_PVT.removePreferedPartner' );
3217: fnd_msg_pub.Add;
3218: END IF;
3219:
3220: PV_ASSIGN_UTIL_PVT.removePreferedPartner
3235: raise FND_API.G_EXC_ERROR;
3236: end if;
3237:
3238: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3239: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3240: fnd_message.Set_Token('TEXT','Update the routing stage by Calling pv_assignment_pvt.update_routing_stage' );
3241: fnd_msg_pub.Add;
3242: END IF;
3243:
3236: end if;
3237:
3238: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3239: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3240: fnd_message.Set_Token('TEXT','Update the routing stage by Calling pv_assignment_pvt.update_routing_stage' );
3241: fnd_msg_pub.Add;
3242: END IF;
3243:
3244: pv_assignment_pvt.update_routing_stage (
3306:
3307: -- vansub:rivendell
3308: else
3309:
3310: fnd_message.set_name('PV', 'PV_CANNOT_WITHDRAW_ASGNMENT');
3311: fnd_message.set_token('P_ROUTING_STAGE', l_routing_stage);
3312: fnd_msg_pub.ADD;
3313:
3314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3307: -- vansub:rivendell
3308: else
3309:
3310: fnd_message.set_name('PV', 'PV_CANNOT_WITHDRAW_ASGNMENT');
3311: fnd_message.set_token('P_ROUTING_STAGE', l_routing_stage);
3312: fnd_msg_pub.ADD;
3313:
3314: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3315:
3363:
3364: WHEN OTHERS THEN
3365:
3366: IF sqlcode = -20002 THEN
3367: fnd_message.Set_Name('PV', 'PV_WF_COMP_ACTY_ERR');
3368: fnd_msg_pub.Add;
3369: ELSE
3370: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
3371: END IF;
3569: FND_MSG_PUB.g_msg_level_threshold := FND_API.G_MISS_NUM;
3570: end if;
3571:
3572: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3573: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3574: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || '. Lead id =' || p_lead_id);
3575: fnd_msg_pub.Add;
3576: END IF;
3577:
3570: end if;
3571:
3572: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3573: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3574: fnd_message.Set_Token('TEXT', 'In ' || l_api_name || '. Lead id =' || p_lead_id);
3575: fnd_msg_pub.Add;
3576: END IF;
3577:
3578: x_return_status := FND_API.G_RET_STS_SUCCESS ;
3596: end if;
3597:
3598: if l_routing_stage <> g_r_status_active or l_routing_stage is NULL then
3599:
3600: fnd_message.Set_Name('PV', 'PV_CANNOT_ABANDON');
3601: fnd_msg_pub.ADD;
3602: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3603:
3604: end if;
3611: close lc_get_partner_id;
3612:
3613: if l_partner_id is null then
3614:
3615: fnd_message.Set_Name('PV', 'PV_NO_ABANDON_RIGHTS');
3616: fnd_message.Set_Token('P_USERNAME', p_user_name);
3617: fnd_msg_pub.ADD;
3618: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3619:
3612:
3613: if l_partner_id is null then
3614:
3615: fnd_message.Set_Name('PV', 'PV_NO_ABANDON_RIGHTS');
3616: fnd_message.Set_Token('P_USERNAME', p_user_name);
3617: fnd_msg_pub.ADD;
3618: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3619:
3620: end if;
3645: raise FND_API.G_EXC_ERROR;
3646: end if;
3647:
3648: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3649: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3650: fnd_message.Set_Token('TEXT', 'Updating assignment by calling pv_assignment_pvt.UpdateAssignment for assignment id:' || l_lead_assignment_id);
3651: fnd_msg_pub.Add;
3652: END IF;
3653:
3646: end if;
3647:
3648: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3649: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3650: fnd_message.Set_Token('TEXT', 'Updating assignment by calling pv_assignment_pvt.UpdateAssignment for assignment id:' || l_lead_assignment_id);
3651: fnd_msg_pub.Add;
3652: END IF;
3653:
3654: pv_assignment_pvt.UpdateAssignment (
3670: raise FND_API.G_EXC_ERROR;
3671: end if;
3672:
3673: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3674: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3675: fnd_message.Set_Token('TEXT', 'before removing preferred partner');
3676: fnd_msg_pub.Add;
3677: END IF;
3678:
3671: end if;
3672:
3673: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3674: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3675: fnd_message.Set_Token('TEXT', 'before removing preferred partner');
3676: fnd_msg_pub.Add;
3677: END IF;
3678:
3679: PV_ASSIGN_UTIL_PVT.removePreferedPartner
3694: raise FND_API.G_EXC_ERROR;
3695: end if;
3696:
3697: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3698: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3699: fnd_message.Set_Token('TEXT', 'after removing preferred partner');
3700: fnd_msg_pub.Add;
3701: END IF;
3702:
3695: end if;
3696:
3697: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3698: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3699: fnd_message.Set_Token('TEXT', 'after removing preferred partner');
3700: fnd_msg_pub.Add;
3701: END IF;
3702:
3703: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3700: fnd_msg_pub.Add;
3701: END IF;
3702:
3703: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3704: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3705: fnd_message.Set_Token('TEXT', 'Removing the rejected salkes team by calling pv_assignment_pvt.removeRejectedFromAccess ');
3706: fnd_msg_pub.Add;
3707: END IF;
3708:
3701: END IF;
3702:
3703: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3704: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3705: fnd_message.Set_Token('TEXT', 'Removing the rejected salkes team by calling pv_assignment_pvt.removeRejectedFromAccess ');
3706: fnd_msg_pub.Add;
3707: END IF;
3708:
3709:
3731:
3732: if l_temp is null then
3733:
3734: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3735: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3736: fnd_message.Set_Token('TEXT', 'All partners have abandoned. Update pv_lead_workflow routing to ABANDONED');
3737: fnd_msg_pub.Add;
3738: END IF;
3739: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3732: if l_temp is null then
3733:
3734: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3735: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3736: fnd_message.Set_Token('TEXT', 'All partners have abandoned. Update pv_lead_workflow routing to ABANDONED');
3737: fnd_msg_pub.Add;
3738: END IF;
3739: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3740: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3736: fnd_message.Set_Token('TEXT', 'All partners have abandoned. Update pv_lead_workflow routing to ABANDONED');
3737: fnd_msg_pub.Add;
3738: END IF;
3739: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3740: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3741: fnd_message.Set_Token('TEXT', 'Updating the routing stage by calling pv_assignment_pvt.update_routing_stage ');
3742: fnd_msg_pub.Add;
3743: END IF;
3744:
3737: fnd_msg_pub.Add;
3738: END IF;
3739: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3740: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3741: fnd_message.Set_Token('TEXT', 'Updating the routing stage by calling pv_assignment_pvt.update_routing_stage ');
3742: fnd_msg_pub.Add;
3743: END IF;
3744:
3745: pv_assignment_pvt.update_routing_stage (
3812: l_attrib_values_rec.assignment_type := l_assignment_type;
3813: l_attrib_values_rec.assignment_type_mean := l_assign_type_mean;
3814:
3815: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3816: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3817: fnd_message.Set_Token('TEXT', 'Abandoning the workflow by calling pv_assignment_pvt.AbandonWorkflow ');
3818: fnd_msg_pub.Add;
3819: END IF;
3820:
3813: l_attrib_values_rec.assignment_type_mean := l_assign_type_mean;
3814:
3815: IF fnd_msg_pub.Check_Msg_Level (fnd_msg_pub.G_MSG_LVL_DEBUG_LOW) THEN
3816: fnd_message.Set_Name('PV', 'PV_DEBUG_MESSAGE');
3817: fnd_message.Set_Token('TEXT', 'Abandoning the workflow by calling pv_assignment_pvt.AbandonWorkflow ');
3818: fnd_msg_pub.Add;
3819: END IF;
3820:
3821: