[Home] [Help]
72: -- Add one more parameter p_lead_action in
73: -- aml_monitor_wf.launch_monitor
74: -- 05/01/2003 SOLIN Bug 2877904
75: -- Add open_flag, object_creation_date, and
76: -- lead_rank_score in as_accesses_all table
77: -- 06/17/2003 SWKHANNA changed lead_process_after_update to include logic for starting
78: -- monitor after grade change.
79: --
80: -- 09/09/2003 SWKHANNA Added extra parameter to be passed in to launch monitor
2471: UPDATE as_sales_leads
2472: SET lead_rank_score = l_lead_rank_score
2473: WHERE sales_lead_id = p_sales_lead_id;
2474:
2475: UPDATE as_accesses_all
2476: SET lead_rank_score = l_lead_rank_score
2477: WHERE sales_lead_id = p_sales_lead_id;
2478: END IF;
2479: -- end CRMAP denorm project
2599:
2600: -- Below two cursors added for bug 7654339
2601: CURSOR C_Check_Freeze(c_sales_lead_id NUMBER) IS
2602: SELECT acc.freeze_flag
2603: FROM as_accesses_all acc
2604: WHERE acc.sales_lead_id = c_sales_lead_id
2605: AND acc.owner_flag = 'Y';
2606:
2607: CURSOR C_Check_TAP(c_sales_lead_id NUMBER) IS
2605: AND acc.owner_flag = 'Y';
2606:
2607: CURSOR C_Check_TAP(c_sales_lead_id NUMBER) IS
2608: SELECT 'Y'
2609: FROM as_accesses_all acc
2610: WHERE acc.sales_lead_id = c_sales_lead_id
2611: AND acc.created_by_tap_flag = 'Y';
2612:
2613: BEGIN
2737: --Code modified for bug12766399
2738: IF NVL(fnd_profile.value('AS_ENABLE_LEAD_ONLINE_TAP'), 'N') = 'Y' AND
2739: l_created_by_tap_flag = 'Y' THEN
2740:
2741: DELETE from as_accesses_all acc
2742: WHERE acc.sales_lead_id = p_sales_lead_id
2743: AND nvl(acc.freeze_flag,'N') = 'N'
2744: AND acc.created_by_tap_flag = 'N';
2745: END IF;
3126:
3127: -- Check whether owner exists or not
3128: CURSOR c_check_owner_exists(c_sales_lead_id NUMBER) IS
3129: SELECT 'Y'
3130: FROM as_accesses_all acc
3131: WHERE acc.sales_lead_id = c_sales_lead_id
3132: AND acc.owner_flag = 'Y';
3133:
3134: CURSOR C_Get_Person(C_Resource_Id NUMBER) IS
3295: RAISE FND_API.G_EXC_ERROR;
3296: END IF;
3297:
3298: -- Check owner again here because Rebuild_Lead_Sales_Team may
3299: -- remove owner in as_accesses_all
3300: l_owner_exists_flag := 'N';
3301: OPEN c_check_owner_exists(p_sales_lead_id);
3302: FETCH c_check_owner_exists INTO l_owner_exists_flag;
3303: CLOSE c_check_owner_exists;